paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 13:06:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

* compilation on x86-64 and i8086 fixed

Browse Source 
git-svn-id: trunk@40275 -
This commit is contained in:
florian 2018-11-08 18:45:16 +00:00
parent 4d2d26c318
commit e157939b41
3 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/x86/agx86att.pas
View File

@ -179,8 +179,10 @@ interface
owner.writer.AsmWrite('@GOT'); owner.writer.AsmWrite('@GOT');
{$endif x86_64} {$endif x86_64}
end; end;
{$ifdef i386}
addr_ntpoff: addr_ntpoff:
owner.writer.AsmWrite('@ntpoff'); owner.writer.AsmWrite('@ntpoff');
{$endif i386}
end; end;
if offset<0 then if offset<0 then
@ -227,7 +229,7 @@ interface
else else
owner.writer.AsmWrite(gas_regname(o.reg)); owner.writer.AsmWrite(gas_regname(o.reg));
top_ref : top_ref :
if o.ref^.refaddr in [addr_no,addr_pic,addr_pic_no_got,addr_ntpoff] then if o.ref^.refaddr in [addr_no,addr_pic,addr_pic_no_got{$ifdef i386},addr_ntpoff{$endif i386}] then
WriteReference(o.ref^) WriteReference(o.ref^)
else else
begin begin

3
compiler/x86/cgx86.pas
View File

@ -1108,6 +1108,7 @@ unit cgx86;
with dirref do with dirref do
begin begin
{$ifdef i386}
if refaddr=addr_ntpoff then if refaddr=addr_ntpoff then
begin begin
{ Convert thread local address to a process global addres { Convert thread local address to a process global addres
@ -1138,7 +1139,7 @@ unit cgx86;
Internalerror(2018110403); Internalerror(2018110403);
end; end;
end; end;
{$endif i386}
if (base=NR_NO) and (index=NR_NO) then if (base=NR_NO) and (index=NR_NO) then
begin begin
if assigned(dirref.symbol) then if assigned(dirref.symbol) then

2
compiler/x86/nx86ld.pas
View File

@ -87,6 +87,7 @@ implementation
if (tf_section_threadvars in target_info.flags) then if (tf_section_threadvars in target_info.flags) then
begin begin
{$ifdef i386}
case target_info.system of case target_info.system of
system_i386_linux,system_i386_android: system_i386_linux,system_i386_android:
begin begin
@ -99,6 +100,7 @@ implementation
end; end;
end; end;
end; end;
{$endif i386}
end; end;
end; end;