* bug#30824: x86_64-linux: tests/packages.scm fails: could not find bootstrap binary
@ 2018-03-15 4:27 Chris Marusich
2018-03-15 10:41 ` Ludovic Courtès
0 siblings, 1 reply; 2+ messages in thread
From: Chris Marusich @ 2018-03-15 4:27 UTC (permalink / raw)
To: 30824
[-- Attachment #1: Type: text/plain, Size: 3887 bytes --]
This is on x86_64-linux, GuixSD. Using commit
b4bf95162777b9db3c681292942895ea308e701e, running "make check
TESTS=tests/packages.scm" in an environment built by "guix environment
--pure guix" fails. I am using "guix (GNU Guix)
e2d0cf033eb894fa8c786d0bf039fc54685d5559", which is pretty recent (1
week or so ago).
There is one failure, and it is this:
--8<---------------cut here---------------start------------->8---
test-name: package-source-derivation, snippet
location: /home/marusich/guix-wip-docker/tests/packages.scm:378
source:
+ (test-equal
+ "package-source-derivation, snippet"
+ "OK"
+ (let* ((file (search-bootstrap-binary
+ (match (%current-system)
+ ("armhf-linux" "guile-2.0.11.tar.xz")
+ ("aarch64-linux" "guile-2.0.14.tar.xz")
+ (_ "guile-2.0.9.tar.xz"))
+ (%current-system)))
+ (sha256 (call-with-input-file file port-sha256))
+ (fetch (lambda* (url hash-algo hash #:optional name #:key system)
+ (pk 'fetch url hash-algo hash name system)
+ (interned-file url)))
+ (source
+ (bootstrap-origin
+ (origin
+ (method fetch)
+ (uri file)
+ (sha256 sha256)
+ (patch-inputs
+ `(("tar" ,%bootstrap-coreutils&co)
+ ("xz" ,%bootstrap-coreutils&co)
+ ("patch" ,%bootstrap-coreutils&co)))
+ (patch-guile %bootstrap-guile)
+ (modules '((guix build utils)))
+ (snippet
+ '(begin
+ (chmod "." 511)
+ (symlink "guile" "guile-rocks")
+ (copy-recursively
+ "../share/guile/2.0/scripts"
+ "scripts")
+ (chmod ".." 511))))))
+ (package
+ (package
+ (inherit (dummy-package "with-snippet"))
+ (source source)
+ (build-system trivial-build-system)
+ (inputs
+ `(("tar"
+ ,(search-bootstrap-binary "tar" (%current-system)))
+ ("xz"
+ ,(search-bootstrap-binary "xz" (%current-system)))))
+ (arguments
+ `(#:guile
+ ,%bootstrap-guile
+ #:builder
+ (let ((tar (assoc-ref %build-inputs "tar"))
+ (xz (assoc-ref %build-inputs "xz"))
+ (source (assoc-ref %build-inputs "source")))
+ (and (zero? (system*
+ tar
+ "xvf"
+ source
+ "--use-compress-program"
+ xz))
+ (string=? "guile" (readlink "bin/guile-rocks"))
+ (file-exists? "bin/scripts/compile.scm")
+ (let ((out (assoc-ref %outputs "out")))
+ (call-with-output-file
+ out
+ (lambda (p) (display "OK" p))))))))))
+ (drv (package-derivation %store package))
+ (out (derivation->output-path drv)))
+ (and (build-derivations
+ %store
+ (list (pk 'snippet-drv drv)))
+ (call-with-input-file out get-string-all))))
expected-value: "OK"
actual-value: #f
actual-error:
+ (srfi-34
+ #<condition &message [message: "could not find bootstrap binary 'guile-2.0.9.tar.xz' for system 'x86_64-linux'"] 415b220>)
result: FAIL
--8<---------------cut here---------------end--------------->8---
--
Chris
[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]
^ permalink raw reply [flat|nested] 2+ messages in thread
* bug#30824: x86_64-linux: tests/packages.scm fails: could not find bootstrap binary
2018-03-15 4:27 bug#30824: x86_64-linux: tests/packages.scm fails: could not find bootstrap binary Chris Marusich
@ 2018-03-15 10:41 ` Ludovic Courtès
0 siblings, 0 replies; 2+ messages in thread
From: Ludovic Courtès @ 2018-03-15 10:41 UTC (permalink / raw)
To: Chris Marusich; +Cc: 30824-done
Hi Chris,
Chris Marusich <cmmarusich@gmail.com> skribis:
> test-name: package-source-derivation, snippet
> location: /home/marusich/guix-wip-docker/tests/packages.scm:378
> source:
> + (test-equal
> + "package-source-derivation, snippet"
> + "OK"
> + (let* ((file (search-bootstrap-binary
> + (match (%current-system)
> + ("armhf-linux" "guile-2.0.11.tar.xz")
> + ("aarch64-linux" "guile-2.0.14.tar.xz")
> + (_ "guile-2.0.9.tar.xz"))
> + (%current-system)))
> + (sha256 (call-with-input-file file port-sha256))
> + (fetch (lambda* (url hash-algo hash #:optional name #:key system)
> + (pk 'fetch url hash-algo hash name system)
> + (interned-file url)))
> + (source
> + (bootstrap-origin
> + (origin
> + (method fetch)
> + (uri file)
> + (sha256 sha256)
> + (patch-inputs
> + `(("tar" ,%bootstrap-coreutils&co)
> + ("xz" ,%bootstrap-coreutils&co)
> + ("patch" ,%bootstrap-coreutils&co)))
> + (patch-guile %bootstrap-guile)
> + (modules '((guix build utils)))
> + (snippet
> + '(begin
> + (chmod "." 511)
> + (symlink "guile" "guile-rocks")
> + (copy-recursively
> + "../share/guile/2.0/scripts"
> + "scripts")
> + (chmod ".." 511))))))
> + (package
> + (package
> + (inherit (dummy-package "with-snippet"))
> + (source source)
> + (build-system trivial-build-system)
> + (inputs
> + `(("tar"
> + ,(search-bootstrap-binary "tar" (%current-system)))
> + ("xz"
> + ,(search-bootstrap-binary "xz" (%current-system)))))
> + (arguments
> + `(#:guile
> + ,%bootstrap-guile
> + #:builder
> + (let ((tar (assoc-ref %build-inputs "tar"))
> + (xz (assoc-ref %build-inputs "xz"))
> + (source (assoc-ref %build-inputs "source")))
> + (and (zero? (system*
> + tar
> + "xvf"
> + source
> + "--use-compress-program"
> + xz))
> + (string=? "guile" (readlink "bin/guile-rocks"))
> + (file-exists? "bin/scripts/compile.scm")
> + (let ((out (assoc-ref %outputs "out")))
> + (call-with-output-file
> + out
> + (lambda (p) (display "OK" p))))))))))
> + (drv (package-derivation %store package))
> + (out (derivation->output-path drv)))
> + (and (build-derivations
> + %store
> + (list (pk 'snippet-drv drv)))
> + (call-with-input-file out get-string-all))))
> expected-value: "OK"
> actual-value: #f
> actual-error:
> + (srfi-34
> + #<condition &message [message: "could not find bootstrap binary 'guile-2.0.9.tar.xz' for system 'x86_64-linux'"] 415b220>)
> result: FAIL
Fixed in f8ec8d96d657f95e71e0798124cdeb2c9217c7fa, thanks!
Ludo’.
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2018-03-15 10:42 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2018-03-15 4:27 bug#30824: x86_64-linux: tests/packages.scm fails: could not find bootstrap binary Chris Marusich
2018-03-15 10:41 ` Ludovic Courtès
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).