2018-03-27 23:34 GMT+02:00 Maria Sidorova <hydroma...@gmail.com>: > Hello, > > Running the test suite (`make check`) gives me one of the tests failed. > > This is from test-suite.log > > test-name: pivot-root > location: /home/masha/src/guix/tests/syscalls.scm:156 > source: > + (test-equal > + "pivot-root" > + #t > + (match (pipe) > + ((in . out) > + (match (clone (logior CLONE_NEWUSER CLONE_NEWNS SIGCHLD)) > + (0 > + (dynamic-wind > + (const #t) > + (lambda () > + (close in) > + (call-with-temporary-directory > + (lambda (root) > + (let ((put-old (string-append root > "/real-root"))) > + (mount "none" root "tmpfs") > + (mkdir put-old) > + (call-with-output-file > + (string-append root "/test") > + (lambda (port) (display "testing\n" port))) > + (pivot-root root put-old) > + (write (file-exists? "/test") out) > + (close out))))) > + (lambda () (primitive-exit 0)))) > + (pid (close out) > + (let ((result (read in))) > + (close in) > + (and (zero? (match (waitpid pid) > + ((_ . status) > + (status:exit-val status)))) > + (eq? #t result)))))))) > expected-value: #t > actual-value: #f > result: FAIL > > > The summary is: > # TOTAL: 777 > # PASS: 772 > # SKIP: 4 > # XFAIL: 0 > # FAIL: 1 > # XPASS: 0 > # ERROR: 0 > > I'm novice in Guix, can anyone give me a clue? > > Can you please write the type of system you are building guix on? We recently discovered that on systemd based systems pivot-root might fail because of shared mountpoints.
> Thanks, > Maria. > >
