mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-25 05:48:07 -05:00
gnu: bootloaders: Fix make-u-boot-sunxi64-package cross-compilation.
* gnu/packages/bootloaders.scm (make-u-boot-sunxi64-package)[arguments]: Search in native-inputs to fix cross-compilation.
This commit is contained in:
parent
af58b275c9
commit
db78fc0679
1 changed files with 5 additions and 3 deletions
|
@ -662,9 +662,11 @@ (define-public (make-u-boot-sunxi64-package board triplet)
|
||||||
((#:phases phases)
|
((#:phases phases)
|
||||||
`(modify-phases ,phases
|
`(modify-phases ,phases
|
||||||
(add-after 'unpack 'set-environment
|
(add-after 'unpack 'set-environment
|
||||||
(lambda* (#:key inputs #:allow-other-keys)
|
(lambda* (#:key native-inputs inputs #:allow-other-keys)
|
||||||
(let ((bl31 (string-append (assoc-ref inputs "firmware")
|
(let ((bl31
|
||||||
"/bl31.bin")))
|
(string-append
|
||||||
|
(assoc-ref (or native-inputs inputs) "firmware")
|
||||||
|
"/bl31.bin")))
|
||||||
(setenv "BL31" bl31)
|
(setenv "BL31" bl31)
|
||||||
;; This is necessary when we're using the bundled dtc.
|
;; This is necessary when we're using the bundled dtc.
|
||||||
;(setenv "PATH" (string-append (getenv "PATH") ":"
|
;(setenv "PATH" (string-append (getenv "PATH") ":"
|
||||||
|
|
Loading…
Reference in a new issue