hedgewars/uCollisions.pas
changeset 4436 94c948a92759
parent 4403 0dfe26f48ec1
child 4684 1b2bbc86af5b
--- a/hedgewars/uCollisions.pas	Mon Nov 29 09:11:31 2010 +0100
+++ b/hedgewars/uCollisions.pas	Tue Nov 30 22:46:47 2010 +0100
@@ -20,7 +20,7 @@
 
 unit uCollisions;
 interface
-uses uGears, uFloat;
+uses uFloat, uTypes;
 
 const cMaxGearArrayInd = 255;
 
@@ -52,7 +52,7 @@
 function  calcSlopeTangent(Gear: PGear; collisionX, collisionY: LongInt; var outDeltaX, outDeltaY: LongInt; TestWord: LongWord): Boolean;
 
 implementation
-uses uMisc, uConsts, uLand, uLandGraphics;
+uses uConsts, uLandGraphics, uVariables, uDebug;
 
 type TCollisionEntry = record
             X, Y, Radius: LongInt;