--- a/hedgewars/uGears.pas	Thu Aug 25 16:45:58 2005 +0000
+++ b/hedgewars/uGears.pas	Thu Aug 25 17:15:36 2005 +0000
@@ -59,7 +59,7 @@
              Hedgehog: pointer;
              Health, Damage: LongWord;
              CollIndex: Longword;
-             Tag: Longword;
+             Tag: integer;
              end;
 
 function AddGear(X, Y: integer; Kind: TGearType; State: Cardinal; const dX: real=0.0; dY: real=0.0; Timer: LongWord=0): PGear;