mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-07-29 23:05:58 +02:00
* fix for the ie9999 under Linux (patch from Peter)
This commit is contained in:
parent
c8b3a5b3db
commit
3566880766
@ -1094,10 +1094,10 @@ Implementation
|
|||||||
end;
|
end;
|
||||||
ait_symbol_end :
|
ait_symbol_end :
|
||||||
begin
|
begin
|
||||||
if target_info.target=target_i386_linux then
|
if target_info.target in [target_i386_linux,target_i386_beos] then
|
||||||
begin
|
begin
|
||||||
Tai_symbol(hp).sym.size:=objectalloc.sectionsize-Tai_symbol(hp).sym.address;
|
Tai_symbol_end(hp).sym.size:=objectalloc.sectionsize-Tai_symbol_end(hp).sym.address;
|
||||||
UsedAsmSymbolListInsert(Tai_symbol(hp).sym);
|
UsedAsmSymbolListInsert(Tai_symbol_end(hp).sym);
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
ait_label :
|
ait_label :
|
||||||
@ -1581,7 +1581,10 @@ Implementation
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.32 2002-04-07 13:19:14 carl
|
Revision 1.33 2002-04-10 08:07:55 jonas
|
||||||
|
* fix for the ie9999 under Linux (patch from Peter)
|
||||||
|
|
||||||
|
Revision 1.32 2002/04/07 13:19:14 carl
|
||||||
+ more documentation
|
+ more documentation
|
||||||
|
|
||||||
Revision 1.31 2002/04/04 19:05:54 peter
|
Revision 1.31 2002/04/04 19:05:54 peter
|
||||||
|
@ -676,9 +676,9 @@ interface
|
|||||||
inc(symendcount);
|
inc(symendcount);
|
||||||
AsmWriteLn(s+':');
|
AsmWriteLn(s+':');
|
||||||
AsmWrite(#9'.size'#9);
|
AsmWrite(#9'.size'#9);
|
||||||
AsmWrite(tai_symbol(hp).sym.name);
|
AsmWrite(tai_symbol_end(hp).sym.name);
|
||||||
AsmWrite(', '+s+' - ');
|
AsmWrite(', '+s+' - ');
|
||||||
AsmWriteLn(tai_symbol(hp).sym.name);
|
AsmWriteLn(tai_symbol_end(hp).sym.name);
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
@ -966,7 +966,10 @@ initialization
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.15 2002-04-04 19:06:06 peter
|
Revision 1.16 2002-04-10 08:07:55 jonas
|
||||||
|
* fix for the ie9999 under Linux (patch from Peter)
|
||||||
|
|
||||||
|
Revision 1.15 2002/04/04 19:06:06 peter
|
||||||
* removed unused units
|
* removed unused units
|
||||||
* use tlocation.size in cg.a_*loc*() routines
|
* use tlocation.size in cg.a_*loc*() routines
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user