16 년 전 · 5e448b47a5
--- a/compiler/optloop.pas
+++ b/compiler/optloop.pas
@@ -393,7 +393,7 @@ unit optloop;
 
															     function OptimizeInductionVariablesSingleForLoop(node : tnode) : tnode;
														
 
															       var
														
 
															-        loopcode,
														
 
															+        loopcode : tblocknode;
														
 
															         loopcodestatements,
														
 
															         newcodestatements : tstatementnode;
														
 
															         fornode : tfornode;