~ chicken-core (chicken-5) 0c1eb21002151c8ba0a3598e5eea24e4b02201cb


commit 0c1eb21002151c8ba0a3598e5eea24e4b02201cb
Author:     Mario Domenech Goulart <mario@parenteses.org>
AuthorDate: Sun Jun 24 12:02:51 2018 +0200
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Mon Jul 9 07:28:57 2018 +1200

    chicken.h: identify arm64 architectures
    
    With this change, `(machine-type)' returns "arm64" for such
    architectures.
    
    Signed-off-by: Evan Hanson <evhan@foldling.org>

diff --git a/chicken.h b/chicken.h
index b90bc3a0..1bbd1ba6 100644
--- a/chicken.h
+++ b/chicken.h
@@ -662,6 +662,8 @@ void *alloca ();
 # define C_MACHINE_TYPE "ia64"
 #elif defined(__x86_64__)
 # define C_MACHINE_TYPE "x86-64"
+#elif defined(__arm64__) || defined(__aarch64__)
+# define C_MACHINE_TYPE "arm64"
 #elif defined(__arm__)
 # define C_MACHINE_TYPE "arm"
 #else
Trap