[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
14/15: gnu: chez-scmutils: Return #t from all phases.
From: |
guix-commits |
Subject: |
14/15: gnu: chez-scmutils: Return #t from all phases. |
Date: |
Sat, 16 Feb 2019 14:52:38 -0500 (EST) |
nckx pushed a commit to branch master
in repository guix.
commit 2245f210ea5ef729408aba3f9795cf69b2805e67
Author: Tobias Geerinckx-Rice <address@hidden>
Date: Sat Feb 16 18:50:44 2019 +0100
gnu: chez-scmutils: Return #t from all phases.
* gnu/packages/chez.scm (chez-scmutils)[arguments]: Always return #t from
phases.
Substitute INVOKE for SYSTEM*.
---
gnu/packages/chez.scm | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/gnu/packages/chez.scm b/gnu/packages/chez.scm
index c45085b..98742ee 100644
--- a/gnu/packages/chez.scm
+++ b/gnu/packages/chez.scm
@@ -598,7 +598,7 @@ required to port the program 'Scmutils' to Chez Scheme.")
(delete 'build)
(add-after 'install 'install-src
(lambda* (#:key (make-flags '()) #:allow-other-keys)
- (zero? (apply system* "make" "install-src" make-flags))))
+ (apply invoke "make" "install-src" make-flags)))
(add-after 'install-src 'absolute-path-in-scm-files
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")))
@@ -618,12 +618,13 @@ required to port the program 'Scmutils' to Chez Scheme.")
(let* ((out (assoc-ref outputs "out"))
(mk-file (car (find-files out "Makefile"))))
(with-directory-excursion (dirname mk-file)
- (zero? (apply system* "make" "build" make-flags))))))
+ (apply invoke "make" "build" make-flags)))))
(add-after 'build 'clean-up
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")))
(for-each delete-file
- (find-files out "Makefile|compile-all\\.ss"))))))))
+ (find-files out "Makefile|compile-all\\.ss"))
+ #t))))))
(synopsis "Port of MIT/GNU Scheme Scmutils to Chez Scheme")
(description "This package provides a port of the MIT/GNU Scheme
Scmutils program to Chez Scheme. The port consists of a set of
- 03/15: gnu: chez-srfi: Don't use unstable tarball., (continued)
- 03/15: gnu: chez-srfi: Don't use unstable tarball., guix-commits, 2019/02/16
- 02/15: gnu: chez-fmt: Return #t from all phases., guix-commits, 2019/02/16
- 01/15: gnu: chez-web: Return #t from all phases., guix-commits, 2019/02/16
- 09/15: gnu: nanopass: Don't use unstable tarball., guix-commits, 2019/02/16
- 07/15: gnu: chez-scheme: Fix ‘install-doc’ phase., guix-commits, 2019/02/16
- 04/15: gnu: chez-web: Use GIT- helpers., guix-commits, 2019/02/16
- 10/15: gnu: stex: Don't use unstable tarball., guix-commits, 2019/02/16
- 11/15: gnu: chez-scheme: Don't use unstable tarball., guix-commits, 2019/02/16
- 05/15: gnu: chez-matchable: Don't use unstable tarball., guix-commits, 2019/02/16
- 13/15: gnu: chez-scmutils: Don't use unstable tarball., guix-commits, 2019/02/16
- 14/15: gnu: chez-scmutils: Return #t from all phases.,
guix-commits <=
- 15/15: gnu: chez-sockets: Use GIT- helpers., guix-commits, 2019/02/16
- 06/15: gnu: chez-irregex: Don't use unstable tarball., guix-commits, 2019/02/16
- 08/15: gnu: chez-scheme: Return #t from all phases., guix-commits, 2019/02/16
- 12/15: gnu: chez-mit: Don't use unstable tarball., guix-commits, 2019/02/16