From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:470:142:3::10]:48042) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1hxsro-0007B4-LH for guix-patches@gnu.org; Wed, 14 Aug 2019 08:59:05 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1hxsrn-0004PE-MZ for guix-patches@gnu.org; Wed, 14 Aug 2019 08:59:04 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:40183) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1hxsrn-0004PA-Jb for guix-patches@gnu.org; Wed, 14 Aug 2019 08:59:03 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1hxsrn-00048u-HC for guix-patches@gnu.org; Wed, 14 Aug 2019 08:59:03 -0400 Subject: [bug#37026] [PATCH] packages: Apply target triplet in bag-transitive-host-inputs. Resent-Message-ID: Received: from eggs.gnu.org ([2001:470:142:3::10]:47901) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1hxsqn-0006JO-EQ for guix-patches@gnu.org; Wed, 14 Aug 2019 08:58:02 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1hxsqm-0003Oj-5o for guix-patches@gnu.org; Wed, 14 Aug 2019 08:58:01 -0400 Received: from mail-qt1-x841.google.com ([2607:f8b0:4864:20::841]:40750) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1hxsql-0003OL-MB for guix-patches@gnu.org; Wed, 14 Aug 2019 08:58:00 -0400 Received: by mail-qt1-x841.google.com with SMTP id e8so9432011qtp.7 for ; Wed, 14 Aug 2019 05:57:58 -0700 (PDT) From: David Thompson Date: Wed, 14 Aug 2019 08:57:55 -0400 Message-Id: <20190814125755.18360-1-dthompson2@worcester.edu> 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: 37026@debbugs.gnu.org Fixes a bug where propagated inputs that should be cross-compiled are instead 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." (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)))) (define (bag-transitive-target-inputs bag) "Return the \"target inputs\" of BAG, recursively." -- 2.17.1