author | sheepluva |
Tue, 09 Sep 2014 10:48:11 +0200 | |
changeset 10409 | 0972bf43e8fc |
parent 10319 | 240775460dc5 |
child 10535 | 428085a1be6e |
permissions | -rw-r--r-- |
6512 | 1 |
system; |
10015 | 2 |
{This file contains functions that are external} |
3 |
type |
|
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
4 |
uinteger = uinteger; |
6635
c2fa29fe2a58
Some progress, still can't find the source of bad behavior
unc0rr
parents:
6552
diff
changeset
|
5 |
Integer = integer; |
6512 | 6 |
LongInt = integer; |
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
7 |
LongWord = uinteger; |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
8 |
Cardinal = uinteger; |
6516 | 9 |
PtrInt = integer; |
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
10 |
Word = uinteger; |
6520 | 11 |
Byte = integer; |
12 |
SmallInt = integer; |
|
13 |
ShortInt = integer; |
|
8105 | 14 |
Int64 = integer; |
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
15 |
QWord = uinteger; |
6891
ab9843957664
Improve rendering of function types, ranges, and more
unc0rr
parents:
6873
diff
changeset
|
16 |
GLint = integer; |
ab9843957664
Improve rendering of function types, ranges, and more
unc0rr
parents:
6873
diff
changeset
|
17 |
GLuint = integer; |
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
18 |
GLenum = integer; |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
19 |
|
7044 | 20 |
int = integer; |
7073 | 21 |
size_t = integer; |
6516 | 22 |
|
23 |
pointer = pointer; |
|
24 |
||
6649
7f78e8a6db69
Fix a bug with type declaration trying to resolve type being declared
unc0rr
parents:
6635
diff
changeset
|
25 |
float = float; |
6838 | 26 |
single = float; |
6516 | 27 |
double = float; |
28 |
real = float; |
|
6653 | 29 |
extended = float; |
6891
ab9843957664
Improve rendering of function types, ranges, and more
unc0rr
parents:
6873
diff
changeset
|
30 |
GLfloat = float; |
6516 | 31 |
|
32 |
boolean = boolean; |
|
33 |
LongBool = boolean; |
|
34 |
||
35 |
string = string; |
|
36 |
shortstring = string; |
|
37 |
ansistring = string; |
|
6838 | 38 |
widechar = string; |
6516 | 39 |
|
40 |
char = char; |
|
6873 | 41 |
PChar = ^char; |
6926
6e832f8f4d8e
Make adler32 friendlier for pas2c - this should work the same (needs testing ofc)
nemo
parents:
6902
diff
changeset
|
42 |
PPChar = ^Pchar; |
10131
4b4a043111f4
- pas2c recognizes typecasts in initialization expressions
unc0rr
parents:
10129
diff
changeset
|
43 |
PWideChar = ^WideChar; |
10015 | 44 |
|
6520 | 45 |
PByte = ^Byte; |
7616 | 46 |
PWord = ^Word; |
6520 | 47 |
PLongInt = ^LongInt; |
48 |
PLongWord = ^LongWord; |
|
49 |
PInteger = ^Integer; |
|
10015 | 50 |
|
6663 | 51 |
Handle = integer; |
6838 | 52 |
|
6893 | 53 |
png_structp = pointer; |
54 |
png_size_t = integer; |
|
55 |
||
10015 | 56 |
var |
6512 | 57 |
false, true: boolean; |
10015 | 58 |
|
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
59 |
ord, Succ, Pred : function : integer; |
6838 | 60 |
inc, dec, Low, High, Lo, Hi : function : integer; |
61 |
||
6902
7d4e5ce73b98
Make pas2c even smarter. Now uIO.c compiles fine, and only 1 warning when compiled with -Wall (clang).
unc0rr
parents:
6898
diff
changeset
|
62 |
IOResult : integer; |
6853 | 63 |
exit, break, halt, continue : procedure; |
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
64 |
|
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
65 |
TextFile, File : Handle; |
6853 | 66 |
FileMode : integer; |
6855
807156c01475
Finish the toughest part of the converter. Now it knows types of everything, so could correctly recognize bitwise operators and type convertions.
unc0rr
parents:
6854
diff
changeset
|
67 |
exitcode : integer; |
7151 | 68 |
stdout, stderr : Handle; |
6838 | 69 |
|
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
70 |
sqrt, cos, sin: function : float; |
7062 | 71 |
pi : float; |
6838 | 72 |
|
73 |
sizeof : function : integer; |
|
74 |
||
7064 | 75 |
glGetString : function : pchar; |
10015 | 76 |
|
7064 | 77 |
glBegin, glBindTexture, glBlendFunc, glClear, glClearColor, |
78 |
glColor4ub, glColorMask, glColorPointer, glDeleteTextures, |
|
79 |
glDisable, glDisableClientState, glDrawArrays, glEnable, |
|
80 |
glEnableClientState, glEnd, glGenTextures, glGetIntegerv, |
|
81 |
glHint, glLineWidth, glLoadIdentity, glMatrixMode, glPopMatrix, |
|
82 |
glPushMatrix, glReadPixels, glRotatef, glScalef, glTexCoord2f, |
|
83 |
glTexCoordPointer, glTexImage2D, glTexParameterf, |
|
84 |
glTexParameteri, glTranslatef, glVertex2d, glVertexPointer, |
|
7065 | 85 |
glViewport, glext_LoadExtension, glDeleteRenderbuffersEXT, |
86 |
glDeleteFramebuffersEXT, glGenFramebuffersEXT, |
|
10015 | 87 |
glGenRenderbuffersEXT, glBindFramebufferEXT, |
7065 | 88 |
glBindRenderbufferEXT, glRenderbufferStorageEXT, |
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
89 |
glFramebufferRenderbufferEXT, glFramebufferTexture2DEXT, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
90 |
glUniformMatrix4fv, glVertexAttribPointer, glCreateShader, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
91 |
glShaderSource, glCompileShader, glGetShaderiv, glGetShaderInfoLog, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
92 |
glCreateProgram, glAttachShader, glBindAttribLocation, glLinkProgram, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
93 |
glDeleteShader, glGetProgramiv, glGetProgramInfoLog, glUseProgram, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
94 |
glUniform1i, glGetUniformLocation, glEnableVertexAttribArray, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
95 |
glGetError, glDeleteProgram, glDeleteBuffers, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
96 |
glGenBuffers, glBufferData, glBindBuffer, glewInit, |
10133 | 97 |
glUniform4f, glDisableVertexAttribArray, glTexEnvi, |
98 |
glLoadMatrixf, glMultMatrixf, glGetFloatv: procedure; |
|
7064 | 99 |
|
100 |
GL_BGRA, GL_BLEND, GL_CLAMP_TO_EDGE, GL_COLOR_ARRAY, |
|
101 |
GL_COLOR_BUFFER_BIT, GL_DEPTH_BUFFER_BIT, GL_DEPTH_COMPONENT, |
|
102 |
GL_DITHER, GL_EXTENSIONS, GL_FALSE, GL_FASTEST, GL_LINEAR, |
|
103 |
GL_LINE_LOOP, GL_LINES, GL_LINE_SMOOTH, GL_LINE_STRIP, |
|
104 |
GL_MAX_TEXTURE_SIZE, GL_MODELVIEW, GL_ONE_MINUS_SRC_ALPHA, |
|
105 |
GL_PERSPECTIVE_CORRECTION_HINT, GL_PROJECTION, GL_QUADS, |
|
106 |
GL_RENDERER, GL_RGBA, GL_RGBA8, GL_SRC_ALPHA, GL_TEXTURE_2D, |
|
107 |
GL_TEXTURE_COORD_ARRAY, GL_TEXTURE_MAG_FILTER, |
|
108 |
GL_TEXTURE_MIN_FILTER, GL_TEXTURE_PRIORITY, GL_TEXTURE_WRAP_S, |
|
10319 | 109 |
GL_TEXTURE_WRAP_T, GL_TRIANGLE_STRIP, GL_TRIANGLE_FAN, GL_TRUE, GL_VENDOR, |
7065 | 110 |
GL_VERSION, GL_VERTEX_ARRAY, GLenum, GL_FRAMEBUFFER_EXT, |
111 |
GL_RENDERBUFFER_EXT, GL_DEPTH_ATTACHMENT_EXT, |
|
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
112 |
GL_COLOR_ATTACHMENT0_EXT, GL_FLOAT, GL_UNSIGNED_BYTE, GL_COMPILE_STATUS, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
113 |
GL_INFO_LOG_LENGTH, GL_LINK_STATUS, GL_VERTEX_SHADER, GL_FRAGMENT_SHADER, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
114 |
GL_NO_ERROR, GL_ARRAY_BUFFER, GL_STATIC_DRAW, GLEW_OK, |
10133 | 115 |
GL_AUX_BUFFERS, GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE, GL_ADD, |
116 |
GL_MODELVIEW_MATRIX: integer; |
|
6838 | 117 |
|
118 |
TThreadId : function : integer; |
|
10015 | 119 |
|
7151 | 120 |
_strconcat, _strappend, _strprepend, _chrconcat : function : string; |
10124
aabd1b75d5a3
Even more explicit type conversions and other stuff to help pas2c use ansistrings
unc0rr
parents:
10120
diff
changeset
|
121 |
_strcompare, _strncompare, _strcomparec, _strncompareA : function : boolean; |
10120 | 122 |
_strconcatA, _strappendA : function : ansistring; |
6893 | 123 |
|
124 |
png_structp, png_set_write_fn, png_get_io_ptr, |
|
125 |
png_get_libpng_ver, png_create_write_struct, |
|
126 |
png_create_info_struct, png_destroy_write_struct, |
|
127 |
png_write_row, png_set_ihdr, png_write_info, |
|
128 |
png_write_end : procedure; |
|
6894 | 129 |
|
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
130 |
clear_filelist_hook, add_file_hook, idb_loader_hook, mainloop_hook, drawworld_hook : procedure; |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
131 |
SDL_InitPatch : procedure; |
7066
12cc2bd84b0b
Make pas2c even more happier with uGears.c, allow assigning arrays in some cases
unc0rr
parents:
7065
diff
changeset
|
132 |
|
10129
cd2a64a1f4aa
- Pas2C: make use of 'external' function decorator
unc0rr
parents:
10124
diff
changeset
|
133 |
PHYSFS_init, PHYSFS_deinit, PHYSFS_mount, PHYSFS_readBytes, PHYSFS_read : function : LongInt; |
9260 | 134 |
PHYSFSRWOPS_openRead, PHYSFSRWOPS_openWrite, PHYSFS_openRead : function : pointer; |
135 |
PHYSFS_eof, PHYSFS_close, PHYSFS_exists : function : boolean; |
|
10080 | 136 |
PHYSFS_getLastError : function : PChar; |
9260 | 137 |
|
138 |
hedgewarsMountPackages, physfsReaderSetBuffer, hedgewarsMountPackage : procedure; |
|
139 |
physfsReader : function : pointer; |