about summary refs log tree commit diff
diff options
context:
space:
mode:
authorNguyễn Gia Phong <cnx@loang.net>2025-05-20 23:12:53 +0900
committerNguyễn Gia Phong <cnx@loang.net>2025-05-20 23:12:53 +0900
commit12ee1119322e27775a0b956d893fe89dfb650fcd (patch)
tree0ee0870b5c383d3ee4b4b05c23a6b08ddeac16b7
parent01b7ce85ed8a861aabca4b548da43e2ddcec61c1 (diff)
downloadloftix-12ee1119322e27775a0b956d893fe89dfb650fcd.tar.gz
Prettify
-rw-r--r--loftix/emulation.scm22
-rw-r--r--loftix/fuzzing.scm4
2 files changed, 10 insertions, 16 deletions
diff --git a/loftix/emulation.scm b/loftix/emulation.scm
index a0d4a9c..e649bc5 100644
--- a/loftix/emulation.scm
+++ b/loftix/emulation.scm
@@ -49,11 +49,7 @@
                       ("aarch64-linux"  "aarch64-linux-user")
                       ("armhf-linux"    "arm-linux-user")
                       ("mips64el-linux" "mips64el-linux-user")
-                      ("powerpc-linux"  "ppc-linux-user")
-                      ;; Prevent errors when querying this package
-                      ;; on unsupported platforms, e.g. when running
-                      ;; "guix search"
-                      (_                "")))))
+                      ("powerpc-linux"  "ppc-linux-user")))))
           ((#:phases phases)
            #~(modify-phases #$phases
                (delete 'replace-firmwares)
@@ -136,14 +132,14 @@
                      ;; The binaries need to be linked against -lrt.
                      (setenv "LDFLAGS" "-lrt")
                      (apply invoke
-                            `("./configure"
-                              ,(string-append "--cc=" (which "gcc"))
-                              ;; Some architectures insist on using HOST_CC
-                              ,(string-append "--host-cc=" (which "gcc"))
-                              "--disable-debug-info" ; save build space
-                              ,(string-append "--prefix=" out)
-                              ,(string-append "--sysconfdir=/etc")
-                              ,@configure-flags)))))
+                       "./configure"
+                       (string-append "--cc=" (which "gcc"))
+                       ;; Some architectures insist on using HOST_CC
+                       (string-append "--host-cc=" (which "gcc"))
+                       "--disable-debug-info" ; save build space
+                       (string-append "--prefix=" out)
+                       (string-append "--sysconfdir=/etc")
+                       configure-flags))))
                (add-after 'install 'install-symbolic-header
                  (lambda* (#:key outputs #:allow-other-keys)
                    (install-file
diff --git a/loftix/fuzzing.scm b/loftix/fuzzing.scm
index de1ac77..61c594d 100644
--- a/loftix/fuzzing.scm
+++ b/loftix/fuzzing.scm
@@ -39,9 +39,7 @@
          #~(modify-phases #$phases
              (add-after 'build 'build-qasan
                (lambda* (#:key make-flags #:allow-other-keys)
-                 (apply invoke
-                   "make" "-C" "qemu_mode/libqasan"
-                   make-flags)))
+                 (apply invoke "make" "-C" "qemu_mode/libqasan" make-flags)))
              ;; afl-qemu-trace is a symbolic link to QEMU's binary.
              ;; Substituting its source code with AFL++'s output path
              ;; would result in a dependency cycle.