--- a/hedgewars/pas2cSystem.pas	Fri Mar 30 17:00:34 2012 +0400
+++ b/hedgewars/pas2cSystem.pas	Fri Mar 30 23:58:08 2012 +0400
@@ -13,15 +13,18 @@
     QWord = integer;
     GLInt = integer;
     GLUInt = integer;
+    gl_unsigned_byte = integer;
 
     pointer = pointer;
     PChar = pointer;
 
     float = float;
+    single = float;
     double = float;
     real = float;
     extended = float;
     GLFloat = float;
+    gl_float = float;
 
     boolean = boolean;
     LongBool = boolean;
@@ -29,6 +32,7 @@
     string = string;
     shortstring = string;
     ansistring = string;
+    widechar = string;
 
     char = char;
     
@@ -39,15 +43,49 @@
     
     Handle = integer;
     stderr = Handle;
+
 var 
     false, true: boolean;
-    write, writeLn, read, readLn, inc, dec: procedure;
+    write, writeLn, read, readLn: procedure;
     StrLen, ord, Succ, Pred : function : integer;
-    Low, High : function : integer;
+    inc, dec, Low, High, Lo, Hi : function : integer;
+    odd, even : function : boolean;
+
     Now : function : integer;
     Length : function : integer;
+    SetLength, val : procedure;
+
+    new, dispose, FillChar, Move : procedure;
+
+    trunc, round : function : integer;
     Abs, Sqr : function : integer;
+
     StrPas, FormatDateTime, copy, delete, str : function : shortstring;
-    exit, flush : procedure;
-    Sqrt : function : float;
+
+    assign, rewrite, reset, flush : procedure;
+    IOResult : function : integer;
+    exit, break, halt : procedure;
     TextFile : Handle;
+
+    Sqrt, ArcTan2, pi, cos, sin : function : float;
+
+    TypeInfo, GetEnumName : function : shortstring;
+
+    UTF8ToUnicode, WrapText: function : shortstring;
+
+    sizeof : function : integer;
+
+    GetMem : function : pointer;
+    FreeMem : procedure;
+    
+    gl_texture_2d, glbindtexture, gltexparameterf, gl_rgba, 
+    glteximage2d, glvertexpointer, gltexcoordpointer,
+    gl_triangle_fan, gldrawarrays, glpushmatrix, glpopmatrix,
+    gltranslatef, glscalef, glrotatef, gldisable, glenable,
+    gl_line_smooth, gllinewidth, gl_lines, gl_line_loop,
+    glcolor4ub, gl_texture_wrap_s, gltexparameteri,
+    gl_texture_wrap_t, gl_texture_min_filter,
+    gl_linear, gl_texture_mag_filter, glgentextures,
+    gldeletetextures : procedure;
+
+    TThreadId : function : integer;