summaryrefslogtreecommitdiff
path: root/compiler/cgutils.pas
diff options
context:
space:
mode:
authornickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2>2013-04-28 17:52:06 +0000
committernickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2>2013-04-28 17:52:06 +0000
commitfa855a370954e4537b2e98f4d4ccf11ba18d5dfd (patch)
treecd615b87df8c29149016038d1ac3c24dfe10cefa /compiler/cgutils.pas
parent2edfb4251d4ddfb2eb75d378d1c6b5fb3e66ee1e (diff)
downloadfpc-fa855a370954e4537b2e98f4d4ccf11ba18d5dfd.tar.gz
* 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: http://svn.freepascal.org/svn/fpc/trunk@24359 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/cgutils.pas')
-rw-r--r--compiler/cgutils.pas10
1 files changed, 9 insertions, 1 deletions
diff --git a/compiler/cgutils.pas b/compiler/cgutils.pas
index d15819fd66..a5fd081cc6 100644
--- a/compiler/cgutils.pas
+++ b/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,