gnu: compression: Return #t from all phases.

* gnu/packages/compression.scm (perl-compress-raw-zlib, java-snappy)
(java-iq80-snappy, pzstd, java-tukaani-xz): Return #t from all phases.
This commit is contained in:
Mark H Weaver 2018-06-27 22:14:34 -04:00
parent 29594404a1
commit 9f6f726c7f
No known key found for this signature in database
GPG Key ID: 7CEF29847562C516
1 changed files with 11 additions and 6 deletions

View File

@ -760,7 +760,8 @@ INCLUDE = ~a/include
LIB = ~:*~a/lib LIB = ~:*~a/lib
OLD_ZLIB = False OLD_ZLIB = False
GZIP_OS_CODE = AUTO_DETECT" GZIP_OS_CODE = AUTO_DETECT"
(assoc-ref inputs "zlib"))))))))) (assoc-ref inputs "zlib"))))
#t)))))
(home-page "https://metacpan.org/release/Compress-Raw-Zlib") (home-page "https://metacpan.org/release/Compress-Raw-Zlib")
(synopsis "Low-level interface to zlib compression library") (synopsis "Low-level interface to zlib compression library")
(description "This module provides a Perl interface to the zlib (description "This module provides a Perl interface to the zlib
@ -1344,7 +1345,8 @@ install: libbitshuffle.so
(add-after 'build-jni 'copy-jni (add-after 'build-jni 'copy-jni
(lambda _ (lambda _
(copy-recursively "src/main/resources/org/xerial/snappy/native" (copy-recursively "src/main/resources/org/xerial/snappy/native"
"build/classes/org/xerial/snappy/native"))) "build/classes/org/xerial/snappy/native")
#t))
(add-before 'check 'fix-failing (add-before 'check 'fix-failing
(lambda _ (lambda _
(with-directory-excursion "src/test/java/org/xerial/snappy" (with-directory-excursion "src/test/java/org/xerial/snappy"
@ -1462,7 +1464,8 @@ compressor/decompressor.")
class)) class))
(invoke "ant" "compile-tests") (invoke "ant" "compile-tests")
(test "org.iq80.snappy.SnappyFramedStreamTest") (test "org.iq80.snappy.SnappyFramedStreamTest")
(test "org.iq80.snappy.SnappyStreamTest"))) (test "org.iq80.snappy.SnappyStreamTest")
#t))
(add-before 'build 'remove-hadoop-dependency (add-before 'build 'remove-hadoop-dependency
(lambda _ (lambda _
;; We don't have hadoop ;; We don't have hadoop
@ -1817,7 +1820,7 @@ speed.")
`(#:phases `(#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'unpack 'enter-subdirectory (add-after 'unpack 'enter-subdirectory
(lambda _ (chdir "contrib/pzstd"))) (lambda _ (chdir "contrib/pzstd") #t))
(delete 'configure) ; no configure script (delete 'configure) ; no configure script
(add-before 'check 'compile-tests (add-before 'check 'compile-tests
(lambda* (#:key make-flags #:allow-other-keys) (lambda* (#:key make-flags #:allow-other-keys)
@ -2099,14 +2102,16 @@ type by using either Perl modules, or command-line tools on your system.")
(lambda _ (lambda _
;; Our build system enters the first directory in the archive, but ;; Our build system enters the first directory in the archive, but
;; the package is not contained in a subdirectory ;; the package is not contained in a subdirectory
(chdir ".."))) (chdir "..")
#t))
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
;; Do we want to install *Demo.jar? ;; Do we want to install *Demo.jar?
(install-file "build/jar/xz.jar" (install-file "build/jar/xz.jar"
(string-append (string-append
(assoc-ref outputs "out") (assoc-ref outputs "out")
"/share/java/xz.jar"))))))) "/share/java/xz.jar"))
#t)))))
(native-inputs (native-inputs
`(("unzip" ,unzip))) `(("unzip" ,unzip)))
(home-page "https://tukaani.org") (home-page "https://tukaani.org")