Sfoglia il codice sorgente

* unroll more aggressively

git-svn-id: trunk@38686 -
florian 7 anni fa
parent
commit
fff6e0ecdb
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  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
                   of the counter variable completely and replace it by a constant
                   if unrolls=counts }
-                if unrolls*2>counts then
+                if unrolls*2>=counts then
                   unrolls:=counts;
 
                 { create block statement }