Subject: Please add support for new architecture "riscv64" (RISC-V 64 bits little-endian)
From: "Manuel A. Fernandez Montecelo" <[email-masked]>
To: [email-masked]
Date: Fri, 16 Mar 2018 00:25:38 +0100
List-Id: <debbugs-submit.debbugs.gnu.org>

Hello,

Please add support for this architecture, simple patch attached (based
on guile-2.0, the most popular version in Debian).

The change is simply to add "riscv64" in the following location, the
arch name seems to be missing in:

  http://git.savannah.gnu.org/cgit/guile.git/tree/module/system/base/target.scm#n74

Since it ends in -64, the pointer size should be detected correctly in
the current code.

I compiled this and ran the test suite successfully:

Totals for this test run:
passes:                 40317
failures:               0
unexpected passes:      0
expected failures:      9
unresolved test cases:  571
untested test cases:    1
unsupported test cases: 10
errors:                 0

If there's anything missing, please let me know.

Cheers.
-- 
Manuel A. Fernandez Montecelo <[email-masked]>
Index: guile-2.0-2.0.13+1/module/system/base/target.scm
===================================================================
--- guile-2.0-2.0.13+1.orig/module/system/base/target.scm
+++ guile-2.0-2.0.13+1/module/system/base/target.scm
@@ -65,7 +65,7 @@
       (cond ((string-match "^i[0-9]86$" cpu)
              (endianness little))
             ((member cpu '("x86_64" "ia64"
-                           "powerpcle" "powerpc64le" "mipsel" "mips64el" "nios2" "sh4" "alpha"))
+                           "powerpcle" "powerpc64le" "mipsel" "mips64el" "nios2" "sh4" "alpha" "riscv64"))
              (endianness little))
             ((member cpu '("sparc" "sparc64" "powerpc" "powerpc64" "spu"
                            "mips" "mips64" "m68k" "s390x"))