diff options
author | florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2006-05-06 22:52:13 +0000 |
---|---|---|
committer | florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2006-05-06 22:52:13 +0000 |
commit | 9a52f5c5ebc30c2ddec97129ca33072ffc9dc49a (patch) | |
tree | 17ba5557dc2bd4ae7f91671c02b5ee8fe5571ea9 /compiler/symdef.pas | |
parent | 939a11fce05fedcc76a3c5b3777990e47a0362e1 (diff) | |
download | fpc-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.pas | 6 |
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; |