Explorar o código

Merged revisions 699 via svnmerge from
/trunk

git-svn-id: branches/fixes_2_0@723 -

peter %!s(int64=20) %!d(string=hai) anos
pai
achega
4348e80c10
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/ncal.pas

+ 1 - 1
compiler/ncal.pas

@@ -2236,7 +2236,7 @@ type
           addstatement(createstatement,funcretnode.getcopy);
         { consider it must not be inlined if called
           again inside the args or itself }
-        procdefinition.proccalloption:=pocall_default;
+        exclude(procdefinition.procoptions,po_inline);
         firstpass(createblock);
         include(procdefinition.procoptions,po_inline);
         { return inlined block }