From a8e2cc86e9844076b91bda44cdf07dd95ddc7dbb Mon Sep 17 00:00:00 2001 From: "Jan (janneke) Nieuwenhuizen" Date: Sat, 14 Nov 2020 15:02:06 +0100 Subject: [PATCH] ARM: Revert to 4 byte types only. * module/mescc/armv4/info.scm (armv4:type-alist): Use size 4 for long longs too. --- module/mescc/armv4/info.scm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/module/mescc/armv4/info.scm b/module/mescc/armv4/info.scm index 6be9a9bb..2ba76b3a 100644 --- a/module/mescc/armv4/info.scm +++ b/module/mescc/armv4/info.scm @@ -39,8 +39,8 @@ ("long" . ,(make-type 'signed 4 #f)) ("default" . ,(make-type 'signed 4 #f)) ("*" . ,(make-type 'unsigned 4 #f)) - ("long long" . ,(make-type 'signed 8 #f)) - ("long long int" . ,(make-type 'signed 8 #f)) + ("long long" . ,(make-type 'signed 4 #f)) + ("long long int" . ,(make-type 'signed 4 #f)) ("void" . ,(make-type 'void 1 #f)) ("signed char" . ,(make-type 'signed 1 #f)) @@ -50,8 +50,8 @@ ("unsigned int" . ,(make-type 'unsigned 4 #f)) ("unsigned long" . ,(make-type 'unsigned 4 #f)) - ("unsigned long long" . ,(make-type 'unsigned 8 #f)) - ("unsigned long long int" . ,(make-type 'unsigned 8 #f)) + ("unsigned long long" . ,(make-type 'unsigned 4 #f)) + ("unsigned long long int" . ,(make-type 'unsigned 4 #f)) ("float" . ,(make-type 'float 4 #f)) ("double" . ,(make-type 'float 4 #f)) ; FIXME