Subject: bug#48816: closed (Re: guile: Add ARC support)

From: [email-masked] (GNU bug Tracking System)
Date: Wed, 03 Nov 2021 18:21:01 +0000

Your bug report

#48816: guile: Add ARC support

which was filed against the guile package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
48816: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=48816
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: guile: Add ARC support
From: lloda <[email-masked]>
To: [email-masked]
Date: Wed, 3 Nov 2021 19:20:30 +0100
List-Id: <debbugs-submit.debbugs.gnu.org>

Applied in 492bd638835c4c00623239190032770583e09714. Thanks!

Subject: guile: Add ARC support
From: Vineet Gupta <[email-masked]>
To: "[email-masked]" <[email-masked]>
Cc: Helmut Grohne <[email-masked]>, arcml <[email-masked]>, Guillem Jover <[email-masked]>
Date: Thu, 3 Jun 2021 19:35:38 +0000
List-Id: <debbugs-submit.debbugs.gnu.org>

Hi,

I'm trying to bootstrap Debian on ARC and need to add arc support in 
guile 2.x and 3.x. Patch attached.

Thx,
-Vineet
From d7229d384e503d7a3893e13e71fe0ad16c2e8003 Mon Sep 17 00:00:00 2001
From: Vineet Gupta <[email-masked]>
Date: Tue, 6 Apr 2021 15:03:07 -0700
Subject: [PATCH] add support for arc

Signed-off-by: Vineet Gupta <[email-masked]>
---
 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 2088cd86697a..8bdcd66039e4 100644
--- a/module/system/base/target.scm
+++ b/module/system/base/target.scm
@@ -77,7 +77,7 @@
       (cond ((string-match "^i[0-9]86$" cpu)
              (endianness little))
             ((member cpu '("x86_64" "ia64"
-                           "powerpcle" "powerpc64le" "mipsel" "mips64el" "nios2" "sh3" "sh4" "alpha"))
+                           "powerpcle" "powerpc64le" "mipsel" "mips64el" "nios2" "sh3" "sh4" "alpha" "arc"))
              (endianness little))
             ((member cpu '("sparc" "sparc64" "powerpc" "powerpc64" "spu"
                            "mips" "mips64" "m68k" "s390x"))
@@ -118,7 +118,7 @@
 
           ((string-match "64$" cpu) 8)
           ((string-match "64_?[lbe][lbe]$" cpu) 8)
-          ((member cpu '("sparc" "powerpc" "mips" "mipsel" "nios2" "m68k" "sh3" "sh4")) 4)
+          ((member cpu '("sparc" "powerpc" "mips" "mipsel" "nios2" "m68k" "sh3" "sh4" "arc")) 4)
           ((member cpu '("s390x" "alpha")) 8)
           ((string-match "^arm.*" cpu) 4)
           (else (error "unknown CPU word size" cpu)))))
-- 
2.25.1