* fix for the ie9999 under Linux (patch from Peter)

This commit is contained in:
Jonas Maebe 2002-04-10 08:07:55 +00:00
parent c8b3a5b3db
commit 3566880766
2 changed files with 20 additions and 14 deletions

View File

@ -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

View File

@ -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