paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 05:39:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* changed var-parameter of secondpass() into a value parameter: secondpass

Browse Source 
should never change any nodes, and this allows passing properties to
    secondpass

git-svn-id: branches/jvmbackend@18673 -
This commit is contained in:
Jonas Maebe 2011-08-20 08:23:22 +00:00
parent 40cf2cefa0
commit b52dcd4a56
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/pass_2.pas
View File

@ -46,7 +46,7 @@ uses
{ produces the actual code } { produces the actual code }
function do_secondpass(var p : tnode) : boolean; function do_secondpass(var p : tnode) : boolean;
procedure secondpass(var p : tnode); procedure secondpass(p : tnode);
implementation implementation
@ -168,7 +168,7 @@ implementation
end; end;
{$endif EXTDEBUG} {$endif EXTDEBUG}
procedure secondpass(var p : tnode); procedure secondpass(p : tnode);
var var
oldcodegenerror : boolean; oldcodegenerror : boolean;
oldlocalswitches : tlocalswitches; oldlocalswitches : tlocalswitches;