Преглед изворни кода

* disable inline if with is used

git-svn-id: branches/fixes_2_0@3815 -
peter пре 19 година
родитељ
комит
f0c938083a
1 измењених фајлова са 3 додато и 0 уклоњено
  1. 3 0
      compiler/nmem.pas

+ 3 - 0
compiler/nmem.pas

@@ -914,6 +914,9 @@ implementation
 
         if assigned(left) then
           resulttypepass(left);
+
+        { disable inline }
+        exclude(current_procinfo.procdef.procoptions,po_inline);
       end;