summaryrefslogtreecommitdiff
path: root/compiler/optloop.pas
diff options
context:
space:
mode:
authorflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2008-11-12 20:42:21 +0000
committerflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2008-11-12 20:42:21 +0000
commit8ac1bc2fe31c1b788b3cec48cdc4b4acef4a5929 (patch)
treefdd423e5238be89a49a13fb2fd296037180f397a /compiler/optloop.pas
parent59332bc63c6af6bc4b132afed2174c7287f7cf19 (diff)
downloadfpc-8ac1bc2fe31c1b788b3cec48cdc4b4acef4a5929.tar.gz
* compilation fixed
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@12061 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/optloop.pas')
-rw-r--r--compiler/optloop.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/optloop.pas b/compiler/optloop.pas
index 0d1362dde6..3ffa1f15c1 100644
--- 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;