diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-07-16 02:00:02 +0200 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-07-16 02:00:01 +0200 |
| commit | 1cf84fb13bae42554f0d37cacac0ad9a9d74cedd (patch) | |
| tree | 11ad31f88b5f86741c5b375b9e2eb13f9c849323 /gnu | |
| parent | 12f0ffe2b85a0758a56146ef766f7a1ccf2e7d47 (diff) | |
| download | guix-1cf84fb13bae42554f0d37cacac0ad9a9d74cedd.tar.gz guix-1cf84fb13bae42554f0d37cacac0ad9a9d74cedd.zip | |
gnu: setbfree: Use G-expressions.
* gnu/packages/music.scm (setbfree)[arguments]:
Rewrite as G-expressions.
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/packages/music.scm | 37 |
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 |