# HG changeset patch # User unc0rr # Date 1255711547 0 # Node ID b6b9523e06bf3bb4e8ad36de538da6230ee9b7cd # Parent 1e10a47cabea58b1268cd7bd9b8c500f35517d76 Fix warning diff -r 1e10a47cabea -r b6b9523e06bf hedgewars/uWorld.pas --- a/hedgewars/uWorld.pas Fri Oct 16 16:42:51 2009 +0000 +++ b/hedgewars/uWorld.pas Fri Oct 16 16:45:47 2009 +0000 @@ -247,7 +247,7 @@ VertexBuffer[3].Y:= VertexBuffer[2].Y; shift:= - lw / cWaveWidth; -TextureBuffer[0].X:= shift + (( - WorldDx + (RealTicks shr 6) * Dir + dX) mod cWaveWidth) / (cWaveWidth - 1); +TextureBuffer[0].X:= shift + (( - WorldDx + LongInt(RealTicks shr 6) * Dir + dX) mod cWaveWidth) / (cWaveWidth - 1); TextureBuffer[0].Y:= 0; TextureBuffer[1].X:= TextureBuffer[0].X + waves; TextureBuffer[1].Y:= TextureBuffer[0].Y;