Преглед на файлове

* 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;