diff options
Diffstat (limited to 'gnu/bootloader/u-boot.scm')
| -rw-r--r-- | gnu/bootloader/u-boot.scm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/gnu/bootloader/u-boot.scm b/gnu/bootloader/u-boot.scm index 122c7c98611..6cad33b7416 100644 --- a/gnu/bootloader/u-boot.scm +++ b/gnu/bootloader/u-boot.scm | |||
| @@ -73,9 +73,12 @@ | |||
| 73 | 73 | ||
| 74 | (define install-allwinner64-u-boot | 74 | (define install-allwinner64-u-boot |
| 75 | #~(lambda (bootloader root-index image) | 75 | #~(lambda (bootloader root-index image) |
| 76 | (let ((spl (string-append bootloader "/libexec/u-boot-sunxi-with-spl.fit.itb"))) | 76 | (let ((spl (string-append bootloader "/libexec/u-boot-sunxi-with-spl.bin")) |
| 77 | (u-boot (string-append bootloader "/libexec/u-boot-sunxi-with-spl.fit.itb"))) | ||
| 77 | (write-file-on-device spl (stat:size (stat spl)) | 78 | (write-file-on-device spl (stat:size (stat spl)) |
| 78 | image (* 8 1024))))) | 79 | image (* 8 1024)) |
| 80 | (write-file-on-device u-boot (stat:size (stat u-boot)) | ||
| 81 | image (* 40 1024))))) | ||
| 79 | 82 | ||
| 80 | (define install-imx-u-boot | 83 | (define install-imx-u-boot |
| 81 | #~(lambda (bootloader root-index image) | 84 | #~(lambda (bootloader root-index image) |