Define more arm variants: {le,be} x {32,64}.

diff --git a/src/compiler/base/fasdump.scm b/src/compiler/base/fasdump.scm
index dceb63f5afb7f6483c5d4fb7e6a5f4dcdc6c7f50..2dff5d1b7eec8c774f6820cc2cb7449f660f4931 100644 (file)
--- a/src/compiler/base/fasdump.scm
+++ b/src/compiler/base/fasdump.scm
@@ -218,7 +218,10 @@ USA.
 (define fasdump-format:alpha    (make-std64le-fasdump-format 18))
 (define fasdump-format:ppc32    (make-std32be-fasdump-format 20))
 (define fasdump-format:amd64    (make-std64le-fasdump-format 21))
-(define fasdump-format:arm32    (make-std32le-fasdump-format 24))
+(define fasdump-format:arm32le  (make-std32le-fasdump-format 24))
+(define fasdump-format:arm32be  (make-std32le-fasdump-format 24))
+(define fasdump-format:aarch64le (make-std64le-fasdump-format 25))
+(define fasdump-format:aarch64be (make-std64be-fasdump-format 25))
 
 #;
 (define fasdump-format:pdp10