paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-03 02:58:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

* integrated potype_constructor check in maybe_create_funcret_node

Browse Source 
git-svn-id: trunk@23507 -
This commit is contained in:
Jonas Maebe 2013-01-24 09:44:52 +00:00
parent 280b307068
commit 9145f1d67d
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/ncal.pas
View File

@ -2371,6 +2371,8 @@ implementation
var
temp : ttempcreatenode;
begin
if procdefinition.proctypeoption=potype_constructor then
exit;
{ For the function result we need to create a temp node for:
- Inlined functions
- Types requiring initialization/finalization
@ -3513,8 +3515,7 @@ implementation
maybe_load_in_temp(methodpointer);
{ Create destination (temp or assignment-variable reuse) for function result if it not yet set }
if (procdefinition.proctypeoption<>potype_constructor) then
maybe_create_funcret_node;
maybe_create_funcret_node;
{ Insert the self,vmt,function result in the parameters }
gen_hidden_parameters;