paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 15:49:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed inlining of functions called in their own parameters (tw1623)

Browse Source 
git-svn-id: trunk@5389 -
This commit is contained in:
Jonas Maebe 2006-11-15 09:56:11 +00:00
parent 63a162ac83
commit 248046320a
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/ncal.pas
View File

@ -2348,7 +2348,12 @@ implementation
n := para.left.getcopy;
para.left.free;
para.left := n;
firstpass(para.left);
{ not pass_1, because if that para is a function call to }
{ this same function, then it will be inlined again since }
{ po_inline is not yet unset (since set_resulttype needs }
{ it to determine whether the resulttype location may be }
{ changed) }
typecheckpass(para.left);
{ create temps for value parameters, function result and also for }
{ const parameters which are passed by value instead of by reference }