Browse Source

* invalid typecast

git-svn-id: trunk@8526 -
peter 18 years ago
parent
commit
e10c55d73c
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/optunrol.pas

+ 1 - 1
compiler/optunrol.pas

@@ -106,7 +106,7 @@ unit optunrol;
                 for i:=1 to unrolls do
                 for i:=1 to unrolls do
                   begin
                   begin
                     { create and insert copy of the statement block }
                     { create and insert copy of the statement block }
-                    addstatement(unrollstatement,tfornode(tfornode(node).t2).getcopy);
+                    addstatement(unrollstatement,tfornode(node).t2.getcopy);
 
 
                     { set and insert entry label? }
                     { set and insert entry label? }
                     if (counts mod unrolls<>0) and
                     if (counts mod unrolls<>0) and