changeset 4403 | 0dfe26f48ec1 |
parent 4377 | 43945842da0c |
child 4684 | 1b2bbc86af5b |
--- a/hedgewars/uCollisions.pas Sun Nov 21 19:14:45 2010 +0300 +++ b/hedgewars/uCollisions.pas Sun Nov 21 19:41:19 2010 +0300 @@ -52,7 +52,7 @@ function calcSlopeTangent(Gear: PGear; collisionX, collisionY: LongInt; var outDeltaX, outDeltaY: LongInt; TestWord: LongWord): Boolean; implementation -uses uConsts, uLandGraphics, uVariables, uIO; +uses uConsts, uLandGraphics, uVariables, uDebug; type TCollisionEntry = record X, Y, Radius: LongInt;