--- a/hedgewars/uIO.pas Wed Sep 20 15:33:47 2006 +0000
+++ b/hedgewars/uIO.pas Wed Sep 20 18:24:13 2006 +0000
@@ -40,6 +40,7 @@
procedure SendIPC(s: shortstring);
procedure SendIPCXY(cmd: char; X, Y: SmallInt);
+procedure SendIPCRaw(p: pointer; len: Longword);
procedure SendIPCAndWaitReply(s: shortstring);
procedure IPCCheckSock;
procedure InitIPC;
@@ -145,6 +146,11 @@
end
end;
+procedure SendIPCRaw(p: pointer; len: Longword);
+begin
+SDLNet_TCP_Send(IPCSock, p, len)
+end;
+
procedure SendIPCXY(cmd: char; X, Y: SmallInt);
var s: shortstring;
begin