summaryrefslogtreecommitdiff
path: root/compiler/symdef.pas
diff options
context:
space:
mode:
authorflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2006-05-06 22:52:13 +0000
committerflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2006-05-06 22:52:13 +0000
commit9a52f5c5ebc30c2ddec97129ca33072ffc9dc49a (patch)
tree17ba5557dc2bd4ae7f91671c02b5ee8fe5571ea9 /compiler/symdef.pas
parent939a11fce05fedcc76a3c5b3777990e47a0362e1 (diff)
downloadfpc-9a52f5c5ebc30c2ddec97129ca33072ffc9dc49a.tar.gz
* variant size must be 24 bytes on 64 bit platforms
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@3441 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/symdef.pas')
-rw-r--r--compiler/symdef.pas6
1 files changed, 5 insertions, 1 deletions
diff --git a/compiler/symdef.pas b/compiler/symdef.pas
index 0c43f86e09..f33a7439e2 100644
--- a/compiler/symdef.pas
+++ b/compiler/symdef.pas
@@ -2055,7 +2055,11 @@ implementation
procedure tvariantdef.setsize;
begin
- savesize:=16;
+{$ifdef cpu64bit}
+ savesize:=24;
+{$else cpu64bit}
+ savesize:=16;
+{$endif cpu64bit}
end;