gnu: ccl: Unconditionally return #T from build phases.

* gnu/packages/lisp.scm (ccl)[arguments]: Use INVOKE and return #T from build
phases.
This commit is contained in:
Ricardo Wurmus 2019-01-25 12:26:51 +01:00
parent 4c523c4535
commit 7d416066cd
No known key found for this signature in database
GPG key ID: 197A5888235FACAC

View file

@ -505,8 +505,9 @@ (define-public ccl
(modify-phases %standard-phases
(replace 'unpack
(lambda* (#:key inputs #:allow-other-keys)
(and (zero? (system* "tar" "xzvf" (assoc-ref inputs "ccl")))
(begin (chdir "ccl") #t))))
(invoke "tar" "xzvf" (assoc-ref inputs "ccl"))
(chdir "ccl")
#t))
(delete 'configure)
(add-before 'build 'pre-build
;; Enter the source directory for the current platform's lisp
@ -527,7 +528,7 @@ (define-public ccl
(substitute* '("Makefile")
(("/bin/rm") "rm"))
(setenv "CC" "gcc")
(zero? (system* "make" "clean"))))
(invoke "make" "clean")))
;; XXX Do we need to recompile the heap image as well for Guix?
;; For now just use the one we already got in the tarball.
(replace 'install