paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 20:49:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

* add alignment for .lcomm data in AIX, required for int64 data put in bss

Browse Source 
in case it's passed to interlocked* (requires 8 byte alignment, default
    is 4). Supported in AIX 5.3 and later
    (http://www-01.ibm.com/support/docview.wss?uid=isg1IY90802) and
    GNU binutils 2.24 or later

git-svn-id: trunk@28252 -
This commit is contained in:
Jonas Maebe 2014-07-23 14:06:09 +00:00
parent 2c7a1b4e91
commit 5836478bce
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/aggas.pas
View File

@ -843,7 +843,8 @@ implementation
asmwrite(ReplaceForbiddenAsmSymbolChars(tai_datablock(hp).sym.name)); asmwrite(ReplaceForbiddenAsmSymbolChars(tai_datablock(hp).sym.name));
asmwrite(','); asmwrite(',');
asmwrite(tostr(tai_datablock(hp).size)+','); asmwrite(tostr(tai_datablock(hp).size)+',');
asmwrite('_data.bss_'); asmwrite('_data.bss_,');
asmwriteln(tostr(last_align));
end; end;
end end
else else