--- a/hedgewars/uGears.pas	Thu Dec 04 21:17:03 2008 +0000
+++ b/hedgewars/uGears.pas	Thu Dec 04 21:59:25 2008 +0000
@@ -95,6 +95,7 @@
 procedure AfterAttack; forward;
 procedure FindPlace(var Gear: PGear; withFall: boolean; Left, Right: LongInt); forward;
 procedure HedgehogStep(Gear: PGear); forward;
+procedure doStepHedgehogMoving(Gear: PGear); forward;
 procedure HedgehogChAngle(Gear: PGear); forward;
 procedure ShotgunShot(Gear: PGear); forward;