2 typedef long long int64;
3 typedef unsigned long long uint64;
7 #elif defined(__TINYC__)
9 #define __builtin_va_list va_list
10 #define __builtin_va_start va_start
11 #define __builtin_va_end va_end
13 #define strcasecmp stricmp
14 #define strncasecmp strnicmp
15 #define __declspec(x) __attribute__((x))
19 typedef long long int64;
20 typedef unsigned long long uint64;
22 typedef __int64 int64;
23 typedef unsigned __int64 uint64;
26 #define __ENDIAN_PAD(x) (8 - (x))
28 #define __ENDIAN_PAD(x) 0
31 #include <sys/types.h>
32 extern void * __ecereNameSpace__ecere__com__eSystem_New(unsigned int size);
34 extern void * __ecereNameSpace__ecere__com__eSystem_New0(unsigned int size);
36 extern void * __ecereNameSpace__ecere__com__eSystem_Renew(void * memory, unsigned int size);
38 extern void * __ecereNameSpace__ecere__com__eSystem_Renew0(void * memory, unsigned int size);
40 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
42 struct __ecereNameSpace__ecere__sys__BTNode;
44 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
46 struct __ecereNameSpace__ecere__sys__BinaryTree
48 struct __ecereNameSpace__ecere__sys__BTNode * root;
50 int (* CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
51 void (* FreeKey)(void * key);
52 } __attribute__ ((gcc_struct));
54 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
56 struct __ecereNameSpace__ecere__sys__OldList
63 } __attribute__ ((gcc_struct));
65 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
67 struct __ecereNameSpace__ecere__com__Method
70 struct __ecereNameSpace__ecere__com__Method * parent;
71 struct __ecereNameSpace__ecere__com__Method * left;
72 struct __ecereNameSpace__ecere__com__Method * right;
77 struct __ecereNameSpace__ecere__com__Class * _class;
79 char * dataTypeString;
80 struct Type * dataType;
82 } __attribute__ ((gcc_struct));
84 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
86 struct __ecereNameSpace__ecere__com__Property
88 struct __ecereNameSpace__ecere__com__Property * prev;
89 struct __ecereNameSpace__ecere__com__Property * next;
91 unsigned int isProperty;
94 struct __ecereNameSpace__ecere__com__Class * _class;
95 char * dataTypeString;
96 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
97 struct Type * dataType;
98 void (* Set)(void * , int);
100 unsigned int (* IsSet)(void * );
104 unsigned int conversion;
105 unsigned int watcherOffset;
107 unsigned int compiled;
108 unsigned int selfWatchable;
109 unsigned int isWatchable;
110 } __attribute__ ((gcc_struct));
112 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_CodePosition;
119 unsigned int included;
120 } __attribute__ ((gcc_struct));
122 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Location;
126 struct CodePosition start;
127 struct CodePosition end;
128 } __attribute__ ((gcc_struct));
130 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attrib;
134 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ExtDecl;
138 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDefinition;
140 struct ClassDefinition;
142 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
146 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
148 struct Instantiation;
150 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
154 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
158 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
162 struct TypeName * prev;
163 struct TypeName * next;
165 struct __ecereNameSpace__ecere__sys__OldList * qualifiers;
166 struct Declarator * declarator;
168 struct Expression * bitCount;
169 } __attribute__ ((gcc_struct));
171 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
175 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
177 struct __ecereNameSpace__ecere__com__DataValue
192 } __attribute__ ((gcc_struct));
193 } __attribute__ ((gcc_struct));
195 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
199 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
201 struct TemplateDatatype;
203 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
205 struct TemplateArgument;
207 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
209 struct TemplateParameter;
211 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
215 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
219 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Pointer;
223 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
227 struct Declarator * prev;
228 struct Declarator * next;
231 struct Symbol * symbol;
232 struct Declarator * declarator;
235 struct Identifier * identifier;
238 struct Expression * exp;
239 struct Expression * posExp;
240 struct Attrib * attrib;
241 } __attribute__ ((gcc_struct)) structDecl;
244 struct Expression * exp;
245 struct Specifier * enumClass;
246 } __attribute__ ((gcc_struct)) array;
249 struct __ecereNameSpace__ecere__sys__OldList * parameters;
250 } __attribute__ ((gcc_struct)) function;
253 struct Pointer * pointer;
254 } __attribute__ ((gcc_struct)) pointer;
257 struct ExtDecl * extended;
258 } __attribute__ ((gcc_struct)) extended;
259 } __attribute__ ((gcc_struct));
260 } __attribute__ ((gcc_struct));
262 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
264 struct FunctionDefinition;
266 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
270 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
274 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
278 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
282 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
286 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
290 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
292 struct __ecereNameSpace__ecere__com__Class
294 struct __ecereNameSpace__ecere__com__Class * prev;
295 struct __ecereNameSpace__ecere__com__Class * next;
301 int (* Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
302 void (* Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
305 struct __ecereNameSpace__ecere__com__Class * base;
306 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
307 struct __ecereNameSpace__ecere__sys__BinaryTree members;
308 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
309 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
310 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
311 struct __ecereNameSpace__ecere__sys__OldList derivatives;
315 struct __ecereNameSpace__ecere__com__Instance * module;
316 struct __ecereNameSpace__ecere__com__NameSpace * nameSpace;
317 char * dataTypeString;
318 struct Type * dataType;
320 int defaultAlignment;
321 void (* Initialize)();
323 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
324 char * designerClass;
325 unsigned int noExpansion;
326 char * defaultProperty;
327 unsigned int comRedefinition;
329 unsigned int isRemote;
330 unsigned int internalDecl;
332 unsigned int computeSize;
334 int destructionWatchOffset;
336 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
337 int inheritanceAccess;
340 struct __ecereNameSpace__ecere__sys__OldList conversions;
341 struct __ecereNameSpace__ecere__sys__OldList templateParams;
342 struct __ecereNameSpace__ecere__com__ClassTemplateArgument * templateArgs;
343 struct __ecereNameSpace__ecere__com__Class * templateClass;
344 struct __ecereNameSpace__ecere__sys__OldList templatized;
346 } __attribute__ ((gcc_struct));
348 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, char * name);
350 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
352 struct __ecereNameSpace__ecere__com__Instance
355 struct __ecereNameSpace__ecere__com__Class * _class;
357 } __attribute__ ((gcc_struct));
359 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
361 struct __ecereNameSpace__ecere__com__DataMember
363 struct __ecereNameSpace__ecere__com__DataMember * prev;
364 struct __ecereNameSpace__ecere__com__DataMember * next;
366 unsigned int isProperty;
369 struct __ecereNameSpace__ecere__com__Class * _class;
370 char * dataTypeString;
371 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
372 struct Type * dataType;
376 struct __ecereNameSpace__ecere__sys__OldList members;
377 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
380 } __attribute__ ((gcc_struct));
382 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
384 struct __ecereNameSpace__ecere__com__SerialBuffer
386 unsigned char * _buffer;
390 } __attribute__ ((gcc_struct));
392 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
394 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
400 char * dataTypeString;
401 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
402 } __attribute__ ((gcc_struct));
403 struct __ecereNameSpace__ecere__com__DataValue expression;
409 struct __ecereNameSpace__ecere__com__DataMember * member;
410 struct __ecereNameSpace__ecere__com__Property * prop;
411 struct __ecereNameSpace__ecere__com__Method * method;
412 } __attribute__ ((gcc_struct));
413 } __attribute__ ((gcc_struct));
414 } __attribute__ ((gcc_struct));
415 } __attribute__ ((gcc_struct));
417 unsigned int parsingType;
419 void SetParsingType(unsigned int b)
424 extern struct TypeName * parsedType;
426 extern unsigned int echoOn;
428 extern unsigned int type_yydebug;
430 extern struct Location yylloc;
434 void resetScannerPos(struct CodePosition * pos);
436 extern struct Declarator * CopyDeclarator(struct Declarator * declarator);
438 extern int printf(char * , ...);
440 extern void FreeDeclarator(struct Declarator * decl);
442 struct Declarator * PlugDeclarator(struct Declarator * decl, struct Declarator * baseDecl)
444 if(decl && decl->type != 1)
446 struct Declarator * base;
448 decl = CopyDeclarator(decl);
452 for(; base->declarator && base->declarator->type != 1; base = base->declarator)
460 FreeDeclarator(base->declarator);
461 base->declarator = baseDecl;
463 else if(base->type == 1)
465 FreeDeclarator(decl);
466 decl = (((void *)0));
474 extern struct Declarator * MkDeclaratorIdentifier(struct Identifier * id);
476 extern struct Identifier * MkIdentifier(char * string);
478 extern struct Declarator * MkDeclaratorPointer(struct Pointer * pointer, struct Declarator * declarator);
480 extern struct Pointer * MkPointer(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Pointer * pointer);
482 struct Declarator * QMkPtrDecl(char * id)
484 struct Declarator * declarator = id ? MkDeclaratorIdentifier(MkIdentifier(id)) : (((void *)0));
486 return MkDeclaratorPointer(MkPointer((((void *)0)), (((void *)0))), declarator);
489 extern struct __ecereNameSpace__ecere__sys__OldList * MkList(void);
491 extern void ListAdd(struct __ecereNameSpace__ecere__sys__OldList * list, void * item);
493 extern struct Specifier * MkSpecifierName(char * name);
495 extern struct TypeName * MkTypeName(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Declarator * declarator);
497 struct TypeName * QMkType(char * spec, struct Declarator * decl)
499 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
501 ListAdd(specs, MkSpecifierName(spec));
502 return MkTypeName(specs, decl);
505 struct TypeName * QMkClass(char * spec, struct Declarator * decl)
507 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
509 ListAdd(specs, MkSpecifierName(spec));
510 return MkTypeName(specs, decl);
513 extern struct Expression * MkExpBrackets(struct __ecereNameSpace__ecere__sys__OldList * expressions);
515 struct Expression * QBrackets(struct Expression * exp)
517 struct __ecereNameSpace__ecere__sys__OldList * expList = MkList();
519 ListAdd(expList, exp);
520 return MkExpBrackets(expList);
523 extern struct Expression * MkExpIdentifier(struct Identifier * id);
525 struct Expression * QMkExpId(char * id)
527 return MkExpIdentifier(MkIdentifier(id));
530 extern struct Expression * MkExpCondition(struct Expression * cond, struct __ecereNameSpace__ecere__sys__OldList * expressions, struct Expression * elseExp);
532 struct Expression * QMkExpCond(struct Expression * cond, struct Expression * exp, struct Expression * elseExp)
534 struct __ecereNameSpace__ecere__sys__OldList * expList = MkList();
536 ListAdd(expList, exp);
537 return MkExpCondition(cond, expList, elseExp);
540 extern struct Declaration * MkDeclaration(struct __ecereNameSpace__ecere__sys__OldList * specifiers, struct __ecereNameSpace__ecere__sys__OldList * initDeclarators);
542 struct Declaration * QMkDeclaration(char * name, struct InitDeclarator * initDecl)
544 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList(), * initDecls = (((void *)0));
546 ListAdd(specs, MkSpecifierName(name));
549 initDecls = MkList();
550 ListAdd(initDecls, initDecl);
552 return MkDeclaration(specs, initDecls);
555 extern struct Specifier * MkSpecifier(int specifier);
557 struct Declaration * QMkDeclarationBase(int base, struct InitDeclarator * initDecl)
559 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList(), * initDecls = (((void *)0));
561 ListAdd(specs, MkSpecifier(base));
564 initDecls = MkList();
565 ListAdd(initDecls, initDecl);
567 return MkDeclaration(specs, initDecls);
570 extern char * __ecereNameSpace__ecere__sys__CopyString(char * string);
572 char * QMkString(char * source)
582 for(i = 0; (ch = source[i]); i++)
585 if(ch == '\"' || ch == '\\')
588 string = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (len + 3));
590 for(i = 0; (ch = source[i]); i++)
592 if(ch == '\"' || ch == '\\')
600 string = __ecereNameSpace__ecere__sys__CopyString("0");
604 struct Declarator * GetFuncDecl(struct Declarator * decl)
606 struct Declarator * funcDecl = (((void *)0));
608 while(decl && decl->type != 1)
612 decl = decl->declarator;
617 unsigned int parseTypeError;
619 extern struct __ecereNameSpace__ecere__com__Instance * fileInput;
621 extern size_t strlen(const char * );
625 extern void resetScanner();
627 extern struct Declarator * MkStructDeclarator(struct Declarator * declarator, struct Expression * exp);
629 extern void FreeTypeName(struct TypeName * typeName);
631 extern void Compiler_Warning(char * format, ...);
633 extern char * __ecereNameSpace__ecere__GetTranslatedString(struct __ecereNameSpace__ecere__com__Instance * module, char * string, char * stringAndContext);
635 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
637 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__TempFile;
639 extern void * __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
641 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Write;
643 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek;
645 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
647 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(struct __ecereNameSpace__ecere__sys__OldList * this, void * item);
649 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void * item);
651 struct Declarator * SpecDeclFromString(char * string, struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * baseDecl)
653 struct Location oldLocation = yylloc;
654 struct Declarator * decl = (((void *)0));
655 struct __ecereNameSpace__ecere__com__Instance * backFileInput = fileInput;
659 fileInput = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__sys__TempFile);
660 ((int (*)(struct __ecereNameSpace__ecere__com__Instance *, void * buffer, unsigned int size, unsigned int count))fileInput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Write])(fileInput, string, 1, strlen(string));
661 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, int pos, int mode))fileInput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek])(fileInput, 0, 0);
663 parseTypeError = 0x0;
664 parsedType = (((void *)0));
668 unsigned int oldParsingType = parsingType;
672 parsingType = oldParsingType;
676 (__ecereNameSpace__ecere__com__eInstance_DecRef(fileInput), fileInput = 0);
679 if(parsedType->qualifiers)
681 struct Specifier * spec;
683 for(; (spec = (*parsedType->qualifiers).first); )
685 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*parsedType->qualifiers), spec);
686 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*specs), spec);
689 if(parsedType->bitCount)
691 parsedType->declarator = MkStructDeclarator(parsedType->declarator, parsedType->bitCount);
692 parsedType->bitCount = (((void *)0));
694 decl = PlugDeclarator(parsedType->declarator, baseDecl);
695 FreeTypeName(parsedType);
696 parsedType = (((void *)0));
699 Compiler_Warning(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "parsing type %s\n", (((void *)0))), string);
704 Compiler_Warning(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "parsing type %s\n", (((void *)0))), string);
707 yylloc = oldLocation;
708 fileInput = backFileInput;
712 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
714 struct __ecereNameSpace__ecere__com__GlobalFunction;
716 extern struct __ecereNameSpace__ecere__com__GlobalFunction * __ecereNameSpace__ecere__com__eSystem_RegisterFunction(char * name, char * type, void * func, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
718 void __ecereRegisterModule_shortcuts(struct __ecereNameSpace__ecere__com__Instance * module)
720 struct __ecereNameSpace__ecere__com__Class * class;
722 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetParsingType", "void SetParsingType(bool b)", SetParsingType, module, 1);
723 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("PlugDeclarator", "Declarator PlugDeclarator(Declarator decl, Declarator baseDecl)", PlugDeclarator, module, 2);
724 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("QMkPtrDecl", "Declarator QMkPtrDecl(char * id)", QMkPtrDecl, module, 2);
725 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("QMkType", "TypeName QMkType(char * spec, Declarator decl)", QMkType, module, 2);
726 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("QMkClass", "TypeName QMkClass(char * spec, Declarator decl)", QMkClass, module, 2);
727 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("QBrackets", "Expression QBrackets(Expression exp)", QBrackets, module, 2);
728 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("QMkExpId", "Expression QMkExpId(char * id)", QMkExpId, module, 2);
729 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("QMkExpCond", "Expression QMkExpCond(Expression cond, Expression exp, Expression elseExp)", QMkExpCond, module, 2);
730 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("QMkDeclaration", "Declaration QMkDeclaration(char * name, InitDeclarator initDecl)", QMkDeclaration, module, 2);
731 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("QMkDeclarationBase", "Declaration QMkDeclarationBase(int base, InitDeclarator initDecl)", QMkDeclarationBase, module, 2);
732 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("QMkString", "char * QMkString(char * source)", QMkString, module, 2);
733 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetFuncDecl", "Declarator GetFuncDecl(Declarator decl)", GetFuncDecl, module, 1);
734 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SpecDeclFromString", "Declarator SpecDeclFromString(char * string, ecere::sys::OldList * specs, Declarator baseDecl)", SpecDeclFromString, module, 1);
737 void __ecereUnregisterModule_shortcuts(struct __ecereNameSpace__ecere__com__Instance * module)