Browse Source

* the address of complex inline parameters can be hold always in a register

git-svn-id: trunk@22076 -
florian 13 years ago
parent
commit
bd47ba6ba4
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/ncal.pas

+ 1 - 1
compiler/ncal.pas

@@ -3874,7 +3874,7 @@ implementation
         paraaddr: taddrnode;
         paraaddr: taddrnode;
       begin
       begin
         ptrtype:=getpointerdef(para.left.resultdef);
         ptrtype:=getpointerdef(para.left.resultdef);
-        tempnode := ctempcreatenode.create(ptrtype,ptrtype.size,tt_persistent,tparavarsym(para.parasym).is_regvar(true));
+        tempnode:=ctempcreatenode.create(ptrtype,ptrtype.size,tt_persistent,true);
         addstatement(inlineinitstatement,tempnode);
         addstatement(inlineinitstatement,tempnode);
         addstatement(inlinecleanupstatement,ctempdeletenode.create(tempnode));
         addstatement(inlinecleanupstatement,ctempdeletenode.create(tempnode));
         { inherit addr_taken flag }
         { inherit addr_taken flag }