summaryrefslogtreecommitdiff
path: root/gnu/packages/music.scm
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2023-07-16 02:00:02 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2023-07-16 02:00:01 +0200
commit1cf84fb13bae42554f0d37cacac0ad9a9d74cedd (patch)
tree11ad31f88b5f86741c5b375b9e2eb13f9c849323 /gnu/packages/music.scm
parent12f0ffe2b85a0758a56146ef766f7a1ccf2e7d47 (diff)
gnu: setbfree: Use G-expressions.
* gnu/packages/music.scm (setbfree)[arguments]: Rewrite as G-expressions.
Diffstat (limited to 'gnu/packages/music.scm')
-rw-r--r--gnu/packages/music.scm37
1 files changed, 19 insertions, 18 deletions
diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm
index 7674af7096..324a800182 100644
--- a/gnu/packages/music.scm
+++ b/gnu/packages/music.scm
@@ -2647,24 +2647,25 @@ Paul), and specifically the PaulXStretch version from Xenakios.")
"1lzrrpm57pilvwxpr1qhnx6273md2k96ygxjlhi5gqjdl0nl3z95"))))
(build-system gnu-build-system)
(arguments
- `(#:tests? #f ; no "check" target
- #:make-flags
- (list (string-append "PREFIX=" (assoc-ref %outputs "out"))
- (string-append "FONTFILE="
- (assoc-ref %build-inputs "font-bitstream-vera")
- "/share/fonts/truetype/VeraBd.ttf")
- ;; Disable unsupported optimization flags on non-x86
- ,@(let ((system (or (%current-target-system)
- (%current-system))))
- (if (or (string-prefix? "x86_64" system)
- (string-prefix? "i686" system))
- '()
- '("OPTIMIZATIONS=-ffast-math -fomit-frame-pointer -O3"))))
- #:phases
- (modify-phases %standard-phases
- (add-before 'build 'set-CC-variable
- (lambda _ (setenv "CC" ,(cc-for-target))))
- (delete 'configure))))
+ (list
+ #:tests? #f ; no "check" target
+ #:make-flags
+ #~(cons* (string-append "PREFIX=" #$output)
+ (string-append "FONTFILE="
+ #$(this-package-input "font-bitstream-vera")
+ "/share/fonts/truetype/VeraBd.ttf")
+ ;; Disable unsupported optimization flags on non-x86
+ (let ((system #$(or (%current-target-system)
+ (%current-system))))
+ (if (or (string-prefix? "x86_64" system)
+ (string-prefix? "i686" system))
+ '()
+ '("OPTIMIZATIONS=-ffast-math -fomit-frame-pointer -O3"))))
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-before 'build 'set-CC-variable
+ (lambda _ (setenv "CC" #$(cc-for-target))))
+ (delete 'configure))))
(inputs
(list jack-1
lv2