paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-16 17:19:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

Handle new unaligned constant types

Browse Source 
git-svn-id: trunk@22520 -
This commit is contained in:
pierre 2012-10-02 22:30:22 +00:00
parent ae56841ee6
commit 7c1db10df9
2 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/aasmtai.pas
View File

@ -1585,11 +1585,13 @@ implementation
case consttype of
aitconst_8bit :
result:=1;
aitconst_16bit :
aitconst_16bit,aitconst_16bit_unaligned :
result:=2;
aitconst_32bit,aitconst_darwin_dwarf_delta32:
aitconst_32bit,aitconst_darwin_dwarf_delta32,
aitconst_32bit_unaligned:
result:=4;
aitconst_64bit,aitconst_darwin_dwarf_delta64:
aitconst_64bit,aitconst_darwin_dwarf_delta64,
aitconst_64bit_unaligned:
result:=8;
aitconst_secrel32_symbol,
aitconst_rva_symbol :

3
compiler/assemble.pas
View File

@ -1427,6 +1427,9 @@ Implementation
aitconst_64bit,
aitconst_32bit,
aitconst_16bit,
aitconst_64bit_unaligned,
aitconst_32bit_unaligned,
aitconst_16bit_unaligned,
aitconst_8bit :
begin
if assigned(tai_const(hp).sym) and