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

+ take care of addn and subn in is_loop_invariant

git-svn-id: trunk@44251 -
florian преди 5 години
родител
ревизия
507fc9c1ff
променени са 1 файла, в които са добавени 2 реда и са изтрити 0 реда
  1. 2 0
      compiler/optloop.pas

+ 2 - 0
compiler/optloop.pas

@@ -275,6 +275,8 @@ unit optloop;
             end;
           typeconvn:
             result:=is_loop_invariant(loop,ttypeconvnode(expr).left);
+          addn,subn:
+            result:=is_loop_invariant(loop,taddnode(expr).left) and is_loop_invariant(loop,taddnode(expr).right);
           else
             ;
         end;