[PATCH] mescc: Make -m64 work again.

[W. J. van der Laan]

* module/mescc/mescc.scm (arch-get-machine): Make that -m64 on the command

line, which sets machine to "64", returns "64" and not "32".

---

module/mescc/mescc.scm | 2 +-

1 file changed, 1 insertion(+), 1 deletion(-)

This problem was introduced in commit 3a5a7d1e560afcddf2b3fbd65cb7e29afdf610b9

("mescc: Support --bootstrap build on ARM.").

It exists on master as well as wip-riscv.

diff --git a/module/mescc/mescc.scm b/module/mescc/mescc.scm

index e3f8c9a82d3727344edd4d8fe42605a48b8e211b..b0e3757fe3a59bafd02f55fb0e72347910dea1a3 100644

--- a/module/mescc/mescc.scm

+++ b/module/mescc/mescc.scm

@@ -372,7 +372,7 @@

   (let* ((machine (option-ref options 'machine #f))

          (arch (option-ref options 'arch #f))

          (machine (or machine arch "32")))

-    (cond ((member machine '("riscv64" "x86_64")) "64")

+    (cond ((member machine '("64" "riscv64" "x86_64")) "64")

           ((member machine '("arm")) "32")

           (else "32"))))

--

2.27.0