Browse Source

* disable inline if with is used

git-svn-id: branches/fixes_2_0@3815 -
peter 19 years ago
parent
commit
f0c938083a
1 changed files with 3 additions and 0 deletions
  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;