--- a/hedgewars/uLandTexture.pas Sun Nov 11 16:53:16 2012 +0100
+++ b/hedgewars/uLandTexture.pas Sun Nov 11 17:15:19 2012 +0100
@@ -39,10 +39,11 @@
tex: PTexture;
end;
-var LandTextures: array of array of TLandRecord;
- tmpPixels: array [0..TEXSIZE - 1, 0..TEXSIZE - 1] of LongWord;
- LANDTEXARW: LongWord;
- LANDTEXARH: LongWord;
+var
+ LandTextures : array of array of TLandRecord;
+ tmpPixels : array [0..TEXSIZE - 1, 0..TEXSIZE - 1] of LongWord;
+ LANDTEXARW : LongWord;
+ LANDTEXARH : LongWord;
function Pixels(x, y: Longword): Pointer;
var ty: Longword;
@@ -196,7 +197,6 @@
LANDTEXARW:= (LAND_WIDTH div TEXSIZE) div 2;
LANDTEXARH:= (LAND_HEIGHT div TEXSIZE) div 2;
end;
-
SetLength(LandTextures, LANDTEXARW, LANDTEXARH);
end;