Sfoglia il codice sorgente

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

git-svn-id: trunk@22076 -
florian 13 anni fa
parent
commit
bd47ba6ba4
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      compiler/ncal.pas

+ 1 - 1
compiler/ncal.pas

@@ -3874,7 +3874,7 @@ implementation
         paraaddr: taddrnode;
       begin
         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(inlinecleanupstatement,ctempdeletenode.create(tempnode));
         { inherit addr_taken flag }