me
/
guix
Archived
1
0
Fork 0

gnu: bootloaders: Avoid top-level circular references.

Fixes <https://issues.guix.gnu.org/64745>.

The regression was introduced in
ed5dc3a25d858a394bb7db937a51d866c3cdc6ed: at the top level,
bootloaders.scm and firmware.scm would depend on each other, leading to
unbound variables when loaded, depending on the order in which they got
loaded.

* gnu/packages/bootloaders.scm (make-u-boot-sunxi64-package): Expect
'scp-firmware' to be a promise; force it in 'native-inputs'.
(u-boot-pine64-plus, u-boot-pine64-lts, u-boot-pinebook): Wrap the 3rd
argument to 'make-u-boot-sunxi64-package' into 'delay'.

Reported-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Ludovic Courtès 2023-07-20 23:49:48 +02:00
parent a4038c4f78
commit 0ab46ef3f9
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 5 additions and 5 deletions

View File

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013, 2014, 2015, 2016, 2017, 2018, 2019, 2021 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2013-2019, 2021, 2023 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2015, 2018 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2015, 2018 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2015 Leo Famulari <leo@famulari.name> ;;; Copyright © 2015 Leo Famulari <leo@famulari.name>
;;; Copyright © 2016, 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2016, 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
@ -1051,22 +1051,22 @@ removed so that it fits within common partitioning schemes.")))
(setenv "BL31" (search-input-file inputs "bl31.bin")))))))) (setenv "BL31" (search-input-file inputs "bl31.bin"))))))))
(native-inputs (native-inputs
(modify-inputs (package-native-inputs base) (modify-inputs (package-native-inputs base)
(append scp-firmware))) (append (force scp-firmware))))
(inputs (inputs
(modify-inputs (package-inputs base) (modify-inputs (package-inputs base)
(append arm-trusted-firmware-sun50i-a64)))))) (append arm-trusted-firmware-sun50i-a64))))))
(define-public u-boot-pine64-plus (define-public u-boot-pine64-plus
(make-u-boot-sunxi64-package "pine64_plus" "aarch64-linux-gnu" (make-u-boot-sunxi64-package "pine64_plus" "aarch64-linux-gnu"
crust-pine64-plus)) (delay crust-pine64-plus)))
(define-public u-boot-pine64-lts (define-public u-boot-pine64-lts
(make-u-boot-sunxi64-package "pine64-lts" "aarch64-linux-gnu" (make-u-boot-sunxi64-package "pine64-lts" "aarch64-linux-gnu"
crust-pine64-plus)) (delay crust-pine64-plus)))
(define-public u-boot-pinebook (define-public u-boot-pinebook
(make-u-boot-sunxi64-package (make-u-boot-sunxi64-package
"pinebook" "aarch64-linux-gnu" crust-pinebook "pinebook" "aarch64-linux-gnu" (delay crust-pinebook)
;; Fix regression with LCD video output introduced in 2020.01 ;; Fix regression with LCD video output introduced in 2020.01
;; https://patchwork.ozlabs.org/patch/1225130/ ;; https://patchwork.ozlabs.org/patch/1225130/
#:configs '("CONFIG_VIDEO_BPP32=y"))) #:configs '("CONFIG_VIDEO_BPP32=y")))