guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

06/06: gnu: wla-dx: Use G-expressions.


From: guix-commits
Subject: 06/06: gnu: wla-dx: Use G-expressions.
Date: Fri, 21 Jul 2023 13:12:54 -0400 (EDT)

nckx pushed a commit to branch master
in repository guix.

commit eb12f3fd8bee99920118ec802ffbac8f1ab676b9
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Sun Jul 16 02:00:00 2023 +0200

    gnu: wla-dx: Use G-expressions.
    
    * gnu/packages/assembly.scm (wla-dx)[arguments]:
    Rewrite as G-expressions.
---
 gnu/packages/assembly.scm | 21 +++++++++++----------
 1 file changed, 11 insertions(+), 10 deletions(-)

diff --git a/gnu/packages/assembly.scm b/gnu/packages/assembly.scm
index 488d0725eb..42c95876f7 100644
--- a/gnu/packages/assembly.scm
+++ b/gnu/packages/assembly.scm
@@ -359,16 +359,17 @@ package for the Game Boy and Game Boy Color.  It consists 
of:
     (build-system cmake-build-system)
     (native-inputs (list python-sphinx)) ; to generate man pages
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-before 'check 'copy-tests-to-build-directory
-           (lambda _
-             (copy-recursively "../source/tests" "tests")))
-         (replace 'check
-           (lambda* (#:key tests? #:allow-other-keys)
-             (let ((sh (which "sh")))
-               (when tests?
-                 (invoke sh "../source/run_tests.sh"))))))))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'check 'copy-tests-to-build-directory
+            (lambda _
+              (copy-recursively "../source/tests" "tests")))
+          (replace 'check
+            (lambda* (#:key tests? #:allow-other-keys)
+              (let ((sh (which "sh")))
+                (when tests?
+                  (invoke sh "../source/run_tests.sh"))))))))
     (home-page "https://github.com/vhelin/wla-dx";)
     (synopsis "Assemblers for various processors")
     (description "WLA DX is a set of tools to assemble assembly files to



reply via email to

[Prev in Thread] Current Thread [Next in Thread]