gnu: arm-trusted-firmware: Remove input labels.

* gnu/packages/firmware.scm (make-arm-trusted-firmware)[native-inputs]: Remove
labels.
This commit is contained in:
Marius Bakke 2022-01-16 22:01:50 +01:00
parent 0c469c041e
commit f11578e8d9
No known key found for this signature in database
GPG Key ID: A2A06DF2A33A54FA

View File

@ -577,16 +577,17 @@ Virtual Machines. OVMF contains a sample UEFI firmware for QEMU and KVM.")
"DEBUG=1")
#:tests? #f)) ; no tests
(native-inputs
`(,@(if (and (not (string-prefix? "aarch64" (%current-system)))
(string-prefix? "aarch64" arch))
`(("cross-gcc" ,(cross-gcc "aarch64-linux-gnu"))
("cross-binutils" ,(cross-binutils "aarch64-linux-gnu")))
'())
,@(if (and (not (string-prefix? "armhf" (%current-system)))
(string-prefix? "armhf" arch))
`(("cross-gcc" ,(cross-gcc "arm-linux-gnueabihf"))
("cross-binutils" ,(cross-binutils "arm-linux-gnueabihf")))
'())))
(let ((system (%current-system)))
(cond
((and (not (string-prefix? "aarch64" system))
(string-prefix? "aarch64" arch))
(list (cross-gcc "aarch64-linux-gnu")
(cross-binutils "aarch64-linux-gnu")))
((and (not (string-prefix? "armhf" system))
(string-prefix? "armhf" arch))
(list (cross-gcc "arm-linux-gnueabihf")
(cross-binutils "arm-linux-gnueabihf")))
(else '()))))
(home-page "https://www.trustedfirmware.org/")
(synopsis "Implementation of \"secure world software\"")
(description