mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-15 15:37:54 -05:00
gnu: guix: Do not copy bootstrap-guile when cross-compiling.
* gnu/packages/package-management.scm (guix)[arguments]: When cross-compiling, skip copy-bootstrap-guile phase; needed for tests only.
This commit is contained in:
parent
f589cbc4dc
commit
d653e184ec
1 changed files with 37 additions and 35 deletions
|
@ -181,9 +181,11 @@ (define-public guix
|
|||
|
||||
(invoke "sh" "bootstrap")))
|
||||
(add-before 'check 'copy-bootstrap-guile
|
||||
(lambda* (#:key system inputs #:allow-other-keys)
|
||||
;; Copy the bootstrap guile tarball in the store used
|
||||
;; by the test suite.
|
||||
(lambda* (#:key system target inputs #:allow-other-keys)
|
||||
(unless target
|
||||
(begin
|
||||
;; Copy the bootstrap guile tarball in the store
|
||||
;; used by the test suite.
|
||||
(define (intern file recursive?)
|
||||
;; Note: don't use 'guix download' here because we
|
||||
;; need to set the 'recursive?' argument.
|
||||
|
@ -220,7 +222,7 @@ (define code
|
|||
(for-each (lambda (input)
|
||||
(intern (assoc-ref inputs input) #t))
|
||||
'("bootstrap/bash" "bootstrap/mkdir"
|
||||
"bootstrap/tar" "bootstrap/xz"))
|
||||
"bootstrap/tar" "bootstrap/xz"))))
|
||||
#t))
|
||||
(add-after 'unpack 'disable-failing-tests
|
||||
;; XXX FIXME: These tests fail within the build container.
|
||||
|
|
Loading…
Reference in a new issue