mirror of
https://codeberg.org/guix/guix.git
synced 2025-10-02 02:15:12 +00:00
gnu: bootloader: Update install-allwinner64-u-boot.
* gnu/bootloader/u-boot.scm (install-allwinner64-u-boot): Update to use a single file to install.
This commit is contained in:
parent
380a837c55
commit
a65c935e29
1 changed files with 2 additions and 5 deletions
|
@ -73,12 +73,9 @@
|
||||||
|
|
||||||
(define install-allwinner64-u-boot
|
(define install-allwinner64-u-boot
|
||||||
#~(lambda (bootloader root-index image)
|
#~(lambda (bootloader root-index image)
|
||||||
(let ((spl (string-append bootloader "/libexec/spl/sunxi-spl.bin"))
|
(let ((spl (string-append bootloader "/libexec/u-boot-sunxi-with-spl.fit.itb")))
|
||||||
(u-boot (string-append bootloader "/libexec/u-boot.itb")))
|
|
||||||
(write-file-on-device spl (stat:size (stat spl))
|
(write-file-on-device spl (stat:size (stat spl))
|
||||||
image (* 8 1024))
|
image (* 8 1024)))))
|
||||||
(write-file-on-device u-boot (stat:size (stat u-boot))
|
|
||||||
image (* 40 1024)))))
|
|
||||||
|
|
||||||
(define install-imx-u-boot
|
(define install-imx-u-boot
|
||||||
#~(lambda (bootloader root-index image)
|
#~(lambda (bootloader root-index image)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue