codetools: on variable only valid in the on block, bug #24494

git-svn-id: trunk@41842 -
This commit is contained in:
mattias 2013-06-23 17:32:52 +00:00
parent 421997613d
commit 7201e34ba9

View File

@ -3233,6 +3233,9 @@ var
will be searched: will be searched:
with ContextNode, StartContextNode do ; with ContextNode, StartContextNode do ;
} }
end else if ContextNode.Desc=ctnOnBlock then begin
// the ctnOnIdentifier is only valid within the ctnOnStatement
// => skip
end else begin end else begin
break; break;
end; end;