Browse Source

* disable inline if with is used

git-svn-id: branches/fixes_2_0@3815 -
peter 19 năm trước cách đây
mục cha
commit
f0c938083a
1 tập tin đã thay đổi với 3 bổ sung0 xóa
  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;