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

* remove firstpasscount

Browse Source 
git-svn-id: trunk@8656 -
This commit is contained in:
peter 2007-09-26 21:13:32 +00:00
parent 6b8aed593f
commit 4492ee39c5
1 changed files with 0 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
compiler/node.pas
View File

@ -295,10 +295,6 @@ interface
fileinfo : tfileposinfo; fileinfo : tfileposinfo;
localswitches : tlocalswitches; localswitches : tlocalswitches;
optinfo : poptinfo; optinfo : poptinfo;
{$ifdef extdebug}
maxfirstpasscount,
firstpasscount : longint;
{$endif extdebug}
constructor create(t:tnodetype); constructor create(t:tnodetype);
{ this constructor is only for creating copies of class } { this constructor is only for creating copies of class }
{ the fields are copied by getcopy } { the fields are copied by getcopy }
@ -688,10 +684,6 @@ implementation
fileinfo:=current_filepos; fileinfo:=current_filepos;
localswitches:=current_settings.localswitches; localswitches:=current_settings.localswitches;
resultdef:=nil; resultdef:=nil;
{$ifdef EXTDEBUG}
maxfirstpasscount:=0;
firstpasscount:=0;
{$endif EXTDEBUG}
flags:=[]; flags:=[];
ppuidx:=-1; ppuidx:=-1;
end; end;
@ -715,10 +707,6 @@ implementation
expectloc:=LOC_INVALID; expectloc:=LOC_INVALID;
{ updated by secondpass } { updated by secondpass }
location.loc:=LOC_INVALID; location.loc:=LOC_INVALID;
{$ifdef EXTDEBUG}
maxfirstpasscount:=0;
firstpasscount:=0;
{$endif EXTDEBUG}
ppuidx:=-1; ppuidx:=-1;
end; end;
@ -767,10 +755,6 @@ implementation
destructor tnode.destroy; destructor tnode.destroy;
begin begin
{$ifdef EXTDEBUG}
if firstpasscount>maxfirstpasscount then
maxfirstpasscount:=firstpasscount;
{$endif EXTDEBUG}
if assigned(optinfo) then if assigned(optinfo) then
dispose(optinfo); dispose(optinfo);
end; end;
@ -882,9 +866,6 @@ implementation
p.resultdef:=resultdef; p.resultdef:=resultdef;
p.fileinfo:=fileinfo; p.fileinfo:=fileinfo;
p.localswitches:=localswitches; p.localswitches:=localswitches;
{$ifdef extdebug}
p.firstpasscount:=firstpasscount;
{$endif extdebug}
{ p.list:=list; } { p.list:=list; }
result:=p; result:=p;
end; end;