me/guix
Archived
1
0
Fork 0
Code Activity

gnu: setbfree: Use G-expressions.

Browse source 
* gnu/packages/music.scm (setbfree)[arguments]:
Rewrite as G-expressions.
This commit is contained in:
Tobias Geerinckx-Rice 2023-07-16 02:00:02 +02:00
parent 12f0ffe2b8
commit 1cf84fb13b
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 19 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

37
gnu/packages/music.scm
View file

@ -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