author | Wuzzy <almikes@aol.com> |
Sat, 09 Apr 2016 05:28:18 +0200 | |
changeset 11996 | 5a51bca7eeaa |
parent 11805 | 6e6248c43942 |
child 12109 | f61bd25b9f70 |
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; |
11805 | 17 |
GLsizei = integer; |
6891
ab9843957664
Improve rendering of function types, ranges, and more
unc0rr
parents:
6873
diff
changeset
|
18 |
GLuint = integer; |
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
19 |
GLenum = integer; |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
20 |
|
7044 | 21 |
int = integer; |
7073 | 22 |
size_t = integer; |
6516 | 23 |
|
24 |
pointer = pointer; |
|
25 |
||
6649
7f78e8a6db69
Fix a bug with type declaration trying to resolve type being declared
unc0rr
parents:
6635
diff
changeset
|
26 |
float = float; |
6838 | 27 |
single = float; |
6516 | 28 |
double = float; |
29 |
real = float; |
|
6653 | 30 |
extended = float; |
6891
ab9843957664
Improve rendering of function types, ranges, and more
unc0rr
parents:
6873
diff
changeset
|
31 |
GLfloat = float; |
6516 | 32 |
|
33 |
boolean = boolean; |
|
34 |
LongBool = boolean; |
|
35 |
||
36 |
string = string; |
|
37 |
shortstring = string; |
|
38 |
ansistring = string; |
|
6838 | 39 |
widechar = string; |
6516 | 40 |
|
41 |
char = char; |
|
6873 | 42 |
PChar = ^char; |
6926
6e832f8f4d8e
Make adler32 friendlier for pas2c - this should work the same (needs testing ofc)
nemo
parents:
6902
diff
changeset
|
43 |
PPChar = ^Pchar; |
10131
4b4a043111f4
- pas2c recognizes typecasts in initialization expressions
unc0rr
parents:
10129
diff
changeset
|
44 |
PWideChar = ^WideChar; |
10015 | 45 |
|
6520 | 46 |
PByte = ^Byte; |
7616 | 47 |
PWord = ^Word; |
6520 | 48 |
PLongInt = ^LongInt; |
49 |
PLongWord = ^LongWord; |
|
50 |
PInteger = ^Integer; |
|
10015 | 51 |
|
6663 | 52 |
Handle = integer; |
6838 | 53 |
|
6893 | 54 |
png_structp = pointer; |
55 |
png_size_t = integer; |
|
56 |
||
10015 | 57 |
var |
6512 | 58 |
false, true: boolean; |
10015 | 59 |
|
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
60 |
ord, Succ, Pred : function : integer; |
6838 | 61 |
inc, dec, Low, High, Lo, Hi : function : integer; |
62 |
||
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
|
63 |
IOResult : integer; |
6853 | 64 |
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
|
65 |
|
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
66 |
TextFile, File : Handle; |
6853 | 67 |
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
|
68 |
exitcode : integer; |
7151 | 69 |
stdout, stderr : Handle; |
6838 | 70 |
|
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
71 |
sqrt, cos, sin: function : float; |
7062 | 72 |
pi : float; |
6838 | 73 |
|
74 |
sizeof : function : integer; |
|
75 |
||
7064 | 76 |
glGetString : function : pchar; |
10015 | 77 |
|
7064 | 78 |
glBegin, glBindTexture, glBlendFunc, glClear, glClearColor, |
79 |
glColor4ub, glColorMask, glColorPointer, glDeleteTextures, |
|
80 |
glDisable, glDisableClientState, glDrawArrays, glEnable, |
|
81 |
glEnableClientState, glEnd, glGenTextures, glGetIntegerv, |
|
82 |
glHint, glLineWidth, glLoadIdentity, glMatrixMode, glPopMatrix, |
|
83 |
glPushMatrix, glReadPixels, glRotatef, glScalef, glTexCoord2f, |
|
84 |
glTexCoordPointer, glTexImage2D, glTexParameterf, |
|
85 |
glTexParameteri, glTranslatef, glVertex2d, glVertexPointer, |
|
7065 | 86 |
glViewport, glext_LoadExtension, glDeleteRenderbuffersEXT, |
87 |
glDeleteFramebuffersEXT, glGenFramebuffersEXT, |
|
10015 | 88 |
glGenRenderbuffersEXT, glBindFramebufferEXT, |
7065 | 89 |
glBindRenderbufferEXT, glRenderbufferStorageEXT, |
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
90 |
glFramebufferRenderbufferEXT, glFramebufferTexture2DEXT, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
91 |
glUniformMatrix4fv, glVertexAttribPointer, glCreateShader, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
92 |
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
|
93 |
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
|
94 |
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
|
95 |
glUniform1i, glGetUniformLocation, glEnableVertexAttribArray, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
96 |
glGetError, glDeleteProgram, glDeleteBuffers, |
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
97 |
glGenBuffers, glBufferData, glBindBuffer, glewInit, |
10133 | 98 |
glUniform4f, glDisableVertexAttribArray, glTexEnvi, |
99 |
glLoadMatrixf, glMultMatrixf, glGetFloatv: procedure; |
|
7064 | 100 |
|
101 |
GL_BGRA, GL_BLEND, GL_CLAMP_TO_EDGE, GL_COLOR_ARRAY, |
|
102 |
GL_COLOR_BUFFER_BIT, GL_DEPTH_BUFFER_BIT, GL_DEPTH_COMPONENT, |
|
103 |
GL_DITHER, GL_EXTENSIONS, GL_FALSE, GL_FASTEST, GL_LINEAR, |
|
104 |
GL_LINE_LOOP, GL_LINES, GL_LINE_SMOOTH, GL_LINE_STRIP, |
|
105 |
GL_MAX_TEXTURE_SIZE, GL_MODELVIEW, GL_ONE_MINUS_SRC_ALPHA, |
|
106 |
GL_PERSPECTIVE_CORRECTION_HINT, GL_PROJECTION, GL_QUADS, |
|
10535 | 107 |
GL_RENDERER, GL_RGB, GL_RGB8, GL_RGBA, GL_RGBA8, GL_SRC_ALPHA, GL_TEXTURE_2D, |
7064 | 108 |
GL_TEXTURE_COORD_ARRAY, GL_TEXTURE_MAG_FILTER, |
109 |
GL_TEXTURE_MIN_FILTER, GL_TEXTURE_PRIORITY, GL_TEXTURE_WRAP_S, |
|
10319 | 110 |
GL_TEXTURE_WRAP_T, GL_TRIANGLE_STRIP, GL_TRIANGLE_FAN, GL_TRUE, GL_VENDOR, |
7065 | 111 |
GL_VERSION, GL_VERTEX_ARRAY, GLenum, GL_FRAMEBUFFER_EXT, |
112 |
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
|
113 |
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
|
114 |
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
|
115 |
GL_NO_ERROR, GL_ARRAY_BUFFER, GL_STATIC_DRAW, GLEW_OK, |
10133 | 116 |
GL_AUX_BUFFERS, GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE, GL_ADD, |
117 |
GL_MODELVIEW_MATRIX: integer; |
|
6838 | 118 |
|
119 |
TThreadId : function : integer; |
|
10015 | 120 |
|
7151 | 121 |
_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
|
122 |
_strcompare, _strncompare, _strcomparec, _strncompareA : function : boolean; |
10120 | 123 |
_strconcatA, _strappendA : function : ansistring; |
6893 | 124 |
|
125 |
png_structp, png_set_write_fn, png_get_io_ptr, |
|
126 |
png_get_libpng_ver, png_create_write_struct, |
|
127 |
png_create_info_struct, png_destroy_write_struct, |
|
128 |
png_write_row, png_set_ihdr, png_write_info, |
|
129 |
png_write_end : procedure; |
|
6894 | 130 |
|
8026
4a4f21070479
merge xymeng's gsoc engine with a few updates (and further checks on symbol definitions)
koda
parents:
7616
diff
changeset
|
131 |
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
|
132 |
SDL_InitPatch : procedure; |
7066
12cc2bd84b0b
Make pas2c even more happier with uGears.c, allow assigning arrays in some cases
unc0rr
parents:
7065
diff
changeset
|
133 |
|
11648 | 134 |
PHYSFS_init, PHYSFS_deinit, PHYSFS_mount, PHYSFS_readBytes, PHYSFS_writeBytes, PHYSFS_read : function : LongInt; |
135 |
PHYSFSRWOPS_openRead, PHYSFSRWOPS_openWrite, PHYSFS_openRead, PHYSFS_openWrite : function : pointer; |
|
136 |
PHYSFS_eof, PHYSFS_close, PHYSFS_exists, PHYSFS_mkdir, PHYSFS_flush, PHYSFS_setWriteDir : function : boolean; |
|
10080 | 137 |
PHYSFS_getLastError : function : PChar; |
11648 | 138 |
PHYSFS_enumerateFiles : function : PPChar; |
139 |
PHYSFS_freeList : procedure; |
|
9260 | 140 |
|
141 |
hedgewarsMountPackages, physfsReaderSetBuffer, hedgewarsMountPackage : procedure; |
|
142 |
physfsReader : function : pointer; |