02/07: gnu: xa: Use G-expressions.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

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

    gnu: xa: Use G-expressions.
    
    * gnu/packages/assembly.scm (xa)[arguments]:
    Rewrite as G-expressions.
---
 gnu/packages/assembly.scm | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/assembly.scm b/gnu/packages/assembly.scm
index dbf52ed01b..9cbdb53328 100644
--- a/gnu/packages/assembly.scm
+++ b/gnu/packages/assembly.scm
@@ -405,11 +405,13 @@ Supported architectures are:
                 "0bph41aglxl07rnggrir2dl1x97f52hm0bl51d0vklyqvfyvm6qv"))))
     (build-system gnu-build-system)
     (arguments
-     `(#:tests? #f   ; TODO: custom test harness, not sure how it works
-       #:phases
-       (modify-phases %standard-phases
-         (delete 'configure))            ; no "configure" script
-       #:make-flags (list (string-append "DESTDIR=" (assoc-ref %outputs 
"out")))))
+     (list
+      #:tests? #f           ; TODO: custom test harness, not sure how it works
+      #:phases
+      #~(modify-phases %standard-phases
+          (delete 'configure))          ; no "configure" script
+      #:make-flags
+      #~(list (string-append "DESTDIR=" #$output)))) ; no $prefix support
     (native-inputs (list perl))
     (home-page "https://www.floodgap.com/retrotech/xa/";)
     (synopsis "Two-pass portable cross-assembler")