changeset 4377 | 43945842da0c |
parent 4367 | f4a0ec067601 |
child 4403 | 0dfe26f48ec1 |
--- a/hedgewars/uCollisions.pas Thu Nov 18 11:50:02 2010 +0300 +++ b/hedgewars/uCollisions.pas Thu Nov 18 12:12:51 2010 +0300 @@ -52,7 +52,7 @@ function calcSlopeTangent(Gear: PGear; collisionX, collisionY: LongInt; var outDeltaX, outDeltaY: LongInt; TestWord: LongWord): Boolean; implementation -uses uMisc, uConsts, uLandGraphics, uVariables; +uses uConsts, uLandGraphics, uVariables, uIO; type TCollisionEntry = record X, Y, Radius: LongInt;