[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] branch main updated: Add support for arc

From: Daniel Llorens
Subject: [Guile-commits] branch main updated: Add support for arc
Date: Wed, 03 Nov 2021 06:00:05 -0400

This is an automated email from the git hooks/post-receive script.

lloda pushed a commit to branch main
in repository guile.

The following commit(s) were added to refs/heads/main by this push:
     new 492bd63  Add support for arc
492bd63 is described below

commit 492bd638835c4c00623239190032770583e09714
Author: Vineet Gupta <>
AuthorDate: Tue Apr 6 15:03:07 2021 -0700

    Add support for arc
    Signed-off-by: Vineet Gupta <>
    NB: closes
 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 2088cd8..8bdcd66 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)))))

reply via email to

[Prev in Thread] Current Thread [Next in Thread]