[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
05/66: gnu: dejagnu: Return #t from all phases.
From: |
Mark H. Weaver |
Subject: |
05/66: gnu: dejagnu: Return #t from all phases. |
Date: |
Fri, 23 Mar 2018 04:46:38 -0400 (EDT) |
mhw pushed a commit to branch core-updates
in repository guix.
commit f97cb24967c2787034c3d9a5fce2cf4c1b0c0b3a
Author: Mark H Weaver <address@hidden>
Date: Fri Mar 23 01:53:23 2018 -0400
gnu: dejagnu: Return #t from all phases.
* gnu/packages/dejagnu.scm (dejagnu)[arguments]: Return #t from all phases.
Raise an exception if make check fails.
---
gnu/packages/dejagnu.scm | 13 +++++++------
1 file changed, 7 insertions(+), 6 deletions(-)
diff --git a/gnu/packages/dejagnu.scm b/gnu/packages/dejagnu.scm
index 05825ba..f2aca50 100644
--- a/gnu/packages/dejagnu.scm
+++ b/gnu/packages/dejagnu.scm
@@ -1,6 +1,7 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013 Ludovic Courtès <address@hidden>
;;; Copyright © 2016, 2017 Efraim Flashner <address@hidden>
+;;; Copyright © 2018 Mark H Weaver <address@hidden>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -57,11 +58,10 @@
;; The test-suite needs to have a non-empty stdin:
;;
<http://lists.gnu.org/archive/html/bug-dejagnu/2003-06/msg00002.html>.
- (zero?
- (system "make check < /dev/zero")))
- (begin
- (display "test suite cannot be run, skipping\n")
- #t))))
+ (unless (zero? (system "make check < /dev/zero"))
+ (error "make check failed")))
+ (display "test suite cannot be run, skipping\n"))
+ #t))
(add-after 'install 'post-install
(lambda* (#:key inputs outputs #:allow-other-keys)
;; Use the right `expect' binary.
@@ -71,7 +71,8 @@
(("^mypath.*$" all)
(string-append all
"export PATH="
- expect "/bin:$PATH\n")))))))))
+ expect "/bin:$PATH\n")))
+ #t))))))
(home-page
"https://www.gnu.org/software/dejagnu/")
(synopsis "GNU software testing framework")
- 23/66: gnu: hurd-minimal: Use invoke., (continued)
- 23/66: gnu: hurd-minimal: Use invoke., Mark H. Weaver, 2018/03/23
- 20/66: gnu: gmime: Return #t from all phases., Mark H. Weaver, 2018/03/23
- 22/66: gnu: hurd-headers: Use invoke., Mark H. Weaver, 2018/03/23
- 18/66: gnu: git: Return #t from all phases., Mark H. Weaver, 2018/03/23
- 27/66: gnu: gnumach: Use invoke., Mark H. Weaver, 2018/03/23
- 06/66: gnu: elogind: Return #t from all phases., Mark H. Weaver, 2018/03/23
- 30/66: gnu: imagemagick: Return #t from all phases., Mark H. Weaver, 2018/03/23
- 28/66: gnu: icecat: Return #t from all phases., Mark H. Weaver, 2018/03/23
- 09/66: gnu: faad2: Use invoke., Mark H. Weaver, 2018/03/23
- 31/66: gnu: perl-image-magick: Return #t from all phases., Mark H. Weaver, 2018/03/23
- 05/66: gnu: dejagnu: Return #t from all phases.,
Mark H. Weaver <=
- 26/66: gnu: guix: Use invoke., Mark H. Weaver, 2018/03/23
- 13/66: gnu: cross-base: Use invoke in (gnu build cross-toolchain)., Mark H. Weaver, 2018/03/23
- 29/66: gnu: ijs: Use invoke., Mark H. Weaver, 2018/03/23
- 12/66: gnu: gawk: Return #t from all phases., Mark H. Weaver, 2018/03/23
- 36/66: gnu: libssh2: Use invoke., Mark H. Weaver, 2018/03/23
- 14/66: gnu: gdk-pixbuf+svg: Use invoke., Mark H. Weaver, 2018/03/23
- 33/66: gnu: libarchive: Use invoke., Mark H. Weaver, 2018/03/23
- 42/66: gnu: mesa-headers: Return #t from all phases., Mark H. Weaver, 2018/03/23
- 32/66: gnu: imake: Use invoke., Mark H. Weaver, 2018/03/23
- 44/66: gnu: mozjs: Return #t from all phases., Mark H. Weaver, 2018/03/23