# HG changeset patch # User koda # Date 1320469352 -3600 # Node ID 2c3a6bece6438ff2d56f2ec89013dcd8d31dd472 # Parent f571ba93d9db344d51f5454d7239ee66ade0e546 ooops :D diff -r f571ba93d9db -r 2c3a6bece643 hedgewars/SDLh.pas --- a/hedgewars/SDLh.pas Sat Nov 05 05:25:04 2011 +0100 +++ b/hedgewars/SDLh.pas Sat Nov 05 06:02:32 2011 +0100 @@ -20,7 +20,6 @@ unit SDLh; interface -{$IFDEF SDL13}uses math;{$ENDIF} {$IFDEF LINUX} {$DEFINE UNIX} @@ -367,7 +366,7 @@ SDL_eventaction = (SDL_ADDEVENT = 0, SDL_PEEPEVENT, SDL_GETEVENT); PSDL_Surface = ^TSDL_Surface; - T SDL_Surface = record + TSDL_Surface = record flags : LongWord; format: PSDL_PixelFormat; w, h : LongInt; @@ -911,7 +910,7 @@ procedure SDL_WarpMouse(x, y: Word); {$IFNDEF SDL13}cdecl; external SDLLibName;{$ENDIF} function SDL_GetKeyState(numkeys: PLongInt): PByteArray; cdecl; external SDLLibName {$IFDEF SDL13} name 'SDL_GetKeyboardState'{$ENDIF}; function SDL_AllocFormat(format: LongWord): PSDL_PixelFormat; {$IFDEF SDL13}cdecl; external SDLLibName;{$ENDIF} -procedure Boolean(pixelformat: PSDL_PixelFormat); {$IFDEF SDL13}cdecl; external SDLLibName;{$ENDIF} +procedure SDL_FreeFormat(pixelformat: PSDL_PixelFormat); {$IFDEF SDL13}cdecl; external SDLLibName;{$ENDIF} function SDL_VideoDriverName(namebuf: PChar; maxlen: LongInt): PChar; {$IFNDEF SDL13}cdecl; external SDLLibName;{$ENDIF} function SDL_EnableUNICODE(enable: LongInt): LongInt; {$IFNDEF SDL13}cdecl; external SDLLibName;{$ENDIF} function SDL_EnableKeyRepeat(delay_, interval: LongInt): LongInt; {$IFNDEF SDL13}cdecl; external SDLLibName;{$ENDIF}