[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/22: gnu: java-picard-1.113: Use INVOKE.
From: |
Ricardo Wurmus |
Subject: |
02/22: gnu: java-picard-1.113: Use INVOKE. |
Date: |
Thu, 8 Nov 2018 04:11:11 -0500 (EST) |
rekado pushed a commit to branch master
in repository guix.
commit c527d36f0250b9815507e4ac28c3d7cfb6b87b20
Author: Ricardo Wurmus <address@hidden>
Date: Thu Nov 8 09:02:34 2018 +0100
gnu: java-picard-1.113: Use INVOKE.
* gnu/packages/bioinformatics.scm (java-picard-1.113)[arguments]: Use INVOKE
and return #T unconditionally.
---
gnu/packages/bioinformatics.scm | 36 +++++++++++++++++++-----------------
1 file changed, 19 insertions(+), 17 deletions(-)
diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index e1ed711..70597e2 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -3476,26 +3476,28 @@ VCF.")
(lambda* (#:key inputs #:allow-other-keys)
(mkdir-p "lib/jni")
(mkdir-p "jdk-src")
- (and (zero? (system* "tar" "--strip-components=1" "-C" "jdk-src"
- "-xf" (assoc-ref inputs "jdk-src")))
- (zero? (system* "javah" "-jni"
- "-classpath" "classes"
- "-d" "lib/"
- "net.sf.samtools.util.zip.IntelDeflater"))
- (with-directory-excursion "src/c/inteldeflater"
- (zero? (system* "gcc" "-I../../../lib" "-I."
- (string-append "-I" (assoc-ref inputs
"jdk")
- "/include/linux")
-
"-I../../../jdk-src/src/share/native/common/"
-
"-I../../../jdk-src/src/solaris/native/common/"
- "-c" "-O3" "-fPIC" "IntelDeflater.c"))
- (zero? (system* "gcc" "-shared"
- "-o" "../../../lib/jni/libIntelDeflater.so"
- "IntelDeflater.o" "-lz" "-lstdc++"))))))
+ (invoke "tar" "--strip-components=1" "-C" "jdk-src"
+ "-xf" (assoc-ref inputs "jdk-src"))
+ (invoke "javah" "-jni"
+ "-classpath" "classes"
+ "-d" "lib/"
+ "net.sf.samtools.util.zip.IntelDeflater")
+ (with-directory-excursion "src/c/inteldeflater"
+ (invoke "gcc" "-I../../../lib" "-I."
+ (string-append "-I" (assoc-ref inputs "jdk")
+ "/include/linux")
+ "-I../../../jdk-src/src/share/native/common/"
+ "-I../../../jdk-src/src/solaris/native/common/"
+ "-c" "-O3" "-fPIC" "IntelDeflater.c")
+ (invoke "gcc" "-shared"
+ "-o" "../../../lib/jni/libIntelDeflater.so"
+ "IntelDeflater.o" "-lz" "-lstdc++"))
+ #t))
;; We can only build everything else after building the JNI library.
(add-after 'build-jni 'build-rest
(lambda* (#:key make-flags #:allow-other-keys)
- (zero? (apply system* `("ant" "all" ,@make-flags)))))
+ (apply invoke `("ant" "all" ,@make-flags))
+ #t))
(add-before 'build 'set-JAVA6_HOME
(lambda _
(setenv "JAVA6_HOME" (getenv "JAVA_HOME"))
- branch master updated (c098c49 -> 4e82946), Ricardo Wurmus, 2018/11/08
- 04/22: gnu: mash: Remove custom autoconf phase., Ricardo Wurmus, 2018/11/08
- 02/22: gnu: java-picard-1.113: Use INVOKE.,
Ricardo Wurmus <=
- 10/22: gnu: ngs-sdk: Use INVOKE., Ricardo Wurmus, 2018/11/08
- 17/22: gnu: seek: Use INVOKE., Ricardo Wurmus, 2018/11/08
- 05/22: gnu: newick-utils: Remove custom autoconf phase., Ricardo Wurmus, 2018/11/08
- 20/22: gnu: pcc: Use INVOKE., Ricardo Wurmus, 2018/11/08
- 16/22: gnu: sailfish: Use INVOKE., Ricardo Wurmus, 2018/11/08
- 07/22: gnu: sra-tools: Use INVOKE., Ricardo Wurmus, 2018/11/08
- 14/22: gnu: sra-tools: Update to 2.9.3., Ricardo Wurmus, 2018/11/08
- 11/22: gnu: ngs-sdk: Update to 2.9.3., Ricardo Wurmus, 2018/11/08
- 12/22: gnu: ncbi-vdb: Update to 2.9.3., Ricardo Wurmus, 2018/11/08
- 08/22: gnu: taxtastic: Use INVOKE., Ricardo Wurmus, 2018/11/08