summary refs log tree commit diff
diff options
context:
space:
mode:
authorMarius Bakke <marius@gnu.org>2022-12-18 19:12:41 +0100
committerMarius Bakke <marius@gnu.org>2022-12-19 23:08:21 +0100
commit16f2cc5a8f258b37530e2ced75765bf354d769bc (patch)
tree70979b2441246c9d929edeaf12b4294a5b7ea0f1
parent6ea7d25396e51fcd8f2a54f1f7460efbf5f93dbd (diff)
downloadguix-16f2cc5a8f258b37530e2ced75765bf354d769bc.tar.gz
gnu: SeaBIOS: Remove pre-generated code.
* gnu/packages/firmware.scm (seabios)[source](modules, snippet): New fields.
[native-inputs]: Add ACPICA.
[arguments]: Add build-iasl phase.
-rw-r--r--gnu/packages/firmware.scm15
1 files changed, 13 insertions, 2 deletions
diff --git a/gnu/packages/firmware.scm b/gnu/packages/firmware.scm
index 79e0577077..623e60f2b1 100644
--- a/gnu/packages/firmware.scm
+++ b/gnu/packages/firmware.scm
@@ -411,9 +411,14 @@ executing in M-mode.")
              (commit (string-append "rel-" version))))
        (file-name (git-file-name name version))
        (sha256
-        (base32 "0gph1hf70jjpx55qc0lzx2yghkipg9dnsin07i4jajk0p1jpd2d0"))))
+        (base32 "0gph1hf70jjpx55qc0lzx2yghkipg9dnsin07i4jajk0p1jpd2d0"))
+       (modules '((guix build utils)))
+       (snippet
+        #~(begin
+            ;; Delete IASL-generated files.
+            (for-each delete-file (find-files "." "\\.hex$"))))))
     (build-system gnu-build-system)
-    (native-inputs (list python-wrapper))
+    (native-inputs (list acpica python-wrapper))
     (arguments
      (list
       #:tests? #f                       ;no tests
@@ -433,6 +438,12 @@ executing in M-mode.")
                 (lambda (port)
                   (format port #$(package-version this-package))))
               (setenv "CC" "gcc")))
+          (add-before 'build 'build-description-tables
+            (lambda _
+              ;; Regenerate the ACPI description tables.
+              (invoke "make" "iasl")
+              ;; Clear temporary files added by the iasl target.
+              (invoke "make" "clean")))
           (add-after 'build 'build-vgabios
             (lambda* (#:key (make-flags #~'()) #:allow-other-keys)
               (for-each