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:
parent
4c523c4535
commit
7d416066cd
|
@ -505,8 +505,9 @@ statistical profiler, a code coverage tool, and many other extensions.")
|
||||||
(modify-phases %standard-phases
|
(modify-phases %standard-phases
|
||||||
(replace 'unpack
|
(replace 'unpack
|
||||||
(lambda* (#:key inputs #:allow-other-keys)
|
(lambda* (#:key inputs #:allow-other-keys)
|
||||||
(and (zero? (system* "tar" "xzvf" (assoc-ref inputs "ccl")))
|
(invoke "tar" "xzvf" (assoc-ref inputs "ccl"))
|
||||||
(begin (chdir "ccl") #t))))
|
(chdir "ccl")
|
||||||
|
#t))
|
||||||
(delete 'configure)
|
(delete 'configure)
|
||||||
(add-before 'build 'pre-build
|
(add-before 'build 'pre-build
|
||||||
;; Enter the source directory for the current platform's lisp
|
;; Enter the source directory for the current platform's lisp
|
||||||
|
@ -527,7 +528,7 @@ statistical profiler, a code coverage tool, and many other extensions.")
|
||||||
(substitute* '("Makefile")
|
(substitute* '("Makefile")
|
||||||
(("/bin/rm") "rm"))
|
(("/bin/rm") "rm"))
|
||||||
(setenv "CC" "gcc")
|
(setenv "CC" "gcc")
|
||||||
(zero? (system* "make" "clean"))))
|
(invoke "make" "clean")))
|
||||||
;; XXX Do we need to recompile the heap image as well for Guix?
|
;; 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.
|
;; For now just use the one we already got in the tarball.
|
||||||
(replace 'install
|
(replace 'install
|
||||||
|
|
Loading…
Reference in New Issue