--- a/hedgewars/LuaPas.pas Sun May 13 00:50:45 2012 +0400
+++ b/hedgewars/LuaPas.pas Sun May 13 01:54:26 2012 +0400
@@ -14,7 +14,9 @@
{.$DEFINE LUA_GETHOOK}
type
+{$IFNDEF PAS2C}
size_t = Cardinal;
+{$ENDIF}
Psize_t = ^size_t;
PPointer = ^Pointer;
--- a/hedgewars/hwengine.pas Sun May 13 00:50:45 2012 +0400
+++ b/hedgewars/hwengine.pas Sun May 13 01:54:26 2012 +0400
@@ -354,7 +354,7 @@
if recordFileName = '' then
begin
InitIPC;
- SendIPCAndWaitReply('C'); // ask for game config
+ SendIPCAndWaitReply(_S'C'); // ask for game config
end
else
LoadRecordFromFile(recordFileName);
--- a/hedgewars/pas2c.h Sun May 13 00:50:45 2012 +0400
+++ b/hedgewars/pas2c.h Sun May 13 01:54:26 2012 +0400
@@ -2,6 +2,7 @@
#include <stdint.h>
#include <stdbool.h>
+#include <wchar.h>
typedef union string255_
{
@@ -36,6 +37,7 @@
typedef int32_t LongInt;
typedef uint64_t QWord;
typedef int64_t Int64;
+typedef LongWord Cardinal;
typedef LongInt Integer;
typedef float extended;
@@ -52,6 +54,7 @@
typedef LongWord * PLongWord;
typedef Integer * PInteger;
typedef int PtrInt;
+typedef wchar_t widechar;
#ifdef __GNUG__
#define NULL __null
--- a/hedgewars/pas2cSystem.pas Sun May 13 00:50:45 2012 +0400
+++ b/hedgewars/pas2cSystem.pas Sun May 13 01:54:26 2012 +0400
@@ -13,8 +13,8 @@
QWord = integer;
GLint = integer;
GLuint = integer;
- gl_unsigned_byte = integer;
int = integer;
+ size_t = integer;
pointer = pointer;