03/04: gnu: Add arm-trusted-firmware-rk3399.

[guix-commits]

vagrantc pushed a commit to branch master
in repository guix.

commit 074554a2891830900e2ff9335799416723094fcb
Author: Caliph Nomble <address@hidden>
Date:   Mon Oct 14 02:01:36 2019 -0400

    gnu: Add arm-trusted-firmware-rk3399.
    
    * gnu/packages/bootloaders.scm (arm-trusted-firmware-rk3399): New exported
      variable.
    * gnu/packages/firmware (make-arm-trusted-firmware): Also install .elf 
files.
    
    Adjusted-by: Vagrant Cascadian <address@hidden>
    Signed-off-by: Caliph Nomble <address@hidden>
    Signed-off-by: Vagrant Cascadian <address@hidden>
---
 gnu/packages/firmware.scm | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/firmware.scm b/gnu/packages/firmware.scm
index 904ed8c..bfa129a 100644
--- a/gnu/packages/firmware.scm
+++ b/gnu/packages/firmware.scm
@@ -410,7 +410,7 @@ Virtual Machines.  OVMF contains a sample UEFI firmware for 
QEMU and KVM.")
          (replace 'install
            (lambda* (#:key outputs #:allow-other-keys)
              (let ((out (assoc-ref outputs "out"))
-                   (bin (find-files "." ".*\\.bin$")))
+                   (bin (find-files "." ".*\\.(bin|elf)$")))
                (for-each
                  (lambda (file)
                    (install-file file out))
@@ -486,6 +486,16 @@ such as:
            (base32
             "0vqhwqqh8h9qlkpybg2v94911091c1418bc4pnzq5fd7zf0fjkf8")))))))
 
+(define-public arm-trusted-firmware-rk3399
+  (let ((base (make-arm-trusted-firmware "rk3399")))
+    (package
+      (inherit base)
+      (name "arm-trusted-firmware-rk3399")
+      (native-inputs
+       `(("cross32-gcc" ,(cross-gcc "arm-none-eabi"))
+         ("cross32-binutils", (cross-binutils "arm-none-eabi"))
+         ,@(package-native-inputs base))))))
+
 (define-public rk3399-cortex-m0
   (package
     (name "rk3399-cortex-m0")