hedgewars/uRender.pas
changeset 14303 6015b74eea55
parent 13572 a71e6856ffab
child 14721 89dd60565041
--- a/hedgewars/uRender.pas	Fri Nov 23 21:22:26 2018 +0100
+++ b/hedgewars/uRender.pas	Fri Nov 23 15:54:23 2018 -0500
@@ -1845,8 +1845,8 @@
 else
     PrepareVbForWater(true,
         OffsetY + WorldDy + cWaterLine, ViewTopY,
-        LongInt(LeftX)  + WorldDx - OffsetX, ViewLeftX,
-        LongInt(RightX) + WorldDx + OffsetX, ViewRightX,
+        leftX  + WorldDx - OffsetX, ViewLeftX,
+        rightX + WorldDx + OffsetX, ViewRightX,
         ViewBottomY,
         first, count);
 
@@ -1936,8 +1936,8 @@
 dY:= -cWaveHeight + dy;
 ox:= -cWaveHeight + ox;
 
-lx:= LongInt(LeftX)  + WorldDx - ox;
-rx:= LongInt(RightX) + WorldDx + ox;
+lx:= leftX  + WorldDx - ox;
+rx:= rightX + WorldDx + ox;
 
 topy:= cWaterLine + WorldDy + dY;