Browse Source

tests: Gracefully skip zlib test when zlib is missing.

* tests/zlib.scm: Use 'test-skip' instead of (exit 77)
when (zlib-available?) returns false.
version-1.0.0
Ludovic Courtès 3 years ago
parent
commit
b2c3640d2b
No known key found for this signature in database GPG Key ID: 90B11993D9AEBB5
  1. 7
      tests/zlib.scm

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

Loading…
Cancel
Save