diff -r c542c8e3cf77 -r c8c6ac44f51b hedgewars/uStore.pas --- a/hedgewars/uStore.pas Mon Mar 29 23:47:38 2010 +0000 +++ b/hedgewars/uStore.pas Tue Mar 30 00:02:40 2010 +0000 @@ -64,7 +64,7 @@ procedure flipSurface(Surface: PSDL_Surface; Vertical: Boolean); //procedure rotateSurface(Surface: PSDL_Surface); procedure copyRotatedSurface(src, dest: PSDL_Surface); // this is necessary since width/height are read only in SDL -procedure copyToXY(src, dest: PSDL_Surface; destX, destY: Integer); +procedure copyToXY(src, dest: PSDL_Surface; destX, destY: LongInt); procedure RenderHealth(var Hedgehog: THedgehog); procedure AddProgress; procedure FinishProgress; @@ -83,7 +83,7 @@ type TGPUVendor = (gvUnknown, gvNVIDIA, gvATI, gvIntel, gvApple); var HHTexture: PTexture; - MaxTextureSize: Integer; + MaxTextureSize: LongInt; cGPUVendor: TGPUVendor; procedure Tint(r, g, b, a: Single); @@ -1304,7 +1304,7 @@ end; end; -procedure copyToXY(src, dest: PSDL_Surface; destX, destY: Integer); +procedure copyToXY(src, dest: PSDL_Surface; destX, destY: LongInt); var srcX, srcY, i, j, maxDest: LongInt; srcPixels, destPixels: PLongWordArray; begin