Hello,
I have 3 failing tests when building guix 1.0.1-10.41b4b71 on armhf. I didn't build with -K argument and as it takes ~10 hours, so I'll just paste my terminal output for now. It seems to fail on ci.guix.info but the log is partial? http://ci.guix.info/log/ma98kc90y5jp7h1ydxjlfa7r3nx0sd37-guix-1.0.1-10.41b4b71 Here is my output: --8<---------------cut here---------------start------------->8--- ================================================= GNU Guix 1.0.1-10.41b4b71: ./test-suite.log ================================================= # TOTAL: 975 # PASS: 903 # SKIP: 67 # XFAIL: 2 # FAIL: 3 # XPASS: 0 # ERROR: 0 --8<---------------cut here---------------end--------------->8--- and the failing tests: --8<---------------cut here---------------start------------->8--- test-name: make-lzip-input-port/compressed location: /tmp/guix-build-guix-1.0.1-10.41b4b71.drv-0/source/tests/lzlib.scm:111 source: + (test-assert + "make-lzip-input-port/compressed" + (let* ((len (pk 'len (+ 10 (random 4000 %seed)))) + (data (random-bytevector len)) + (compressed + (make-lzip-input-port/compressed + (open-bytevector-input-port data))) + (result + (call-with-lzip-input-port + compressed + get-bytevector-all))) + (pk (bytevector-length result) + (bytevector-length data)) + random seed for tests: 1574602043 (bytevector=? result data))) ;;; (len 3501) actual-value: #f actual-error: + (wrong-type-arg + #f + "Wrong type to apply: ~S" + (#f) + (#f)) result: FAIL --8<---------------cut here---------------end--------------->8--- and, --8<---------------cut here---------------start------------->8--- test-name: client location: /tmp/guix-build-guix-1.0.1-10.41b4b71.drv-0/source/tests/processes.scm:43 source: + (test-assert + "client" + (with-store + store + (let* ((session + (find (lambda (session) + (= (getpid) + (process-id (daemon-session-client session)))) + (daemon-sessions))) + (daemon (daemon-session-process session))) + (and (kill (process-id daemon) 0) + (string-suffix? + "guix-daemon" + (first (process-command daemon))))))) actual-value: #f actual-error: + (wrong-type-arg + "struct_vtable" + "Wrong type argument in position ~A (expecting ~A): ~S" + (1 "struct" #f) + (#f)) result: FAIL --8<---------------cut here---------------end--------------->8--- and, --8<---------------cut here---------------start------------->8--- test-name: client + lock location: /tmp/guix-build-guix-1.0.1-10.41b4b71.drv-0/source/tests/processes.scm:53 source: + (test-assert + "client + lock" + (with-store + store + (call-with-temporary-directory + (lambda (directory) + (let* ((token1 (string-append directory "/token1")) + (token2 (string-append directory "/token2")) + (exp (gexp (begin + (ungexp (random-text)) + (mkdir (ungexp token1)) + (let loop () + (unless + (file-exists? (ungexp token2)) + (sleep 1) + (loop))) + (mkdir (ungexp output))))) + (guile (package-derivation store %bootstrap-guile)) + (drv (run-with-store + store + (gexp->derivation + "foo" + exp + #:guile-for-build + guile))) + (thread + (call-with-new-thread + (lambda () (build-derivations store (list drv))))) + (_ (let loop () + (unless + (file-exists? token1) + (usleep 200) + (loop)))) + (session + (find (lambda (session) + (= (getpid) + (process-id (daemon-session-client session)))) + (daemon-sessions))) + (locks (daemon-session-locks-held (pk 'session session)))) + (call-with-output-file token2 (const #t)) + (equal? + (list (string-append + (derivation->output-path drv) + ".lock")) + locks)))))) ;;; (session #f) actual-value: #f actual-error: + (wrong-type-arg + "struct_vtable" + "Wrong type argument in position ~A (expecting ~A): ~S" + (1 "struct" #f) + (#f)) result: FAIL --8<---------------cut here---------------end--------------->8--- Thanks, Mathieu
