From dbbd22cad449d24804763dd743c1554ed62c1a90 Mon Sep 17 00:00:00 2001
From: Gregory Haberek <ghaberek@gmail.com>
Date: Sat, 31 Aug 2024 18:09:19 -0400
Subject: [PATCH] Add missing ARM64 conditions

---
 include/std/fenv.e  | 2 +-
 source/be_machine.c | 2 ++
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/include/std/fenv.e b/include/std/fenv.e
index 6b7d2081e..1d6ba89df 100644
--- a/include/std/fenv.e
+++ b/include/std/fenv.e
@@ -28,7 +28,7 @@ public constant FE_INEXACT = 'e',
 	 FE_INVALID   = 'i',
 	 FE_ALL_EXCEPT = "eiouz"
 
-ifdef ARM then
+ifdef ARM or ARM64 then
         type enum c_fe by *2
                 C_FE_INVALID = 1,
                 C_FE_DIVBYZERO = 2,
diff --git a/source/be_machine.c b/source/be_machine.c
index 8bd2bd3c8..9212064ff 100644
--- a/source/be_machine.c
+++ b/source/be_machine.c
@@ -3399,6 +3399,8 @@ object machine(object opcode, object x)
                     s1_ptr s = NewS1(2);
                 #if (__ia64__) || (_IA64) || (__IA64__) || (__amd64__)
                     s->base[1] = NewString("X86_64");
+                #elif __aarch64__
+                    s->base[1] = NewString("ARM64");
                 #elif __i386__
                     s->base[1] = NewString("X86");
                 #elif __arm__