Bläddra i källkod

* take care of for loop counter read after loop

git-svn-id: trunk@44042 -
florian 5 år sedan
förälder
incheckning
3c18dee694
1 ändrade filer med 3 tillägg och 1 borttagningar
  1. 3 1
      compiler/optdfa.pas

+ 3 - 1
compiler/optdfa.pas

@@ -332,7 +332,9 @@ unit optdfa;
                   begin
                   begin
                     { if yes, then we should warn }
                     { if yes, then we should warn }
                     { !!!!!! }
                     { !!!!!! }
-                  end;
+                  end
+                else
+                  Include(tfornode(node).loopflags,lnf_dont_mind_loopvar_on_exit);
 
 
                 { first update the dummy node }
                 { first update the dummy node }