11 SmallInt = integer; |
11 SmallInt = integer; |
12 ShortInt = integer; |
12 ShortInt = integer; |
13 QWord = integer; |
13 QWord = integer; |
14 GLInt = integer; |
14 GLInt = integer; |
15 GLUInt = integer; |
15 GLUInt = integer; |
|
16 gl_unsigned_byte = integer; |
16 |
17 |
17 pointer = pointer; |
18 pointer = pointer; |
18 PChar = pointer; |
19 PChar = pointer; |
19 |
20 |
20 float = float; |
21 float = float; |
|
22 single = float; |
21 double = float; |
23 double = float; |
22 real = float; |
24 real = float; |
23 extended = float; |
25 extended = float; |
24 GLFloat = float; |
26 GLFloat = float; |
|
27 gl_float = float; |
25 |
28 |
26 boolean = boolean; |
29 boolean = boolean; |
27 LongBool = boolean; |
30 LongBool = boolean; |
28 |
31 |
29 string = string; |
32 string = string; |
30 shortstring = string; |
33 shortstring = string; |
31 ansistring = string; |
34 ansistring = string; |
|
35 widechar = string; |
32 |
36 |
33 char = char; |
37 char = char; |
34 |
38 |
35 PByte = ^Byte; |
39 PByte = ^Byte; |
36 PLongInt = ^LongInt; |
40 PLongInt = ^LongInt; |
37 PLongWord = ^LongWord; |
41 PLongWord = ^LongWord; |
38 PInteger = ^Integer; |
42 PInteger = ^Integer; |
39 |
43 |
40 Handle = integer; |
44 Handle = integer; |
41 stderr = Handle; |
45 stderr = Handle; |
|
46 |
42 var |
47 var |
43 false, true: boolean; |
48 false, true: boolean; |
44 write, writeLn, read, readLn, inc, dec: procedure; |
49 write, writeLn, read, readLn: procedure; |
45 StrLen, ord, Succ, Pred : function : integer; |
50 StrLen, ord, Succ, Pred : function : integer; |
46 Low, High : function : integer; |
51 inc, dec, Low, High, Lo, Hi : function : integer; |
|
52 odd, even : function : boolean; |
|
53 |
47 Now : function : integer; |
54 Now : function : integer; |
48 Length : function : integer; |
55 Length : function : integer; |
|
56 SetLength, val : procedure; |
|
57 |
|
58 new, dispose, FillChar, Move : procedure; |
|
59 |
|
60 trunc, round : function : integer; |
49 Abs, Sqr : function : integer; |
61 Abs, Sqr : function : integer; |
|
62 |
50 StrPas, FormatDateTime, copy, delete, str : function : shortstring; |
63 StrPas, FormatDateTime, copy, delete, str : function : shortstring; |
51 exit, flush : procedure; |
64 |
52 Sqrt : function : float; |
65 assign, rewrite, reset, flush : procedure; |
|
66 IOResult : function : integer; |
|
67 exit, break, halt : procedure; |
53 TextFile : Handle; |
68 TextFile : Handle; |
|
69 |
|
70 Sqrt, ArcTan2, pi, cos, sin : function : float; |
|
71 |
|
72 TypeInfo, GetEnumName : function : shortstring; |
|
73 |
|
74 UTF8ToUnicode, WrapText: function : shortstring; |
|
75 |
|
76 sizeof : function : integer; |
|
77 |
|
78 GetMem : function : pointer; |
|
79 FreeMem : procedure; |
|
80 |
|
81 gl_texture_2d, glbindtexture, gltexparameterf, gl_rgba, |
|
82 glteximage2d, glvertexpointer, gltexcoordpointer, |
|
83 gl_triangle_fan, gldrawarrays, glpushmatrix, glpopmatrix, |
|
84 gltranslatef, glscalef, glrotatef, gldisable, glenable, |
|
85 gl_line_smooth, gllinewidth, gl_lines, gl_line_loop, |
|
86 glcolor4ub, gl_texture_wrap_s, gltexparameteri, |
|
87 gl_texture_wrap_t, gl_texture_min_filter, |
|
88 gl_linear, gl_texture_mag_filter, glgentextures, |
|
89 gldeletetextures : procedure; |
|
90 |
|
91 TThreadId : function : integer; |