--- a/hedgewars/uCollisions.pas	Tue Jun 20 21:22:15 2006 +0000
+++ b/hedgewars/uCollisions.pas	Fri Jun 23 20:02:41 2006 +0000
@@ -37,10 +37,7 @@
 {$INCLUDE options.inc}
 const cMaxGearArrayInd = 255;
 
-type TDirection = record
-                  dX, dY: integer
-                  end;
-     PGearArray = ^TGearArray;
+type PGearArray = ^TGearArray;
      TGearArray = record
                   ar: array[0..cMaxGearArrayInd] of PGear;
                   Count: Longword