gnu: u-boot-pine64-plus: Refactor package definition.
* gnu/packages/bootloaders.scm (make-u-boot-sunxi64-package): New procedure. (u-boot-pine64-plus): Use it. Signed-off-by: Danny Milosavljevic <dannym@scratchpost.org>
This commit is contained in:
parent
95d9198606
commit
0da3526d58
|
@ -554,8 +554,8 @@ board-independent tools.")))
|
||||||
(define-public u-boot-beagle-bone-black
|
(define-public u-boot-beagle-bone-black
|
||||||
(make-u-boot-package "am335x_boneblack" "arm-linux-gnueabihf"))
|
(make-u-boot-package "am335x_boneblack" "arm-linux-gnueabihf"))
|
||||||
|
|
||||||
(define-public u-boot-pine64-plus
|
(define-public (make-u-boot-sunxi64-package board triplet)
|
||||||
(let ((base (make-u-boot-package "pine64_plus" "aarch64-linux-gnu")))
|
(let ((base (make-u-boot-package board triplet)))
|
||||||
(package
|
(package
|
||||||
(inherit base)
|
(inherit base)
|
||||||
(arguments
|
(arguments
|
||||||
|
@ -576,6 +576,9 @@ board-independent tools.")))
|
||||||
`(("firmware" ,arm-trusted-firmware-sun50i-a64)
|
`(("firmware" ,arm-trusted-firmware-sun50i-a64)
|
||||||
,@(package-native-inputs base))))))
|
,@(package-native-inputs base))))))
|
||||||
|
|
||||||
|
(define-public u-boot-pine64-plus
|
||||||
|
(make-u-boot-sunxi64-package "pine64_plus" "aarch64-linux-gnu"))
|
||||||
|
|
||||||
(define-public u-boot-bananapi-m2-ultra
|
(define-public u-boot-bananapi-m2-ultra
|
||||||
(make-u-boot-package "Bananapi_M2_Ultra" "arm-linux-gnueabihf"))
|
(make-u-boot-package "Bananapi_M2_Ultra" "arm-linux-gnueabihf"))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue