# HG changeset patch # User unc0rr # Date 1211898775 0 # Node ID 19003f7fc174c6e2238db43c947881228cf8ae7b # Parent 474afaab0365ba95e39a4b6bdb97b14360e6dfb0 Get rid of unused Surface parameter diff -r 474afaab0365 -r 19003f7fc174 hedgewars/hwengine.dpr --- a/hedgewars/hwengine.dpr Tue May 27 14:30:48 2008 +0000 +++ b/hedgewars/hwengine.dpr Tue May 27 14:32:55 2008 +0000 @@ -104,18 +104,18 @@ ProcessKbd; DoGameTick(Lag); ProcessVisualGears(Lag); - DrawWorld(Lag, SDLPrimSurface); + DrawWorld(Lag); end; gsConsole: begin DoGameTick(Lag); ProcessVisualGears(Lag); - DrawWorld(Lag, SDLPrimSurface); + DrawWorld(Lag); DrawConsole(SDLPrimSurface); end; gsChat: begin DoGameTick(Lag); ProcessVisualGears(Lag); - DrawWorld(Lag, SDLPrimSurface); + DrawWorld(Lag); end; gsExit: begin OnDestroy; diff -r 474afaab0365 -r 19003f7fc174 hedgewars/uGears.pas --- a/hedgewars/uGears.pas Tue May 27 14:30:48 2008 +0000 +++ b/hedgewars/uGears.pas Tue May 27 14:32:55 2008 +0000 @@ -58,7 +58,7 @@ procedure ProcessGears; procedure SetAllToActive; procedure SetAllHHToActive; -procedure DrawGears(Surface: PSDL_Surface); +procedure DrawGears; procedure FreeGearsList; procedure AddMiscGears; procedure AssignHHCoords; @@ -694,7 +694,7 @@ end; end; -procedure DrawGears(Surface: PSDL_Surface); +procedure DrawGears; var Gear, HHGear: PGear; i: Longword; roplen: LongInt; diff -r 474afaab0365 -r 19003f7fc174 hedgewars/uWorld.pas --- a/hedgewars/uWorld.pas Tue May 27 14:30:48 2008 +0000 +++ b/hedgewars/uWorld.pas Tue May 27 14:32:55 2008 +0000 @@ -24,7 +24,7 @@ WorldDy: LongInt = -256; procedure InitWorld; -procedure DrawWorld(Lag: LongInt; Surface: PSDL_Surface); +procedure DrawWorld(Lag: LongInt); procedure AddCaption(s: string; Color: Longword; Group: TCapGroup); {$IFDEF COUNTTICKS} @@ -69,7 +69,7 @@ AMxCurr:= cScreenWidth end; -procedure ShowAmmoMenu(Surface: PSDL_Surface); +procedure ShowAmmoMenu; const MENUSPEED = 15; var x, y, i, t: LongInt; Slot, Pos: LongInt; @@ -151,7 +151,7 @@ procedure MoveCamera; forward; -procedure DrawWorld(Lag: LongInt; Surface: PSDL_Surface); +procedure DrawWorld(Lag: LongInt); var i, t: LongInt; r: TSDL_Rect; tdx, tdy: Double; @@ -213,7 +213,7 @@ glEnable(GL_TEXTURE_2D) end; -DrawGears(Surface); +DrawGears; // Waves {$WARNINGS OFF} @@ -331,7 +331,7 @@ end; // AmmoMenu -if (AMxCurr < cScreenWidth) or bShowAmmoMenu then ShowAmmoMenu(Surface); +if (AMxCurr < cScreenWidth) or bShowAmmoMenu then ShowAmmoMenu; DrawChat;