--- a/hedgewars/uFLIPC.pas	Thu Apr 16 23:31:13 2015 +0300
+++ b/hedgewars/uFLIPC.pas	Wed Apr 22 23:33:16 2015 +0300
@@ -10,6 +10,7 @@
 procedure freeIPC;
 
 procedure ipcToEngine(s: shortstring);
+procedure ipcToEngineRaw(p: pointer; len: Longword);
 //function  ipcReadFromEngine: shortstring;
 //function  ipcCheckFromEngine: boolean;
 
@@ -85,6 +86,16 @@
     ipcSend(msg, msgFrontend, mutFrontend, condFrontend)
 end;
 
+procedure ipcToEngineRaw(p: pointer; len: Longword);
+var msg: TIPCMessage;
+begin
+    msg.str[0]:= #0;
+    msg.len:= len;
+    msg.buf:= GetMem(len);
+    Move(p^, msg.buf^, len);
+    ipcSend(msg, msgEngine, mutEngine, condEngine)
+end;
+
 procedure ipcToFrontendRaw(p: pointer; len: Longword);
 var msg: TIPCMessage;
 begin