branch | qmlfrontend |
changeset 10515 | 7705784902e1 |
parent 10494 | 0eb97cf4c78e |
child 10551 | 4eefc711309e |
--- a/hedgewars/uCollisions.pas Sun Nov 09 23:02:21 2014 +0300 +++ b/hedgewars/uCollisions.pas Tue Nov 18 23:39:30 2014 +0300 @@ -117,7 +117,7 @@ function CheckCoordInWater(X, Y: LongInt): boolean; inline; begin CheckCoordInWater:= (Y > cWaterLine) - or ((WorldEdge = weSea) and ((X < leftX) or (X > rightX))); + or ((WorldEdge = weSea) and ((X < LongInt(leftX)) or (X > LongInt(rightX)))); end; function CheckGearsCollision(Gear: PGear): PGearArray;