Преглед изворни кода

* simplify body of for loop before unrolling

git-svn-id: trunk@25246 -
florian пре 12 година
родитељ
комит
cfcb4cab26
1 измењених фајлова са 3 додато и 0 уклоњено
  1. 3 0
      compiler/nflw.pas

+ 3 - 0
compiler/nflw.pas

@@ -1476,6 +1476,9 @@ implementation
          { loop unrolling }
          if cs_opt_loopunroll in current_settings.optimizerswitches then
            begin
+             res:=t2.simplify(false);
+             if assigned(res) then
+               t2:=res;
              res:=unroll_loop(self);
              if assigned(res) then
                begin