From mboxrd@z Thu Jan 1 00:00:00 1970 From: Alex Kost Subject: Re: [PATCH 6/7] guix build: Add 'build-package'. Date: Sun, 06 Sep 2015 12:32:06 +0300 Message-ID: <874mj7x59l.fsf@gmail.com> References: <1437814197-6321-1-git-send-email-alezost@gmail.com> <1437814197-6321-7-git-send-email-alezost@gmail.com> <87zj1ou1i0.fsf@gnu.org> <878u972ea9.fsf@gmail.com> <87mvxe8frd.fsf@gnu.org> <87oahuvtah.fsf@gmail.com> <87si73u5no.fsf@gnu.org> <87bndfx6l1.fsf@gmail.com> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:34840) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1ZYWIs-0001Ge-1k for guix-devel@gnu.org; Sun, 06 Sep 2015 05:32:02 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1ZYWIo-0001wh-Sl for guix-devel@gnu.org; Sun, 06 Sep 2015 05:32:01 -0400 In-Reply-To: <87bndfx6l1.fsf@gmail.com> (Alex Kost's message of "Sun, 06 Sep 2015 12:03:38 +0300") List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: Ludovic =?utf-8?Q?Court=C3=A8s?= Cc: guix-devel@gnu.org --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable 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))))) >=20=20 > +(define set-build-options* > + (store-lift set-build-options)) Arr, sorry, I sent the wrong patch: =E2=80=98set-build-options*=E2=80=99 sh= ould be moved after =E2=80=98store-lift=E2=80=99 is defined. In the current patch I put = it after =E2=80=98build=E2=80=99 procedure. --=-=-= Content-Type: text/x-patch; charset=utf-8 Content-Disposition: attachment; filename=0001-store-Add-set-build-options.patch Content-Transfer-Encoding: quoted-printable >From 4569ff4868a01e205b9b13b41dc587f8b8d67f76 Mon Sep 17 00:00:00 2001 From: Alex Kost 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=3DUTF-8 Content-Transfer-Encoding: 8bit Suggested by: Ludovic Court=C3=A8s * 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)) =20 +(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. --=20 2.5.0 --=-=-=--