Parcourir la source

* tlocation.value reverted back to longint on non 64-bit archs. This fixes the tset5.pp and tset5a.pp regressions on powerpc and probably other 32-bit platforms.

git-svn-id: trunk@24359 -
nickysn il y a 12 ans
Parent
commit
70649932de
1 fichiers modifiés avec 9 ajouts et 1 suppressions
  1. 9 1
      compiler/cgutils.pas

+ 9 - 1
compiler/cgutils.pas

@@ -105,7 +105,15 @@ unit cgutils;
 {$endif cpuflags}
             LOC_CONSTANT : (
               case longint of
-                1 : (value : TCGInt);
+{$ifdef cpu64bitalu}
+                1 : (value : Int64);
+{$else cpu64bitalu}
+    {$ifdef FPC_BIG_ENDIAN}
+                1 : (_valuedummy,value : longint);
+    {$else FPC_BIG_ENDIAN}
+                1 : (value : longint);
+    {$endif FPC_BIG_ENDIAN}
+{$endif cpu64bitalu}
                 2 : (value64 : Int64);
               );
             LOC_CREFERENCE,