mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-26 22:38:07 -05:00
gnu: mercury: Remove trailing #T from phases and snippet.
* gnu/packages/mercury.scm (mercury)[arguments]<#:phases>: Remove trailing #T. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
This commit is contained in:
parent
c116376542
commit
779acb0ba1
1 changed files with 4 additions and 8 deletions
|
@ -100,8 +100,7 @@ (define-public mercury-minimal
|
||||||
(invoke "mv" orig-name new-name)
|
(invoke "mv" orig-name new-name)
|
||||||
(with-directory-excursion new-name
|
(with-directory-excursion new-name
|
||||||
(apply patch-source-shebangs (list #:source src)))))
|
(apply patch-source-shebangs (list #:source src)))))
|
||||||
`((,libatomic-ops "source" "boehm_gc/libatomic_ops")))
|
`((,libatomic-ops "source" "boehm_gc/libatomic_ops"))))))
|
||||||
#t)))
|
|
||||||
(add-after 'replace-boehm-gc 'patch-paths
|
(add-after 'replace-boehm-gc 'patch-paths
|
||||||
(lambda _
|
(lambda _
|
||||||
(substitute*
|
(substitute*
|
||||||
|
@ -133,8 +132,7 @@ (define-public mercury-minimal
|
||||||
"boehm_gc/Makefile.direct")
|
"boehm_gc/Makefile.direct")
|
||||||
(("/bin/sh") (which "sh"))
|
(("/bin/sh") (which "sh"))
|
||||||
(("/bin/pwd") (which "pwd"))
|
(("/bin/pwd") (which "pwd"))
|
||||||
(("/bin/rm") (which "rm")))
|
(("/bin/rm") (which "rm"))))))))
|
||||||
#t)))))
|
|
||||||
(native-inputs
|
(native-inputs
|
||||||
`(("texinfo" ,texinfo)
|
`(("texinfo" ,texinfo)
|
||||||
("flex" ,flex)
|
("flex" ,flex)
|
||||||
|
@ -227,12 +225,10 @@ (define-public mercury
|
||||||
(("/bin/sh") (which "sh"))
|
(("/bin/sh") (which "sh"))
|
||||||
(("/bin/pwd") (which "pwd"))
|
(("/bin/pwd") (which "pwd"))
|
||||||
(("/bin/rm") (which "rm"))
|
(("/bin/rm") (which "rm"))
|
||||||
(("boehm_gc/.git") "boehm_gc"))
|
(("boehm_gc/.git") "boehm_gc"))))
|
||||||
#t))
|
|
||||||
(replace 'bootstrap
|
(replace 'bootstrap
|
||||||
(lambda _
|
(lambda _
|
||||||
(invoke "./prepare.sh")
|
(invoke "./prepare.sh")))))))
|
||||||
#t))))))
|
|
||||||
;; TODO: Uncomment phase when tests are enabled.
|
;; TODO: Uncomment phase when tests are enabled.
|
||||||
;; (replace 'check
|
;; (replace 'check
|
||||||
;; (lambda _
|
;; (lambda _
|
||||||
|
|
Loading…
Reference in a new issue