diff options
Diffstat (limited to 'gnu/packages/firmware.scm')
| -rw-r--r-- | gnu/packages/firmware.scm | 28 |
1 files changed, 26 insertions, 2 deletions
diff --git a/gnu/packages/firmware.scm b/gnu/packages/firmware.scm index 41fe55eb2e..828bc7402a 100644 --- a/gnu/packages/firmware.scm +++ b/gnu/packages/firmware.scm @@ -1197,11 +1197,12 @@ such as: ;; Adding debug symbols causes the size to exceed limits. #~(delete "DEBUG=1" #$flags))))))) -(define make-crust-package +(define make-crust-firmware (mlambda (platform) (package (name (string-append "crust-" - (string-replace-substring platform "_" "-"))) + (string-replace-substring platform "_" "-") + "-firmware")) (version "0.6") (source (origin @@ -1296,6 +1297,29 @@ AR100.") (synopsis "Firmware for Allwinner sunxi SoCs (tools)") (inputs (list firmware))))) +(define make-crust-package + (mlambda (platform) + (let* ((firmware (make-crust-firmware platform)) + (tools (make-crust-tools platform firmware))) + (package + (inherit firmware) + (name (string-append "crust-" + (string-replace-substring platform "_" "-"))) + (source #f) + (build-system trivial-build-system) + (arguments + (list #:modules '((guix build union)) + #:builder + #~(begin + (use-modules (ice-9 match) + (guix build union)) + + (match %build-inputs + (((names . directory) ...) + (union-build #$output directory)))))) + (native-inputs '()) + (inputs (list firmware tools)))))) + (define-public crust-pinebook (make-crust-package "pinebook")) |