From debbugs-submit-bounces@debbugs.gnu.org Fri Aug 23 17:31:18 2019 Received: (at 37026) by debbugs.gnu.org; 23 Aug 2019 21:31:18 +0000 Received: from localhost ([127.0.0.1]:41338 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1i1H9R-0003yz-Ro for submit@debbugs.gnu.org; Fri, 23 Aug 2019 17:31:18 -0400 Received: from eggs.gnu.org ([209.51.188.92]:55160) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1i1H9Q-0003ym-4L for 37026@debbugs.gnu.org; Fri, 23 Aug 2019 17:31:16 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:51409) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1i1H9K-0006DP-Rq; Fri, 23 Aug 2019 17:31:10 -0400 Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=53144 helo=ribbon) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1i1H9K-0001x1-CG; Fri, 23 Aug 2019 17:31:10 -0400 From: =?utf-8?Q?Ludovic_Court=C3=A8s?= To: David Thompson Subject: Re: [bug#37026] [PATCH] packages: Apply target triplet in bag-transitive-host-inputs. References: <20190814125755.18360-1-dthompson2@worcester.edu> Date: Fri, 23 Aug 2019 23:31:08 +0200 In-Reply-To: <20190814125755.18360-1-dthompson2@worcester.edu> (David Thompson's message of "Wed, 14 Aug 2019 08:57:55 -0400") Message-ID: <87r25bzi03.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.2 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: 37026 Cc: 37026@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) Hello, David Thompson skribis: > Fixes a bug where propagated inputs that should be cross-compiled are ins= tead > compiled for the host system. > > * guix/packages.scm (bag-transitive-host-inputs): Call transitive-inputs = in > the context of the bag's target system triplet. > --- > guix/packages.scm | 3 ++- > 1 file changed, 2 insertions(+), 1 deletion(-) > > diff --git a/guix/packages.scm b/guix/packages.scm > index c94a651f27..143417b861 100644 > --- a/guix/packages.scm > +++ b/guix/packages.scm > @@ -796,7 +796,8 @@ dependencies are known to build on SYSTEM." >=20=20 > (define (bag-transitive-host-inputs bag) > "Same as 'package-transitive-target-inputs', but applied to a bag." > - (transitive-inputs (bag-host-inputs bag))) > + (parameterize ((%current-target-system (bag-target bag))) > + (transitive-inputs (bag-host-inputs bag)))) Good catch, please push! Thanks, Ludo=E2=80=99.