--- a/hedgewars/uFLTypes.pas Mon Dec 07 00:05:41 2015 +0300
+++ b/hedgewars/uFLTypes.pas Thu Dec 10 00:33:45 2015 +0300
@@ -1,5 +1,6 @@
unit uFLTypes;
interface
+uses SDLh;
const
MAXARGS = 32;
@@ -18,10 +19,19 @@
TClientFlag = (cfReady, cfRegistered, cfInRoom, cfContributor, cfInGame, cfRoomAdmin, cfServerAdmin);
+ PIPCMessage = ^TIPCMessage;
TIPCMessage = record
str: shortstring;
len: Longword;
- buf: Pointer
+ buf: Pointer;
+ next: PIPCMessage;
+ end;
+ PIPCQueue = ^TIPCQueue;
+ TIPCQueue = record
+ msg: TIPCMessage;
+ mut: PSDL_Mutex;
+ cond: PSDL_Cond;
+ last: PIPCMessage;
end;
TIPCCallback = procedure (p: pointer; msg: PChar; len: Longword);