build-system/guile: Add #:substitutable? argument to build system.
This is implemented the same as in gnu-build-system. * guix/build-system/guile.scm (guile-build, guile-cross-build): Add #:substitutable? argument Change-Id: I04babb81ff1f322833f7ff22cd7580c048b26102 Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
parent
e3933f8b4d
commit
c43077076f
@ -88,7 +88,8 @@
|
||||
(compile-flags %compile-flags)
|
||||
(imported-modules %guile-build-system-modules)
|
||||
(modules '((guix build guile-build-system)
|
||||
(guix build utils))))
|
||||
(guix build utils)))
|
||||
(substitutable? #t))
|
||||
"Build SOURCE using Guile taken from the native inputs, and with INPUTS."
|
||||
(define builder
|
||||
(with-imported-modules imported-modules
|
||||
@ -114,6 +115,7 @@
|
||||
#:system system
|
||||
#:target #f
|
||||
#:graft? #f
|
||||
#:substitutable? substitutable?
|
||||
#:guile-for-build guile)))
|
||||
|
||||
(define* (guile-cross-build name
|
||||
@ -133,7 +135,8 @@
|
||||
(compile-flags %compile-flags)
|
||||
(imported-modules %guile-build-system-modules)
|
||||
(modules '((guix build guile-build-system)
|
||||
(guix build utils))))
|
||||
(guix build utils)))
|
||||
(substitutable? #t))
|
||||
(define builder
|
||||
(with-imported-modules imported-modules
|
||||
#~(begin
|
||||
@ -173,6 +176,7 @@
|
||||
#:system system
|
||||
#:target target
|
||||
#:graft? #f
|
||||
#:substitutable? substitutable?
|
||||
#:guile-for-build guile)))
|
||||
|
||||
(define guile-build-system
|
||||
|
Loading…
Reference in New Issue
Block a user