ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-07 15:36:20 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: fasttree: Use INVOKE.

Browse source 
* gnu/packages/bioinformatics.scm (fasttree)[arguments]: Use INVOKE; simplify
install phase.
This commit is contained in:
Ricardo Wurmus 2018-10-21 21:30:53 +02:00
parent 38622ccd14
commit 0db75f7a79
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 22 additions and 23 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

45
gnu/packages/bioinformatics.scm
View file

@ -2537,31 +2537,30 @@ (define-public fasttree
(delete 'configure)
(replace 'build
(lambda* (#:key source #:allow-other-keys)
(and (zero? (system* "gcc"
"-O3"
"-finline-functions"
"-funroll-loops"
"-Wall"
"-o"
"FastTree"
source
"-lm"))
(zero? (system* "gcc"
"-DOPENMP"
"-fopenmp"
"-O3"
"-finline-functions"
"-funroll-loops"
"-Wall"
"-o"
"FastTreeMP"
source
"-lm")))))
(invoke "gcc"
"-O3"
"-finline-functions"
"-funroll-loops"
"-Wall"
"-o"
"FastTree"
source
"-lm")
(invoke "gcc"
"-DOPENMP"
"-fopenmp"
"-O3"
"-finline-functions"
"-funroll-loops"
"-Wall"
"-o"
"FastTreeMP"
source
"-lm")
#t))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out")
"/bin")))
(mkdir-p bin)
(let ((bin (string-append (assoc-ref outputs "out") "/bin")))
(install-file "FastTree" bin)
(install-file "FastTreeMP" bin)
#t))))))