From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: James Clarke Newsgroups: gmane.lisp.guile.bugs Subject: bug#24180: [PATCH] Recognize alpha as compilation target Date: Sun, 7 Aug 2016 21:24:22 +0100 Message-ID: <20160807202422.70165-1-jrtc27@jrtc27.com> NNTP-Posting-Host: blaine.gmane.org X-Trace: blaine.gmane.org 1470609265 4149 195.159.176.226 (7 Aug 2016 22:34:25 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Sun, 7 Aug 2016 22:34:25 +0000 (UTC) Cc: James Clarke To: 24180@debbugs.gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Mon Aug 08 00:34:21 2016 Return-path: Envelope-to: guile-bugs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bWWeB-0000L7-EF for guile-bugs@m.gmane.org; Mon, 08 Aug 2016 00:34:19 +0200 Original-Received: from localhost ([::1]:54072 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bWWe7-0007p2-TH for guile-bugs@m.gmane.org; Sun, 07 Aug 2016 18:34:15 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:49870) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bWWe1-0007ow-3H for bug-guile@gnu.org; Sun, 07 Aug 2016 18:34:10 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bWWdw-0002Ax-3G for bug-guile@gnu.org; Sun, 07 Aug 2016 18:34:08 -0400 Original-Received: from debbugs.gnu.org ([208.118.235.43]:33785) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bWWdu-0002At-Sx for bug-guile@gnu.org; Sun, 07 Aug 2016 18:34:04 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1bWWdu-0003mY-GB for bug-guile@gnu.org; Sun, 07 Aug 2016 18:34:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: James Clarke Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Sun, 07 Aug 2016 22:34:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 24180 X-GNU-PR-Package: guile X-GNU-PR-Keywords: patch X-Debbugs-Original-To: bug-guile@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.147060919814487 (code B ref -1); Sun, 07 Aug 2016 22:34:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 7 Aug 2016 22:33:18 +0000 Original-Received: from localhost ([127.0.0.1]:59315 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bWWdB-0003la-G0 for submit@debbugs.gnu.org; Sun, 07 Aug 2016 18:33:17 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:43203) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bWUcm-0007cn-MY for submit@debbugs.gnu.org; Sun, 07 Aug 2016 16:24:45 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bWUcg-0001PH-OX for submit@debbugs.gnu.org; Sun, 07 Aug 2016 16:24:39 -0400 Original-Received: from lists.gnu.org ([2001:4830:134:3::11]:33865) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bWUcg-0001PD-LS for submit@debbugs.gnu.org; Sun, 07 Aug 2016 16:24:38 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:34173) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bWUcf-0004iw-Ix for bug-guile@gnu.org; Sun, 07 Aug 2016 16:24:38 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bWUcb-0001Ni-Lh for bug-guile@gnu.org; Sun, 07 Aug 2016 16:24:36 -0400 Original-Received: from mail-wm0-x243.google.com ([2a00:1450:400c:c09::243]:34302) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bWUcb-0001NF-EM for bug-guile@gnu.org; Sun, 07 Aug 2016 16:24:33 -0400 Original-Received: by mail-wm0-x243.google.com with SMTP id q128so12095665wma.1 for ; Sun, 07 Aug 2016 13:24:32 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=jrtc27.com; s=google; h=from:to:cc:subject:date:message-id; bh=cWtoxArwiXd8anszycWGmdTrzzsNUNgZV3QageMVtRE=; b=OfubOdOwa5NwIdHZ+oNArFvK+L01ymyxpwVdDf7GJGzw7BImva8SOdBkwq6zkJz8r0 h4BwHSXuDHbee4FhPVtug3ZPT1mujhjoP/vkEXiWrzcxM4vwZ2ie6qASIElPrwldePsL bVl0DzWLmsMAd7zZVWbMfzChyIJi3JZEvjMec= X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20130820; h=x-gm-message-state:from:to:cc:subject:date:message-id; bh=cWtoxArwiXd8anszycWGmdTrzzsNUNgZV3QageMVtRE=; b=iYebw9b/E31evsOIwS4NMhdFdWe4/i7Ofv5TmCIXVjBQM+HhVUs4oSBNYuXHiDOU1a SXUfQj6jsHeqqvfWcKV3/OCyka6vun7w2l1NPOehT6QdWk7HhrdoO0Q70J6k4vUl4Yap dZGZqAIwRf8LPKoEjf3nsaeprGoW2+mBK8Pk8CKgXpvfo/5gGxecsdvpBIR/USRErOgX QCWbjrQNuP8tOp9E/AmXfzFuDvS4ldNUDsJVZXCes85JyuL22W4ZaJHB4mid5IMtl94F JcKgqvvpthfDo7fB5Oz+c2EiSSMZl2ElXlsce3t7yus2UoKzuwYrGKptnjTDadXMaYpJ lfkQ== X-Gm-Message-State: AEkoouve3muMJfKHbmSAAFSDGg9HZZ07mH+U1EkNGs0Wzd1+WeKv3fqS8Iikyn+suKBXRQ== X-Received: by 10.194.70.68 with SMTP id k4mr92698986wju.59.1470601471179; Sun, 07 Aug 2016 13:24:31 -0700 (PDT) Original-Received: from Jamess-MacBook.local (global-184-8.nat-1.net.cam.ac.uk. [131.111.184.8]) by smtp.gmail.com with ESMTPSA id ub8sm29300717wjc.39.2016.08.07.13.24.30 (version=TLS1_2 cipher=ECDHE-RSA-CHACHA20-POLY1305 bits=256/256); Sun, 07 Aug 2016 13:24:30 -0700 (PDT) Original-Received: by Jamess-MacBook.local (Postfix, from userid 501) id 6C470421AB9D; Sun, 7 Aug 2016 21:24:28 +0100 (BST) X-Mailer: git-send-email 2.9.1 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Mailman-Approved-At: Sun, 07 Aug 2016 18:33:16 -0400 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.43 X-BeenThere: bug-guile@gnu.org List-Id: "Bug reports for GUILE, GNU's Ubiquitous Extension Language" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Original-Sender: "bug-guile" Xref: news.gmane.org gmane.lisp.guile.bugs:8358 Archived-At: * module/system/base/target.scm (cpu-endianness): Add case for "alpha". (triplet-pointer-size): Likewise. --- module/system/base/target.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/module/system/base/target.scm b/module/system/base/target.scm index d1f6cff..02febf8 100644 --- a/module/system/base/target.scm +++ b/module/system/base/target.scm @@ -63,7 +63,7 @@ (cond ((string-match "^i[0-9]86$" cpu) (endianness little)) ((member cpu '("x86_64" "ia64" - "powerpcle" "powerpc64le" "mipsel" "mips64el" "nios2" "sh4")) + "powerpcle" "powerpc64le" "mipsel" "mips64el" "nios2" "sh4" "alpha")) (endianness little)) ((member cpu '("sparc" "sparc64" "powerpc" "powerpc64" "spu" "mips" "mips64" "m68k" "s390x")) @@ -103,7 +103,7 @@ ((string-match "64$" cpu) 8) ((string-match "64_?[lbe][lbe]$" cpu) 8) ((member cpu '("sparc" "powerpc" "mips" "mipsel" "nios2" "m68k" "sh4")) 4) - ((member cpu '("s390x")) 8) + ((member cpu '("s390x" "alpha")) 8) ((string-match "^arm.*" cpu) 4) (else (error "unknown CPU word size" cpu))))) -- 2.9.1