--- a/hedgewars/uCollisions.pas	Wed Nov 12 22:47:43 2014 +0900
+++ b/hedgewars/uCollisions.pas	Fri Nov 14 17:00:47 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;