From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:470:142:3::10]:42134) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iFfw6-0003j9-Tz for guix-patches@gnu.org; Wed, 02 Oct 2019 10:49:03 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1iFfw6-0006Oz-0p for guix-patches@gnu.org; Wed, 02 Oct 2019 10:49:02 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:57527) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1iFfw5-0006Os-UF for guix-patches@gnu.org; Wed, 02 Oct 2019 10:49:01 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1iFfw5-000833-RE for guix-patches@gnu.org; Wed, 02 Oct 2019 10:49:01 -0400 Subject: [bug#36477] [PATCH v4 18/23] gexp: Use cross extensions when cross-compiling. Resent-Message-ID: MIME-Version: 1.0 References: <20191002095904.6325-1-m.othacehe@gmail.com> <20191002095904.6325-19-m.othacehe@gmail.com> In-Reply-To: <20191002095904.6325-19-m.othacehe@gmail.com> From: Mathieu Othacehe Date: Wed, 2 Oct 2019 16:47:46 +0200 Message-ID: Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: quoted-printable List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: 36477@debbugs.gnu.org I forget the commit message. It would be: * guix/gexp.scm (load-path-expression): Use ungexp-splicing instead of ungexp-native-splicing so that the cross modules are used when target is set. Mathieu Le mer. 2 oct. 2019 =C3=A0 11:59, Mathieu Othacehe a= =C3=A9crit : > > --- > guix/gexp.scm | 4 ++-- > 1 file changed, 2 insertions(+), 2 deletions(-) > > diff --git a/guix/gexp.scm b/guix/gexp.scm > index d9bdde2e42..514422cb08 100644 > --- a/guix/gexp.scm > +++ b/guix/gexp.scm > @@ -1513,7 +1513,7 @@ are searched for in PATH. Return #f when MODULES a= nd EXTENSIONS are empty." > (string-append extension > "/share/gu= ile/site/" > (effective= -version))) > - '((ungexp-native-splicing e= xtensions))) > + '((ungexp-splicing extensio= ns))) > %load-path))) > (set! %load-compiled-path > (cons (ungexp compiled) > @@ -1522,7 +1522,7 @@ are searched for in PATH. Return #f when MODULES a= nd EXTENSIONS are empty." > "/lib/guil= e/" > (effective= -version) > "/site-cca= che")) > - '((ungexp-native-splicing e= xtensions))) > + '((ungexp-splicing extensio= ns))) > %load-compiled-path))))))))) > > (define* (gexp->script name exp > -- > 2.23.0 >