ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 13:58:15 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: femtolisp: Use INVOKE.

Browse source 
* gnu/packages/scheme.scm (femtolisp)[arguments]: Remove "bootstrap" phase;
use INVOKE and return #T unconditionally.
This commit is contained in:
Ricardo Wurmus 2019-01-25 23:10:03 +01:00
parent dd7bc92afc
commit 723f332551
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
gnu/packages/scheme.scm
View file

@ -1147,6 +1147,7 @@ (define-public femtolisp
#:test-target "test" #:test-target "test"
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'bootstrap)
(delete 'configure) ; No configure script (delete 'configure) ; No configure script
(replace 'install ; Makefile has no 'install phase (replace 'install ; Makefile has no 'install phase
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
@ -1160,9 +1161,9 @@ (define-public femtolisp
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin"))) (bin (string-append out "/bin")))
(and (invoke "./bootstrap.sh")
(zero? (system* "./bootstrap.sh")) (install-file "flisp.boot" bin)
(install-file "flisp.boot" bin)))))))) #t))))))
(synopsis "Scheme-like lisp implementation") (synopsis "Scheme-like lisp implementation")
(description (description
"@code{femtolisp} is a scheme-like lisp implementation with a "@code{femtolisp} is a scheme-like lisp implementation with a