hedgewars/SDLh.pas
changeset 433 9f8f22094c0e
parent 432 b0f693024b50
child 459 95163c6efa69
--- a/hedgewars/SDLh.pas	Sun Feb 11 12:27:45 2007 +0000
+++ b/hedgewars/SDLh.pas	Sun Feb 11 15:33:19 2007 +0000
@@ -188,6 +188,9 @@
      PLongWordArray = ^TLongWordArray;
      TLongWordArray = array[0..16383] of LongWord;
 
+     PSDL_Thread = Pointer;
+     PSDL_mutex = Pointer;
+     
 function  SDL_Init(flags: Longword): LongInt; cdecl; external SDLLibName;
 procedure SDL_Quit; cdecl; external SDLLibName;
 function  SDL_VideoDriverName(var namebuf; maxlen: LongInt): PChar; cdecl; external SDLLibName;
@@ -233,6 +236,13 @@
 
 procedure SDL_WM_SetCaption(title: PChar; icon: PChar); cdecl; external SDLLibName;
 
+function  SDL_CreateThread(fn: pointer; data: pointer): PSDL_Thread; cdecl; external SDLLibName;
+procedure SDL_WaitThread(thread: PSDL_Thread; status: PLongInt); cdecl; external SDLLibName;
+function  SDL_CreateMutex: PSDL_mutex; cdecl; external SDLLibName;
+procedure SDL_DestroyMutex(mutex: PSDL_mutex); cdecl; external SDLLibName;
+function  SDL_LockMutex(mutex: PSDL_mutex): LongInt; cdecl; external SDLLibName name 'SDL_mutexP';
+function  SDL_UnlockMutex(mutex: PSDL_mutex): LongInt; cdecl; external SDLLibName name 'SDL_mutexV';
+
 (*  TTF  *)
 
 const {$IFDEF WIN32}