paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-20 19:09:39 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fix possible use of invalid tai after an ait_cutobject

Browse Source 
git-svn-id: trunk@4482 -
This commit is contained in:
peter 2006-08-20 20:25:06 +00:00
parent 2228ec7fb0
commit f668e4f012
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/i386/ag386nsm.pas
View File

@ -744,7 +744,7 @@ interface
hp:=tai(hp.next); hp:=tai(hp.next);
end; end;
if lasTSectype<>sec_none then if lasTSectype<>sec_none then
WriteSection(tai_section(hp).sectype,tai_section(hp).name^); WriteSection(lasTSectype,'');
AsmStartSize:=AsmSize; AsmStartSize:=AsmSize;
end; end;