build-system/go: Add #:substitutable? argument.

* guix/build-system/go.scm (go-build): Add 'substitutable?' argument.
(go-cross-build): Likewise.

Signed-off-by: Leo Famulari <leo@famulari.name>
This commit is contained in:
Sarah Morgensen 2021-12-13 20:11:47 -05:00 committed by Leo Famulari
parent ef4c9abeba
commit d0050ea8ad
No known key found for this signature in database
GPG Key ID: 2646FA30BACA7F08

@ -172,7 +172,8 @@ commit hash and its date rather than a proper release tag."
(imported-modules %go-build-system-modules) (imported-modules %go-build-system-modules)
(modules '((guix build go-build-system) (modules '((guix build go-build-system)
(guix build union) (guix build union)
(guix build utils)))) (guix build utils)))
(substitutable? #t))
(define builder (define builder
(with-imported-modules imported-modules (with-imported-modules imported-modules
#~(begin #~(begin
@ -182,6 +183,7 @@ commit hash and its date rather than a proper release tag."
#:system #$system #:system #$system
#:phases #$phases #:phases #$phases
#:outputs #$(outputs->gexp outputs) #:outputs #$(outputs->gexp outputs)
#:substitutable? #$substitutable?
#:goarch #$goarch #:goarch #$goarch
#:goos #$goos #:goos #$goos
#:search-paths '#$(sexp->gexp #:search-paths '#$(sexp->gexp
@ -222,7 +224,8 @@ commit hash and its date rather than a proper release tag."
(imported-modules %go-build-system-modules) (imported-modules %go-build-system-modules)
(modules '((guix build go-build-system) (modules '((guix build go-build-system)
(guix build union) (guix build union)
(guix build utils)))) (guix build utils)))
(substitutable? #t))
"Cross-build NAME using GO, where TARGET is a GNU triplet and with INPUTS." "Cross-build NAME using GO, where TARGET is a GNU triplet and with INPUTS."
(define builder (define builder
#~(begin #~(begin