Alex Kost (2015-09-06 12:03 +0300) wrote:
[...]
> diff --git a/guix/store.scm b/guix/store.scm
> index 132b8a3..93f2c77 100644
> --- a/guix/store.scm
> +++ b/guix/store.scm
> @@ -58,6 +58,7 @@
> close-connection
> with-store
> set-build-options
> + set-build-options*
> valid-path?
> query-path-hash
> hash-part->path
> @@ -535,6 +536,9 @@ encoding conversion errors."
> (let loop ((done? (process-stderr server)))
> (or done? (process-stderr server)))))
>
> +(define set-build-options*
> + (store-lift set-build-options))
Arr, sorry, I sent the wrong patch: ‘set-build-options*’ should be moved
after ‘store-lift’ is defined. In the current patch I put it after
‘build’ procedure.
>From 4569ff4868a01e205b9b13b41dc587f8b8d67f76 Mon Sep 17 00:00:00 2001
From: Alex Kost <alez...@gmail.com>
Date: Thu, 3 Sep 2015 18:33:51 +0300
Subject: [PATCH] store: Add 'set-build-options*'.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Suggested by: Ludovic Courtès <l...@gnu.org>
* guix/store.scm (set-build-options*): New procedure.
---
guix/store.scm | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/guix/store.scm b/guix/store.scm
index 132b8a3..5f37e72 100644
--- a/guix/store.scm
+++ b/guix/store.scm
@@ -58,6 +58,7 @@
close-connection
with-store
set-build-options
+ set-build-options*
valid-path?
query-path-hash
hash-part->path
@@ -986,6 +987,9 @@ permission bits are kept."
;; Monadic variant of 'build-things'.
(store-lift build-things))
+(define set-build-options*
+ (store-lift set-build-options))
+
(define %guile-for-build
;; The derivation of the Guile to be used within the build environment,
;; when using 'gexp->derivation' and co.
--
2.5.0
