--- a/hedgewars/GSHandlers.inc	Mon Mar 29 23:47:38 2010 +0000
+++ b/hedgewars/GSHandlers.inc	Tue Mar 30 00:02:40 2010 +0000
@@ -1611,8 +1611,7 @@
 
 ////////////////////////////////////////////////////////////////////////////////
 procedure doStepFlame(Gear: PGear);
-var i: Integer;
-gX,gY: LongInt;
+var gX,gY,i: LongInt;
 begin
     if (Gear^.State and gsttmpFlag) = 0 then AllInactive:= false;