summary refs log tree commit diff
path: root/tests
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-04-16 17:29:25 +0200
committerLudovic Courtès <ludo@gnu.org>2019-04-16 17:30:22 +0200
commitb2c3640d2baa7bc929bf21880e6fb2785f5997f6 (patch)
tree2b3a9b3a1164a9182aea2f461fc95bce74cd6473 /tests
parente31ece97517312e9b054767c18c6f38d8d5d8618 (diff)
downloadguix-b2c3640d2baa7bc929bf21880e6fb2785f5997f6.tar.gz
tests: Gracefully skip zlib test when zlib is missing.
* tests/zlib.scm: Use 'test-skip' instead of (exit 77)
when (zlib-available?) returns false.
Diffstat (limited to 'tests')
-rw-r--r--tests/zlib.scm7
1 files changed, 3 insertions, 4 deletions
diff --git a/tests/zlib.scm b/tests/zlib.scm
index 5455240a71..7c595a422c 100644
--- a/tests/zlib.scm
+++ b/tests/zlib.scm
@@ -1,5 +1,5 @@
 ;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2016 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2016, 2019 Ludovic Courtès <ludo@gnu.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -26,11 +26,10 @@
 
 ;; Test the (guix zlib) module.
 
-(unless (zlib-available?)
-  (exit 77))
-
 (test-begin "zlib")
 
+(unless (zlib-available?)
+  (test-skip 1))
 (test-assert "compression/decompression pipe"
   (let ((data (random-bytevector (+ (random 10000)
                                     (* 20 1024)))))