[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/03: gexp: 'gexp->script' uses #:guile also as the guile-for-build.
From: |
guix-commits |
Subject: |
03/03: gexp: 'gexp->script' uses #:guile also as the guile-for-build. |
Date: |
Wed, 24 Mar 2021 18:51:54 -0400 (EDT) |
civodul pushed a commit to branch wip-build-systems-gexp
in repository guix.
commit 2caa3efd7c1c11b2f61a8095214fafaa11ec3ed1
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Wed Mar 24 22:42:00 2021 +0100
gexp: 'gexp->script' uses #:guile also as the guile-for-build.
Previously 'gexp->script' would unconditionally use the
default #:guile-for-build value of 'gexp->derivation'.
* guix/gexp.scm (gexp->script): Pass #:guile to 'load-path-expression'.
Pass #:guile-for-build to 'gexp->derivation'.
---
guix/gexp.scm | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/guix/gexp.scm b/guix/gexp.scm
index 3e25dfc..840af8f 100644
--- a/guix/gexp.scm
+++ b/guix/gexp.scm
@@ -1885,10 +1885,13 @@ imported modules in its search path. Look up EXP's
modules in MODULE-PATH."
(set-load-path
(load-path-expression (gexp-modules exp)
module-path
+ #:guile guile
#:extensions
(gexp-extensions exp)
#:system system
- #:target target)))
+ #:target target))
+ (guile-for-build
+ (lower-object guile system #:target #f)))
(gexp->derivation name
(gexp
(call-with-output-file (ungexp output)
@@ -1911,6 +1914,7 @@ imported modules in its search path. Look up EXP's
modules in MODULE-PATH."
#:system system
#:target target
#:module-path module-path
+ #:guile-for-build guile-for-build
;; These derivations are not worth offloading or
;; substituting.