mirror of git://git.savannah.gnu.org/guix.git
guix: gnu-build-system: Handle missing libc.
* guix/build-system/gnu.scm (standard-cross-packages): Handle the case when `cross-libc` returns #f. Change-Id: I85ee5456f10ff141d521a5f2d91267cd612c5616 Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
This commit is contained in:
parent
444a40c75a
commit
b40a44430f
|
@ -460,10 +460,13 @@ is one of `host' or `target'."
|
||||||
`(("cross-gcc" ,(gcc target
|
`(("cross-gcc" ,(gcc target
|
||||||
#:xbinutils (binutils target)
|
#:xbinutils (binutils target)
|
||||||
#:libc libc))
|
#:libc libc))
|
||||||
("cross-libc" ,libc)
|
;; Some targets don't have a libc. (e.g. *-elf targets).
|
||||||
|
,@(if libc
|
||||||
|
`(("cross-libc" ,libc))
|
||||||
|
'())
|
||||||
|
|
||||||
;; MinGW's libc doesn't have a "static" output.
|
;; MinGW's libc doesn't have a "static" output.
|
||||||
,@(if (member "static" (package-outputs libc))
|
,@(if (and libc (member "static" (package-outputs libc)))
|
||||||
`(("cross-libc:static" ,libc "static"))
|
`(("cross-libc:static" ,libc "static"))
|
||||||
'()))))))))
|
'()))))))))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue