Browse Source

* unroll more aggressively

git-svn-id: trunk@38686 -
florian 7 years ago
parent
commit
fff6e0ecdb
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/optloop.pas

+ 1 - 1
compiler/optloop.pas

@@ -126,7 +126,7 @@ unit optloop;
                   multiply unroll by two here because we can get rid
                   multiply unroll by two here because we can get rid
                   of the counter variable completely and replace it by a constant
                   of the counter variable completely and replace it by a constant
                   if unrolls=counts }
                   if unrolls=counts }
-                if unrolls*2>counts then
+                if unrolls*2>=counts then
                   unrolls:=counts;
                   unrolls:=counts;
 
 
                 { create block statement }
                 { create block statement }