From patchwork Tue Mar 16 06:44:55 2021 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Patchwork-Submitter: Christopher Marusich X-Patchwork-Id: 27864 Return-Path: X-Original-To: patchwork@mira.cbaines.net Delivered-To: patchwork@mira.cbaines.net Received: by mira.cbaines.net (Postfix, from userid 113) id 8FF4D27BC52; Tue, 16 Mar 2021 06:47:15 +0000 (GMT) X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on mira.cbaines.net X-Spam-Level: X-Spam-Status: No, score=-2.8 required=5.0 tests=BAYES_00,DKIM_ADSP_CUSTOM_MED, DKIM_SIGNED,FREEMAIL_FROM,MAILING_LIST_MULTI,RCVD_IN_MSPIKE_H3, RCVD_IN_MSPIKE_WL,SPF_HELO_PASS,T_DKIM_INVALID,URIBL_BLOCKED autolearn=unavailable autolearn_force=no version=3.4.2 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) by mira.cbaines.net (Postfix) with ESMTPS id 6C8B927BC55 for ; Tue, 16 Mar 2021 06:47:13 +0000 (GMT) Received: from localhost ([::1]:52832 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1lM3U0-0002KA-Ee for patchwork@mira.cbaines.net; Tue, 16 Mar 2021 02:47:12 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:49314) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lM3Tq-0002Jb-Ro for guix-patches@gnu.org; Tue, 16 Mar 2021 02:47:02 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:54572) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1lM3Tq-0004uo-KZ for guix-patches@gnu.org; Tue, 16 Mar 2021 02:47:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1lM3Tq-0001aJ-J0 for guix-patches@gnu.org; Tue, 16 Mar 2021 02:47:02 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#47182] [PATCH 02/18] utils: Add target-powerpc? procedure. Resent-From: Chris Marusich Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Tue, 16 Mar 2021 06:47:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 47182 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 47182@debbugs.gnu.org Cc: Chris Marusich Received: via spool by 47182-submit@debbugs.gnu.org id=B47182.16158772216072 (code B ref 47182); Tue, 16 Mar 2021 06:47:02 +0000 Received: (at 47182) by debbugs.gnu.org; 16 Mar 2021 06:47:01 +0000 Received: from localhost ([127.0.0.1]:37881 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lM3Tn-0001Zd-DW for submit@debbugs.gnu.org; Tue, 16 Mar 2021 02:47:01 -0400 Received: from mail-pj1-f48.google.com ([209.85.216.48]:41909) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lM3Tl-0001ZJ-Qo for 47182@debbugs.gnu.org; Tue, 16 Mar 2021 02:46:58 -0400 Received: by mail-pj1-f48.google.com with SMTP id nh23-20020a17090b3657b02900c0d5e235a8so928468pjb.0 for <47182@debbugs.gnu.org>; Mon, 15 Mar 2021 23:46:57 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=from:to:cc:subject:date:message-id:in-reply-to:references :mime-version:content-transfer-encoding; bh=5qkcOkMJKiioFFX4dLG593zuTVWYfNIhaVfaXYLVlNo=; b=EU5HmfLakxNlWSQ4Ag1vXoSUczZTjpCf+l8u3aJj6q70rPvBeR7C7btyxEHsO/TQq1 WXHlnkGka1aXeEAE55DoAOdOMpSVueYl4+3Rh+2AkKLxoZlcHJ/bkbYEhHi5xgJ8vygP QWqaYYItzMVVNVdaKV3sliQo5bCDQYgGrGCqv8ajPHucuH0ludXZfiEIH2qq+9uMTDmN cKdlT+bFsym+x+S7t75z1HsfHR4ewfgPpSaT8Y+JyFQeeYc6ckhM3BEkEIhre+X1teLP cxVIB5dPgDTHhbmxcAgEGP2wSEw5CoziJROk0F0/c7Zkt0EU9QitbCYD69dQTXHo9MfV TucA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:from:to:cc:subject:date:message-id:in-reply-to :references:mime-version:content-transfer-encoding; bh=5qkcOkMJKiioFFX4dLG593zuTVWYfNIhaVfaXYLVlNo=; b=Z9YT99BSil69ZwFPYR0RXhaSgDon7Dy4yHbXG3DjR0wMAwwL5mo/14n8l9MN74LuNX 6HR9mSGnWtbIK3K65qodAaYXrMZYOo7cS166Ld9aR6C26BF8oEde/N6aqu6qPdmbxbmO pFg4pzM5e8MiCK8S4nhWvXlZKe1krNpv+8UJGciJ5uRxz/PkRHd9b3QwwuOLvA3OlDQ2 ua3wFTYgawZS8tdefoYBStQg9G1AhU8VIxNm7Wk7IVIrhGMMeFfwGaoOhrJO6UbLZPxl jxusTISBqBuoX3WM+YYARGGrhGRODiAwBWehzt8e6BQLHIaJM6AtCbCPPoO/YLJEJmIQ J/sA== X-Gm-Message-State: AOAM530ks81pX5NUWrPBaUmHDst4GP6mKKVBTCjwN76iov8SiVJo922D JQPV+5aQna/miWArOkuYS5QdtT6FpsBc0Q== X-Google-Smtp-Source: ABdhPJxSAmS3+cPRGhAAbp2sKonZ1zZZokyzZtyGHhQoYORfyZqkscRFdMbHAtJBhaJBl8oKjQhu6A== X-Received: by 2002:a17:90a:7786:: with SMTP id v6mr3320649pjk.16.1615877211700; Mon, 15 Mar 2021 23:46:51 -0700 (PDT) Received: from garuda-lan.lan (c-24-18-44-142.hsd1.wa.comcast.net. [24.18.44.142]) by smtp.gmail.com with ESMTPSA id r186sm15541160pfr.124.2021.03.15.23.46.50 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Mon, 15 Mar 2021 23:46:51 -0700 (PDT) From: Chris Marusich Date: Mon, 15 Mar 2021 23:44:55 -0700 Message-Id: <20210316064511.2891553-2-cmmarusich@gmail.com> X-Mailer: git-send-email 2.30.2 In-Reply-To: <20210316064511.2891553-1-cmmarusich@gmail.com> References: <20210316062805.2890883-1-cmmarusich@gmail.com> <20210316064511.2891553-1-cmmarusich@gmail.com> MIME-Version: 1.0 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org Sender: "Guix-patches" X-getmail-retrieved-from-mailbox: Patches * guix/utils.scm (target-powerpc?): New exported procedure. --- guix/utils.scm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/guix/utils.scm b/guix/utils.scm index 21e3460b2c7..fc57620319e 100644 --- a/guix/utils.scm +++ b/guix/utils.scm @@ -9,6 +9,7 @@ ;;; Copyright © 2018, 2020 Marius Bakke ;;; Copyright © 2020 Efraim Flashner ;;; Copyright © 2021 Simon Tournier +;;; Copyright © 2021 Chris Marusich ;;; ;;; This file is part of GNU Guix. ;;; @@ -79,6 +80,7 @@ target-arm32? target-aarch64? target-arm? + target-powerpc? target-64bit? cc-for-target cxx-for-target @@ -541,6 +543,10 @@ a character other than '@'." (%current-system)))) (or (target-arm32? target) (target-aarch64? target))) +(define* (target-powerpc? #:optional (target (or (%current-target-system) + (%current-system)))) + (string-prefix? "powerpc" target)) + (define* (target-64bit? #:optional (system (or (%current-target-system) (%current-system)))) (any (cut string-prefix? <> system) '("x86_64" "aarch64" "mips64" "ppc64")))