a6bc2a689279fd384a68c1b4975389889fc7ecbe
[sdk] / compiler / bootstrap / libec / bootstrap / firstPass.c
1 #if defined(__GNUC__)
2 typedef long long int64;
3 typedef unsigned long long uint64;
4 #ifndef _WIN32
5 #define __declspec(x)
6 #endif
7 #elif defined(__TINYC__)
8 #include <stdarg.h>
9 #define __builtin_va_list va_list
10 #define __builtin_va_start va_start
11 #define __builtin_va_end va_end
12 #ifdef _WIN32
13 #define strcasecmp stricmp
14 #define strncasecmp strnicmp
15 #define __declspec(x) __attribute__((x))
16 #else
17 #define __declspec(x)
18 #endif
19 typedef long long int64;
20 typedef unsigned long long uint64;
21 #else
22 typedef __int64 int64;
23 typedef unsigned __int64 uint64;
24 #endif
25 #ifdef __BIG_ENDIAN__
26 #define __ENDIAN_PAD(x) (8 - (x))
27 #else
28 #define __ENDIAN_PAD(x) 0
29 #endif
30 #include <stdint.h>
31 #include <sys/types.h>
32 extern void *  __ecereNameSpace__ecere__com__eSystem_New(unsigned int size);
33
34 extern void *  __ecereNameSpace__ecere__com__eSystem_New0(unsigned int size);
35
36 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew(void *  memory, unsigned int size);
37
38 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew0(void *  memory, unsigned int size);
39
40 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
41
42 struct __ecereNameSpace__ecere__sys__BTNode;
43
44 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
45
46 struct __ecereNameSpace__ecere__sys__BinaryTree
47 {
48 struct __ecereNameSpace__ecere__sys__BTNode * root;
49 int count;
50 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
51 void (*  FreeKey)(void *  key);
52 } __attribute__ ((gcc_struct));
53
54 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
55
56 struct __ecereNameSpace__ecere__sys__OldList
57 {
58 void *  first;
59 void *  last;
60 int count;
61 unsigned int offset;
62 unsigned int circ;
63 } __attribute__ ((gcc_struct));
64
65 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
66
67 struct __ecereNameSpace__ecere__com__Method
68 {
69 char *  name;
70 struct __ecereNameSpace__ecere__com__Method * parent;
71 struct __ecereNameSpace__ecere__com__Method * left;
72 struct __ecereNameSpace__ecere__com__Method * right;
73 int depth;
74 int (*  function)();
75 int vid;
76 int type;
77 struct __ecereNameSpace__ecere__com__Class * _class;
78 void *  symbol;
79 char *  dataTypeString;
80 struct Type * dataType;
81 int memberAccess;
82 } __attribute__ ((gcc_struct));
83
84 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
85
86 struct __ecereNameSpace__ecere__com__Property
87 {
88 struct __ecereNameSpace__ecere__com__Property * prev;
89 struct __ecereNameSpace__ecere__com__Property * next;
90 char *  name;
91 unsigned int isProperty;
92 int memberAccess;
93 int id;
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);
99 int (*  Get)(void * );
100 unsigned int (*  IsSet)(void * );
101 void *  data;
102 void *  symbol;
103 int vid;
104 unsigned int conversion;
105 unsigned int watcherOffset;
106 char *  category;
107 unsigned int compiled;
108 unsigned int selfWatchable;
109 unsigned int isWatchable;
110 } __attribute__ ((gcc_struct));
111
112 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_CodePosition;
113
114 struct CodePosition
115 {
116 int line;
117 int charPos;
118 int pos;
119 unsigned int included;
120 } __attribute__ ((gcc_struct));
121
122 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Location;
123
124 struct Location
125 {
126 struct CodePosition start;
127 struct CodePosition end;
128 } __attribute__ ((gcc_struct));
129
130 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attrib;
131
132 struct Attrib;
133
134 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ExtDecl;
135
136 struct ExtDecl;
137
138 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDefinition;
139
140 struct ClassDefinition
141 {
142 struct ClassDefinition * prev;
143 struct ClassDefinition * next;
144 struct Location loc;
145 struct Specifier * _class;
146 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
147 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
148 struct Symbol * symbol;
149 struct Location blockStart;
150 struct Location nameLoc;
151 int endid;
152 int declMode;
153 unsigned int deleteWatchable;
154 } __attribute__ ((gcc_struct));
155
156 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
157
158 struct Context
159 {
160 struct Context * parent;
161 struct __ecereNameSpace__ecere__sys__BinaryTree types;
162 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
163 struct __ecereNameSpace__ecere__sys__BinaryTree symbols;
164 struct __ecereNameSpace__ecere__sys__BinaryTree structSymbols;
165 int nextID;
166 int simpleID;
167 struct __ecereNameSpace__ecere__sys__BinaryTree templateTypes;
168 struct ClassDefinition * classDef;
169 unsigned int templateTypesOnly;
170 unsigned int hasNameSpace;
171 } __attribute__ ((gcc_struct));
172
173 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
174
175 struct Instantiation
176 {
177 struct Instantiation * prev;
178 struct Instantiation * next;
179 struct Location loc;
180 struct Specifier * _class;
181 struct Expression * exp;
182 struct __ecereNameSpace__ecere__sys__OldList *  members;
183 struct Symbol * symbol;
184 unsigned int fullSet;
185 unsigned int isConstant;
186 unsigned char *  data;
187 struct Location nameLoc;
188 struct Location insideLoc;
189 unsigned int built;
190 } __attribute__ ((gcc_struct));
191
192 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
193
194 struct Declaration
195 {
196 struct Declaration * prev;
197 struct Declaration * next;
198 struct Location loc;
199 int type;
200 union
201 {
202 struct
203 {
204 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
205 struct __ecereNameSpace__ecere__sys__OldList *  declarators;
206 } __attribute__ ((gcc_struct));
207 struct Instantiation * inst;
208 struct
209 {
210 struct Identifier * id;
211 struct Expression * exp;
212 } __attribute__ ((gcc_struct));
213 } __attribute__ ((gcc_struct));
214 struct Specifier * extStorage;
215 struct Symbol * symbol;
216 int declMode;
217 } __attribute__ ((gcc_struct));
218
219 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
220
221 struct Statement;
222
223 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
224
225 struct TypeName;
226
227 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
228
229 struct Initializer;
230
231 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
232
233 struct __ecereNameSpace__ecere__com__DataValue
234 {
235 union
236 {
237 char c;
238 unsigned char uc;
239 short s;
240 unsigned short us;
241 int i;
242 unsigned int ui;
243 void *  p;
244 float f;
245 double d;
246 long long i64;
247 uint64 ui64;
248 } __attribute__ ((gcc_struct));
249 } __attribute__ ((gcc_struct));
250
251 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
252
253 struct Expression
254 {
255 struct Expression * prev;
256 struct Expression * next;
257 struct Location loc;
258 int type;
259 union
260 {
261 struct
262 {
263 char *  constant;
264 struct Identifier * identifier;
265 } __attribute__ ((gcc_struct));
266 struct Statement * compound;
267 struct Instantiation * instance;
268 char *  string;
269 struct __ecereNameSpace__ecere__sys__OldList *  list;
270 struct
271 {
272 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
273 struct Declarator * decl;
274 } __attribute__ ((gcc_struct)) _classExp;
275 struct
276 {
277 struct Identifier * id;
278 } __attribute__ ((gcc_struct)) classData;
279 struct
280 {
281 struct Expression * exp;
282 struct __ecereNameSpace__ecere__sys__OldList * arguments;
283 struct Location argLoc;
284 } __attribute__ ((gcc_struct)) call;
285 struct
286 {
287 struct Expression * exp;
288 struct __ecereNameSpace__ecere__sys__OldList * index;
289 } __attribute__ ((gcc_struct)) index;
290 struct
291 {
292 struct Expression * exp;
293 struct Identifier * member;
294 int memberType;
295 unsigned int thisPtr;
296 } __attribute__ ((gcc_struct)) member;
297 struct
298 {
299 int op;
300 struct Expression * exp1;
301 struct Expression * exp2;
302 } __attribute__ ((gcc_struct)) op;
303 struct TypeName * typeName;
304 struct Specifier * _class;
305 struct
306 {
307 struct TypeName * typeName;
308 struct Expression * exp;
309 } __attribute__ ((gcc_struct)) cast;
310 struct
311 {
312 struct Expression * cond;
313 struct __ecereNameSpace__ecere__sys__OldList * exp;
314 struct Expression * elseExp;
315 } __attribute__ ((gcc_struct)) cond;
316 struct
317 {
318 struct TypeName * typeName;
319 struct Expression * size;
320 } __attribute__ ((gcc_struct)) _new;
321 struct
322 {
323 struct TypeName * typeName;
324 struct Expression * size;
325 struct Expression * exp;
326 } __attribute__ ((gcc_struct)) _renew;
327 struct
328 {
329 char * table;
330 struct Identifier * id;
331 } __attribute__ ((gcc_struct)) db;
332 struct
333 {
334 struct Expression * ds;
335 struct Expression * name;
336 } __attribute__ ((gcc_struct)) dbopen;
337 struct
338 {
339 struct TypeName * typeName;
340 struct Initializer * initializer;
341 } __attribute__ ((gcc_struct)) initializer;
342 struct
343 {
344 struct Expression * exp;
345 struct TypeName * typeName;
346 } __attribute__ ((gcc_struct)) vaArg;
347 } __attribute__ ((gcc_struct));
348 unsigned int debugValue;
349 struct __ecereNameSpace__ecere__com__DataValue val;
350 uint64 address;
351 unsigned int hasAddress;
352 struct Type * expType;
353 struct Type * destType;
354 unsigned int usage;
355 int tempCount;
356 unsigned int byReference;
357 unsigned int isConstant;
358 unsigned int addedThis;
359 unsigned int needCast;
360 unsigned int thisPtr;
361 } __attribute__ ((gcc_struct));
362
363 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
364
365 struct TemplateDatatype
366 {
367 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
368 struct Declarator * decl;
369 } __attribute__ ((gcc_struct));
370
371 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
372
373 struct TemplateArgument
374 {
375 struct TemplateArgument * prev;
376 struct TemplateArgument * next;
377 struct Location loc;
378 struct Identifier * name;
379 int type;
380 union
381 {
382 struct Expression * expression;
383 struct Identifier * identifier;
384 struct TemplateDatatype * templateDatatype;
385 } __attribute__ ((gcc_struct));
386 } __attribute__ ((gcc_struct));
387
388 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
389
390 struct TemplateParameter
391 {
392 struct TemplateParameter * prev;
393 struct TemplateParameter * next;
394 struct Location loc;
395 int type;
396 struct Identifier * identifier;
397 union
398 {
399 struct TemplateDatatype * dataType;
400 int memberType;
401 } __attribute__ ((gcc_struct));
402 struct TemplateArgument * defaultArgument;
403 char *  dataTypeString;
404 struct Type * baseType;
405 } __attribute__ ((gcc_struct));
406
407 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
408
409 struct Specifier
410 {
411 struct Specifier * prev;
412 struct Specifier * next;
413 struct Location loc;
414 int type;
415 union
416 {
417 int specifier;
418 struct
419 {
420 struct ExtDecl * extDecl;
421 char *  name;
422 struct Symbol * symbol;
423 struct __ecereNameSpace__ecere__sys__OldList *  templateArgs;
424 } __attribute__ ((gcc_struct));
425 struct
426 {
427 struct Identifier * id;
428 struct __ecereNameSpace__ecere__sys__OldList *  list;
429 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
430 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
431 unsigned int addNameSpace;
432 struct Context * ctx;
433 struct ExtDecl * extDeclStruct;
434 } __attribute__ ((gcc_struct));
435 struct Expression * expression;
436 struct Specifier * _class;
437 struct TemplateParameter * templateParameter;
438 } __attribute__ ((gcc_struct));
439 } __attribute__ ((gcc_struct));
440
441 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
442
443 struct Identifier
444 {
445 struct Identifier * prev;
446 struct Identifier * next;
447 struct Location loc;
448 struct Symbol * classSym;
449 struct Specifier * _class;
450 char *  string;
451 struct Identifier * badID;
452 } __attribute__ ((gcc_struct));
453
454 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Pointer;
455
456 struct Pointer;
457
458 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
459
460 struct Declarator
461 {
462 struct Declarator * prev;
463 struct Declarator * next;
464 struct Location loc;
465 int type;
466 struct Symbol * symbol;
467 struct Declarator * declarator;
468 union
469 {
470 struct Identifier * identifier;
471 struct
472 {
473 struct Expression * exp;
474 struct Expression * posExp;
475 struct Attrib * attrib;
476 } __attribute__ ((gcc_struct)) structDecl;
477 struct
478 {
479 struct Expression * exp;
480 struct Specifier * enumClass;
481 } __attribute__ ((gcc_struct)) array;
482 struct
483 {
484 struct __ecereNameSpace__ecere__sys__OldList * parameters;
485 } __attribute__ ((gcc_struct)) function;
486 struct
487 {
488 struct Pointer * pointer;
489 } __attribute__ ((gcc_struct)) pointer;
490 struct
491 {
492 struct ExtDecl * extended;
493 } __attribute__ ((gcc_struct)) extended;
494 } __attribute__ ((gcc_struct));
495 } __attribute__ ((gcc_struct));
496
497 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
498
499 struct FunctionDefinition;
500
501 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
502
503 struct DBTableDef;
504
505 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
506
507 struct External
508 {
509 struct External * prev;
510 struct External * next;
511 struct Location loc;
512 int type;
513 struct Symbol * symbol;
514 union
515 {
516 struct FunctionDefinition * function;
517 struct ClassDefinition * _class;
518 struct Declaration * declaration;
519 char *  importString;
520 struct Identifier * id;
521 struct DBTableDef * table;
522 } __attribute__ ((gcc_struct));
523 int importType;
524 } __attribute__ ((gcc_struct));
525
526 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
527
528 struct ModuleImport;
529
530 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
531
532 struct ClassImport;
533
534 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
535
536 struct Symbol
537 {
538 char *  string;
539 struct Symbol * parent;
540 struct Symbol * left;
541 struct Symbol * right;
542 int depth;
543 struct Type * type;
544 union
545 {
546 struct __ecereNameSpace__ecere__com__Method * method;
547 struct __ecereNameSpace__ecere__com__Property * _property;
548 struct __ecereNameSpace__ecere__com__Class * registered;
549 } __attribute__ ((gcc_struct));
550 int id;
551 int idCode;
552 union
553 {
554 struct
555 {
556 struct External * pointerExternal;
557 struct External * structExternal;
558 } __attribute__ ((gcc_struct));
559 struct
560 {
561 struct External * externalGet;
562 struct External * externalSet;
563 struct External * externalPtr;
564 struct External * externalIsSet;
565 } __attribute__ ((gcc_struct));
566 struct
567 {
568 struct External * methodExternal;
569 struct External * methodCodeExternal;
570 } __attribute__ ((gcc_struct));
571 } __attribute__ ((gcc_struct));
572 unsigned int imported;
573 unsigned int declaredStructSym;
574 struct __ecereNameSpace__ecere__com__Class * _class;
575 unsigned int declaredStruct;
576 unsigned int needConstructor;
577 unsigned int needDestructor;
578 char *  constructorName;
579 char *  structName;
580 char *  className;
581 char *  destructorName;
582 struct ModuleImport * module;
583 struct ClassImport * _import;
584 struct Location nameLoc;
585 unsigned int isParam;
586 unsigned int isRemote;
587 unsigned int isStruct;
588 unsigned int fireWatchersDone;
589 int declaring;
590 unsigned int classData;
591 unsigned int isStatic;
592 char *  shortName;
593 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
594 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
595 struct Context * ctx;
596 int isIterator;
597 struct Expression * propCategory;
598 } __attribute__ ((gcc_struct));
599
600 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
601
602 struct Type
603 {
604 struct Type * prev;
605 struct Type * next;
606 int refCount;
607 union
608 {
609 struct Symbol * _class;
610 struct
611 {
612 struct __ecereNameSpace__ecere__sys__OldList members;
613 char *  enumName;
614 } __attribute__ ((gcc_struct));
615 struct
616 {
617 struct Type * returnType;
618 struct __ecereNameSpace__ecere__sys__OldList params;
619 struct Symbol * thisClass;
620 unsigned int staticMethod;
621 struct TemplateParameter * thisClassTemplate;
622 } __attribute__ ((gcc_struct));
623 struct
624 {
625 struct __ecereNameSpace__ecere__com__Method * method;
626 struct __ecereNameSpace__ecere__com__Class * methodClass;
627 struct __ecereNameSpace__ecere__com__Class * usedClass;
628 } __attribute__ ((gcc_struct));
629 struct
630 {
631 struct Type * arrayType;
632 int arraySize;
633 struct Expression * arraySizeExp;
634 unsigned int freeExp;
635 struct Symbol * enumClass;
636 } __attribute__ ((gcc_struct));
637 struct Type * type;
638 struct TemplateParameter * templateParameter;
639 } __attribute__ ((gcc_struct));
640 unsigned int isSigned;
641 int kind;
642 unsigned int constant;
643 unsigned int size;
644 char *  name;
645 char *  typeName;
646 unsigned int count;
647 unsigned int truth;
648 int classObjectType;
649 unsigned int byReference;
650 unsigned int extraParam;
651 int alignment;
652 unsigned int directClassAccess;
653 unsigned int computing;
654 unsigned int dllExport;
655 unsigned int offset;
656 unsigned int keepCast;
657 unsigned int passAsTemplate;
658 int bitFieldCount;
659 } __attribute__ ((gcc_struct));
660
661 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
662
663 struct __ecereNameSpace__ecere__com__Class
664 {
665 struct __ecereNameSpace__ecere__com__Class * prev;
666 struct __ecereNameSpace__ecere__com__Class * next;
667 char *  name;
668 int offset;
669 int structSize;
670 int (* *  _vTbl)();
671 int vTblSize;
672 int (*  Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
673 void (*  Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
674 int offsetClass;
675 int sizeClass;
676 struct __ecereNameSpace__ecere__com__Class * base;
677 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
678 struct __ecereNameSpace__ecere__sys__BinaryTree members;
679 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
680 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
681 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
682 struct __ecereNameSpace__ecere__sys__OldList derivatives;
683 int memberID;
684 int startMemberID;
685 int type;
686 struct __ecereNameSpace__ecere__com__Instance * module;
687 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
688 char *  dataTypeString;
689 struct Type * dataType;
690 int typeSize;
691 int defaultAlignment;
692 void (*  Initialize)();
693 int memberOffset;
694 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
695 char *  designerClass;
696 unsigned int noExpansion;
697 char *  defaultProperty;
698 unsigned int comRedefinition;
699 int count;
700 unsigned int isRemote;
701 unsigned int internalDecl;
702 void *  data;
703 unsigned int computeSize;
704 int structAlignment;
705 int destructionWatchOffset;
706 unsigned int fixed;
707 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
708 int inheritanceAccess;
709 char *  fullName;
710 void *  symbol;
711 struct __ecereNameSpace__ecere__sys__OldList conversions;
712 struct __ecereNameSpace__ecere__sys__OldList templateParams;
713 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
714 struct __ecereNameSpace__ecere__com__Class * templateClass;
715 struct __ecereNameSpace__ecere__sys__OldList templatized;
716 int numParams;
717 } __attribute__ ((gcc_struct));
718
719 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, char *  name);
720
721 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
722
723 struct __ecereNameSpace__ecere__com__Instance
724 {
725 int (* *  _vTbl)();
726 struct __ecereNameSpace__ecere__com__Class * _class;
727 int _refCount;
728 } __attribute__ ((gcc_struct));
729
730 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
731
732 struct __ecereNameSpace__ecere__com__DataMember
733 {
734 struct __ecereNameSpace__ecere__com__DataMember * prev;
735 struct __ecereNameSpace__ecere__com__DataMember * next;
736 char *  name;
737 unsigned int isProperty;
738 int memberAccess;
739 int id;
740 struct __ecereNameSpace__ecere__com__Class * _class;
741 char *  dataTypeString;
742 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
743 struct Type * dataType;
744 int type;
745 int offset;
746 int memberID;
747 struct __ecereNameSpace__ecere__sys__OldList members;
748 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
749 int memberOffset;
750 int structAlignment;
751 } __attribute__ ((gcc_struct));
752
753 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
754
755 struct __ecereNameSpace__ecere__com__SerialBuffer
756 {
757 unsigned char *  _buffer;
758 unsigned int count;
759 unsigned int _size;
760 unsigned int pos;
761 } __attribute__ ((gcc_struct));
762
763 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
764
765 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
766 {
767 union
768 {
769 struct
770 {
771 char *  dataTypeString;
772 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
773 } __attribute__ ((gcc_struct));
774 struct __ecereNameSpace__ecere__com__DataValue expression;
775 struct
776 {
777 char *  memberString;
778 union
779 {
780 struct __ecereNameSpace__ecere__com__DataMember * member;
781 struct __ecereNameSpace__ecere__com__Property * prop;
782 struct __ecereNameSpace__ecere__com__Method * method;
783 } __attribute__ ((gcc_struct));
784 } __attribute__ ((gcc_struct));
785 } __attribute__ ((gcc_struct));
786 } __attribute__ ((gcc_struct));
787
788 enum yytokentype
789 {
790 IDENTIFIER = 258, CONSTANT = 259, STRING_LITERAL = 260, SIZEOF = 261, PTR_OP = 262, INC_OP = 263, DEC_OP = 264, LEFT_OP = 265, RIGHT_OP = 266, LE_OP = 267, GE_OP = 268, EQ_OP = 269, NE_OP = 270, AND_OP = 271, OR_OP = 272, MUL_ASSIGN = 273, DIV_ASSIGN = 274, MOD_ASSIGN = 275, ADD_ASSIGN = 276, SUB_ASSIGN = 277, LEFT_ASSIGN = 278, RIGHT_ASSIGN = 279, AND_ASSIGN = 280, XOR_ASSIGN = 281, OR_ASSIGN = 282, TYPE_NAME = 283, TYPEDEF = 284, EXTERN = 285, STATIC = 286, AUTO = 287, REGISTER = 288, CHAR = 289, SHORT = 290, INT = 291, UINT = 292, INT64 = 293, LONG = 294, SIGNED = 295, UNSIGNED = 296, FLOAT = 297, DOUBLE = 298, CONST = 299, VOLATILE = 300, VOID = 301, VALIST = 302, STRUCT = 303, UNION = 304, ENUM = 305, ELLIPSIS = 306, CASE = 307, DEFAULT = 308, IF = 309, SWITCH = 310, WHILE = 311, DO = 312, FOR = 313, GOTO = 314, CONTINUE = 315, BREAK = 316, RETURN = 317, IFX = 318, ELSE = 319, CLASS = 320, THISCLASS = 321, CLASS_NAME = 322, PROPERTY = 323, SETPROP = 324, GETPROP = 325, NEWOP = 326, RENEW = 327, DELETE = 328, EXT_DECL = 329, EXT_STORAGE = 330, IMPORT = 331, DEFINE = 332, VIRTUAL = 333, ATTRIB = 334, PUBLIC = 335, PRIVATE = 336, TYPED_OBJECT = 337, ANY_OBJECT = 338, _INCREF = 339, EXTENSION = 340, ASM = 341, TYPEOF = 342, WATCH = 343, STOPWATCHING = 344, FIREWATCHERS = 345, WATCHABLE = 346, CLASS_DESIGNER = 347, CLASS_NO_EXPANSION = 348, CLASS_FIXED = 349, ISPROPSET = 350, CLASS_DEFAULT_PROPERTY = 351, PROPERTY_CATEGORY = 352, CLASS_DATA = 353, CLASS_PROPERTY = 354, SUBCLASS = 355, NAMESPACE = 356, NEW0OP = 357, RENEW0 = 358, VAARG = 359, DBTABLE = 360, DBFIELD = 361, DBINDEX = 362, DATABASE_OPEN = 363, ALIGNOF = 364, ATTRIB_DEP = 365, __ATTRIB = 366
791 };
792
793 typedef union YYSTYPE
794 {
795 int specifierType;
796 int i;
797 int declMode;
798 struct Identifier * id;
799 struct Expression * exp;
800 struct Specifier * specifier;
801 struct __ecereNameSpace__ecere__sys__OldList * list;
802 struct Enumerator * enumerator;
803 struct Declarator * declarator;
804 struct Pointer * pointer;
805 struct Initializer * initializer;
806 struct InitDeclarator * initDeclarator;
807 struct TypeName * typeName;
808 struct Declaration * declaration;
809 struct Statement * stmt;
810 struct FunctionDefinition * function;
811 struct External * external;
812 struct Context * context;
813 struct AsmField * asmField;
814 struct Attrib * attrib;
815 struct ExtDecl * extDecl;
816 struct Attribute * attribute;
817 struct Instantiation * instance;
818 struct MembersInit * membersInit;
819 struct MemberInit * memberInit;
820 struct ClassFunction * classFunction;
821 struct ClassDefinition * _class;
822 struct ClassDef * classDef;
823 struct PropertyDef * prop;
824 char * string;
825 struct Symbol * symbol;
826 struct PropertyWatch * propertyWatch;
827 struct TemplateParameter * templateParameter;
828 struct TemplateArgument * templateArgument;
829 struct TemplateDatatype * templateDatatype;
830 struct DBTableEntry * dbtableEntry;
831 struct DBIndexItem * dbindexItem;
832 struct DBTableDef * dbtableDef;
833 } __attribute__ ((gcc_struct)) YYSTYPE;
834
835 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Enumerator;
836
837 struct Enumerator;
838
839 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_InitDeclarator;
840
841 struct InitDeclarator;
842
843 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_AsmField;
844
845 struct AsmField;
846
847 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attribute;
848
849 struct Attribute;
850
851 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassFunction;
852
853 struct ClassFunction
854 {
855 struct ClassFunction * prev;
856 struct ClassFunction * next;
857 struct Location loc;
858 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
859 struct Declarator * declarator;
860 struct __ecereNameSpace__ecere__sys__OldList *  declarations;
861 struct Statement * body;
862 struct __ecereNameSpace__ecere__com__Class * _class;
863 struct __ecereNameSpace__ecere__sys__OldList attached;
864 int declMode;
865 struct Type * type;
866 struct Symbol * propSet;
867 unsigned int isVirtual;
868 unsigned int isConstructor;
869 unsigned int isDestructor;
870 unsigned int dontMangle;
871 int id;
872 int idCode;
873 } __attribute__ ((gcc_struct));
874
875 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MembersInit;
876
877 struct MembersInit;
878
879 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MemberInit;
880
881 struct MemberInit;
882
883 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyDef;
884
885 struct PropertyDef
886 {
887 struct PropertyDef * prev;
888 struct PropertyDef * next;
889 struct Location loc;
890 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
891 struct Declarator * declarator;
892 struct Identifier * id;
893 struct Statement * getStmt;
894 struct Statement * setStmt;
895 struct Statement * issetStmt;
896 struct Symbol * symbol;
897 unsigned int conversion;
898 unsigned int isWatchable;
899 struct Expression * category;
900 } __attribute__ ((gcc_struct));
901
902 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyWatch;
903
904 struct PropertyWatch;
905
906 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDef;
907
908 struct ClassDef
909 {
910 struct ClassDef * prev;
911 struct ClassDef * next;
912 struct Location loc;
913 int type;
914 union
915 {
916 struct Declaration * decl;
917 struct ClassFunction * function;
918 struct __ecereNameSpace__ecere__sys__OldList *  defProperties;
919 struct PropertyDef * propertyDef;
920 struct PropertyWatch * propertyWatch;
921 char *  designer;
922 struct Identifier * defaultProperty;
923 struct
924 {
925 struct Identifier * id;
926 struct Initializer * initializer;
927 } __attribute__ ((gcc_struct));
928 } __attribute__ ((gcc_struct));
929 int memberAccess;
930 void *  object;
931 } __attribute__ ((gcc_struct));
932
933 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableEntry;
934
935 struct DBTableEntry;
936
937 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBIndexItem;
938
939 struct DBIndexItem;
940
941 extern YYSTYPE yylval;
942
943 extern struct Location yylloc;
944
945 extern struct Identifier * GetDeclId(struct Declarator * decl);
946
947 extern void ProcessExpressionType(struct Expression * exp);
948
949 extern void ComputeExpression(struct Expression * exp);
950
951 extern int strtol(char * , char * * , int base);
952
953 extern void FreeExpression(struct Expression * exp);
954
955 extern struct Type * ProcessType(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl);
956
957 extern void PrintType(struct Type * type, char *  string, unsigned int printName, unsigned int fullName);
958
959 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__BitMember;
960
961 struct __ecereNameSpace__ecere__com__BitMember
962 {
963 struct __ecereNameSpace__ecere__com__BitMember * prev;
964 struct __ecereNameSpace__ecere__com__BitMember * next;
965 char *  name;
966 unsigned int isProperty;
967 int memberAccess;
968 int id;
969 struct __ecereNameSpace__ecere__com__Class * _class;
970 char *  dataTypeString;
971 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
972 struct Type * dataType;
973 int type;
974 int size;
975 int pos;
976 uint64 mask;
977 } __attribute__ ((gcc_struct));
978
979 extern struct __ecereNameSpace__ecere__com__BitMember * __ecereNameSpace__ecere__com__eClass_AddBitMember(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, int bitSize, int bitPos, int declMode);
980
981 extern void Compiler_Error(char *  format, ...);
982
983 extern char *  __ecereNameSpace__ecere__GetTranslatedString(struct __ecereNameSpace__ecere__com__Instance * module, char *  string, char *  stringAndContext);
984
985 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
986
987 extern void FreeType(struct Type * type);
988
989 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eMember_AddDataMember(struct __ecereNameSpace__ecere__com__DataMember * member, char *  name, char *  type, unsigned int size, unsigned int alignment, int declMode);
990
991 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eClass_AddDataMember(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, unsigned int size, unsigned int alignment, int declMode);
992
993 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eMember_New(int type, int declMode);
994
995 extern unsigned int __ecereNameSpace__ecere__com__eMember_AddMember(struct __ecereNameSpace__ecere__com__DataMember * addTo, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
996
997 extern unsigned int __ecereNameSpace__ecere__com__eClass_AddMember(struct __ecereNameSpace__ecere__com__Class * _class, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
998
999 extern struct __ecereNameSpace__ecere__sys__OldList *  MkListOne(void *  item);
1000
1001 extern struct Declarator * MkDeclaratorIdentifier(struct Identifier * id);
1002
1003 extern char *  StringFromSpecDecl(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl);
1004
1005 extern struct __ecereNameSpace__ecere__com__Property * __ecereNameSpace__ecere__com__eClass_AddProperty(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  dataType, void *  setStmt, void *  getStmt, int declMode);
1006
1007 extern unsigned int inCompiler;
1008
1009 extern char *  __ecereNameSpace__ecere__sys__CopyString(char *  string);
1010
1011 extern void __ecereNameSpace__ecere__com__eProperty_Watchable(struct __ecereNameSpace__ecere__com__Property * _property);
1012
1013 extern int printf(char * , ...);
1014
1015 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassProperty;
1016
1017 struct __ecereNameSpace__ecere__com__ClassProperty;
1018
1019 extern struct __ecereNameSpace__ecere__com__ClassProperty * __ecereNameSpace__ecere__com__eClass_AddClassProperty(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  dataType, void *  setStmt, void *  getStmt);
1020
1021 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
1022
1023 static void AddDefinitions(struct __ecereNameSpace__ecere__com__Class * regClass, struct __ecereNameSpace__ecere__com__DataMember * member, struct __ecereNameSpace__ecere__sys__OldList * definitions)
1024 {
1025 void * __ecereTemp1;
1026
1027 if(definitions != (((void *)0)))
1028 {
1029 struct ClassDef * def;
1030
1031 for(def = definitions->first; def; def = def->next)
1032 {
1033 if(def->type == 2)
1034 {
1035 struct Declaration * decl = def->decl;
1036 struct __ecereNameSpace__ecere__com__DataMember * dataMember = (((void *)0));
1037 struct Type * dataType;
1038
1039 if(decl->type == 0)
1040 {
1041 struct Declarator * d;
1042
1043 if(decl->declarators)
1044 {
1045 for(d = (*decl->declarators).first; d; d = d->next)
1046 {
1047 struct Identifier * declId = GetDeclId(d);
1048
1049 if(declId)
1050 {
1051 if(regClass && regClass->type == 2)
1052 {
1053 struct Expression * sizeExp = d->structDecl.exp, * posExp = d->structDecl.posExp;
1054 int bitSize = 0, bitPos = -1;
1055 char dataTypeString[1024] = "";
1056
1057 if(sizeExp)
1058 {
1059 ProcessExpressionType(sizeExp);
1060 ComputeExpression(sizeExp);
1061 if(sizeExp->isConstant)
1062 bitSize = strtol(sizeExp->constant, (((void *)0)), 0);
1063 FreeExpression(sizeExp);
1064 }
1065 if(posExp)
1066 {
1067 ProcessExpressionType(posExp);
1068 ComputeExpression(posExp);
1069 if(posExp->isConstant)
1070 bitPos = strtol(posExp->constant, (((void *)0)), 0);
1071 FreeExpression(posExp);
1072 }
1073 d->structDecl.posExp = (((void *)0));
1074 d->structDecl.exp = (((void *)0));
1075 dataType = ProcessType(decl->specifiers, d);
1076 PrintType(dataType, dataTypeString, 0x0, 0x1);
1077 {
1078 struct __ecereNameSpace__ecere__com__BitMember * member = __ecereNameSpace__ecere__com__eClass_AddBitMember(regClass, declId->string, dataTypeString, 0, 0, def->memberAccess);
1079
1080 if(member)
1081 {
1082 member->size = bitSize;
1083 member->pos = bitPos;
1084 }
1085 dataMember = (struct __ecereNameSpace__ecere__com__DataMember *)member;
1086 }
1087 if(dataMember)
1088 dataMember->dataType = dataType;
1089 else
1090 {
1091 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Member with same name already exists %s in class %s\n", (((void *)0))), declId->string, regClass->name);
1092 FreeType(dataType);
1093 }
1094 }
1095 else
1096 {
1097 {
1098 char typeString[1024] = "";
1099
1100 dataType = ProcessType(decl->specifiers, d);
1101 PrintType(dataType, typeString, 0x0, 0x1);
1102 if(member)
1103 {
1104 dataMember = __ecereNameSpace__ecere__com__eMember_AddDataMember(member, declId->string, typeString, 0, 0, def->memberAccess);
1105 if(!dataMember)
1106 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Member with same name already exists %s in member %s\n", (((void *)0))), declId->string, member->name);
1107 }
1108 else if(regClass)
1109 {
1110 dataMember = __ecereNameSpace__ecere__com__eClass_AddDataMember(regClass, declId->string, typeString, 0, 0, def->memberAccess);
1111 if(!dataMember)
1112 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Member with same name already exists %s in class %s\n", (((void *)0))), declId->string, regClass->name);
1113 }
1114 if(dataMember)
1115 dataMember->dataType = dataType;
1116 else
1117 FreeType(dataType);
1118 }
1119 }
1120 }
1121 }
1122 }
1123 else if(decl->specifiers)
1124 {
1125 struct Specifier * spec;
1126
1127 for(spec = (*decl->specifiers).first; spec; spec = spec->next)
1128 {
1129 if(spec->type == 3 || spec->type == 4)
1130 {
1131 if(spec->definitions && !spec->id)
1132 {
1133 struct __ecereNameSpace__ecere__com__DataMember * dataMember = __ecereNameSpace__ecere__com__eMember_New((spec->type == 4) ? 1 : 2, def->memberAccess);
1134
1135 AddDefinitions((((void *)0)), dataMember, spec->definitions);
1136 if(member)
1137 {
1138 __ecereNameSpace__ecere__com__eMember_AddMember(member, dataMember);
1139 }
1140 else
1141 {
1142 __ecereNameSpace__ecere__com__eClass_AddMember(regClass, dataMember);
1143 }
1144 }
1145 else if(spec->definitions && spec->id)
1146 {
1147 {
1148 struct Identifier * id = spec->id;
1149 char typeString[1024] = "";
1150
1151 spec->id = (((void *)0));
1152 decl->declarators = MkListOne(MkDeclaratorIdentifier(id));
1153 dataType = ProcessType(decl->specifiers, (((void *)0)));
1154 PrintType(dataType, typeString, 0x0, 0x1);
1155 if(member)
1156 {
1157 dataMember = __ecereNameSpace__ecere__com__eMember_AddDataMember(member, id->string, typeString, 0, 0, def->memberAccess);
1158 if(!dataMember)
1159 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Member with same name already exists %s in member %s\n", (((void *)0))), id->string, member->name);
1160 }
1161 else
1162 {
1163 dataMember = __ecereNameSpace__ecere__com__eClass_AddDataMember(regClass, id->string, typeString, 0, 0, def->memberAccess);
1164 if(!dataMember)
1165 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Member with same name already exists %s in class %s\n", (((void *)0))), id->string, regClass->name);
1166 }
1167 if(dataMember)
1168 dataMember->dataType = dataType;
1169 else
1170 FreeType(dataType);
1171 }
1172 }
1173 }
1174 }
1175 }
1176 }
1177 else if(decl->type == 2)
1178 {
1179 struct Instantiation * inst = decl->inst;
1180 struct Expression * exp = inst->exp;
1181
1182 if(exp)
1183 {
1184 char * string = exp->identifier->string;
1185
1186 {
1187 struct Type * dataType = (dataType = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), dataType->kind = 8, dataType->_class = inst->_class->symbol, dataType->refCount = 1, dataType);
1188
1189 if(member)
1190 {
1191 dataMember = __ecereNameSpace__ecere__com__eMember_AddDataMember(member, string, inst->_class->name, 0, 0, def->memberAccess);
1192 if(!dataMember)
1193 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Member with same name already exists %s in member %s\n", (((void *)0))), string, member->name);
1194 }
1195 else
1196 {
1197 dataMember = __ecereNameSpace__ecere__com__eClass_AddDataMember(regClass, string, inst->_class->name, 0, 0, def->memberAccess);
1198 if(!dataMember)
1199 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Member with same name already exists %s in class %s\n", (((void *)0))), string, regClass->name);
1200 }
1201 if(dataMember)
1202 dataMember->dataType = dataType;
1203 else
1204 FreeType(dataType);
1205 }
1206 }
1207 }
1208 }
1209 else if(def->type == 3 && def->propertyDef)
1210 {
1211 struct PropertyDef * propertyDef = def->propertyDef;
1212 struct __ecereNameSpace__ecere__com__Property * prop;
1213 char * dataTypeString = StringFromSpecDecl(propertyDef->specifiers, propertyDef->declarator);
1214
1215 prop = __ecereNameSpace__ecere__com__eClass_AddProperty(regClass, propertyDef->conversion ? (((void *)0)) : propertyDef->id->string, dataTypeString, inCompiler ? propertyDef->setStmt : (((void *)0)), inCompiler ? propertyDef->getStmt : (((void *)0)), def->memberAccess);
1216 (__ecereNameSpace__ecere__com__eSystem_Delete(dataTypeString), dataTypeString = 0);
1217 if(prop)
1218 {
1219 if(inCompiler)
1220 prop->IsSet = (void *)propertyDef->issetStmt;
1221 prop->compiled = 0x0;
1222 prop->symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(propertyDef->symbol->string), ((struct Symbol *)__ecereTemp1)->id = propertyDef->symbol->id, ((struct Symbol *)__ecereTemp1)->type = propertyDef->symbol->type, ((struct Symbol *)__ecereTemp1));
1223 ((struct Symbol *)prop->symbol)->propCategory = propertyDef->category;
1224 propertyDef->category = (((void *)0));
1225 if(propertyDef->isWatchable)
1226 __ecereNameSpace__ecere__com__eProperty_Watchable(prop);
1227 }
1228 else
1229 printf("");
1230 propertyDef->symbol->_property = prop;
1231 if(propertyDef->symbol->type)
1232 propertyDef->symbol->type->refCount++;
1233 }
1234 else if(def->type == 10 && def->propertyDef)
1235 {
1236 struct PropertyDef * propertyDef = def->propertyDef;
1237 struct __ecereNameSpace__ecere__com__ClassProperty * prop;
1238 char * dataTypeString = StringFromSpecDecl(propertyDef->specifiers, propertyDef->declarator);
1239
1240 prop = __ecereNameSpace__ecere__com__eClass_AddClassProperty(regClass, propertyDef->id->string, dataTypeString, inCompiler ? propertyDef->setStmt : (((void *)0)), inCompiler ? propertyDef->getStmt : (((void *)0)));
1241 (__ecereNameSpace__ecere__com__eSystem_Delete(dataTypeString), dataTypeString = 0);
1242 }
1243 }
1244 }
1245 }
1246
1247 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_FindClass(struct __ecereNameSpace__ecere__com__Instance * module, char *  name);
1248
1249 extern struct __ecereNameSpace__ecere__com__Instance * privateModule;
1250
1251 extern struct Context * globalContext;
1252
1253 extern struct __ecereNameSpace__ecere__sys__OldList *  excludedSymbols;
1254
1255 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_RegisterClass(int type, char *  name, char *  baseName, int size, int sizeClass, unsigned int (* )(void * ), void (* )(void * ), struct __ecereNameSpace__ecere__com__Instance * module, int declMode, int inheritanceAccess);
1256
1257 extern unsigned int buildingECERECOMModule;
1258
1259 extern struct Declarator * GetFuncDecl(struct Declarator * decl);
1260
1261 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_AddVirtualMethod(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, void *  function, int declMode);
1262
1263 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_AddMethod(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, void *  function, int declMode);
1264
1265 extern char *  strcpy(char * , const char * );
1266
1267 extern char *  strcat(char * , const char * );
1268
1269 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_OpTable;
1270
1271 struct OpTable
1272 {
1273 unsigned int (*  Add)(struct Expression *, struct Operand *, struct Operand *);
1274 unsigned int (*  Sub)(struct Expression *, struct Operand *, struct Operand *);
1275 unsigned int (*  Mul)(struct Expression *, struct Operand *, struct Operand *);
1276 unsigned int (*  Div)(struct Expression *, struct Operand *, struct Operand *);
1277 unsigned int (*  Mod)(struct Expression *, struct Operand *, struct Operand *);
1278 unsigned int (*  Neg)(struct Expression *, struct Operand *);
1279 unsigned int (*  Inc)(struct Expression *, struct Operand *);
1280 unsigned int (*  Dec)(struct Expression *, struct Operand *);
1281 unsigned int (*  Asign)(struct Expression *, struct Operand *, struct Operand *);
1282 unsigned int (*  AddAsign)(struct Expression *, struct Operand *, struct Operand *);
1283 unsigned int (*  SubAsign)(struct Expression *, struct Operand *, struct Operand *);
1284 unsigned int (*  MulAsign)(struct Expression *, struct Operand *, struct Operand *);
1285 unsigned int (*  DivAsign)(struct Expression *, struct Operand *, struct Operand *);
1286 unsigned int (*  ModAsign)(struct Expression *, struct Operand *, struct Operand *);
1287 unsigned int (*  BitAnd)(struct Expression *, struct Operand *, struct Operand *);
1288 unsigned int (*  BitOr)(struct Expression *, struct Operand *, struct Operand *);
1289 unsigned int (*  BitXor)(struct Expression *, struct Operand *, struct Operand *);
1290 unsigned int (*  LShift)(struct Expression *, struct Operand *, struct Operand *);
1291 unsigned int (*  RShift)(struct Expression *, struct Operand *, struct Operand *);
1292 unsigned int (*  BitNot)(struct Expression *, struct Operand *);
1293 unsigned int (*  AndAsign)(struct Expression *, struct Operand *, struct Operand *);
1294 unsigned int (*  OrAsign)(struct Expression *, struct Operand *, struct Operand *);
1295 unsigned int (*  XorAsign)(struct Expression *, struct Operand *, struct Operand *);
1296 unsigned int (*  LShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
1297 unsigned int (*  RShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
1298 unsigned int (*  Not)(struct Expression *, struct Operand *);
1299 unsigned int (*  Equ)(struct Expression *, struct Operand *, struct Operand *);
1300 unsigned int (*  Nqu)(struct Expression *, struct Operand *, struct Operand *);
1301 unsigned int (*  And)(struct Expression *, struct Operand *, struct Operand *);
1302 unsigned int (*  Or)(struct Expression *, struct Operand *, struct Operand *);
1303 unsigned int (*  Grt)(struct Expression *, struct Operand *, struct Operand *);
1304 unsigned int (*  Sma)(struct Expression *, struct Operand *, struct Operand *);
1305 unsigned int (*  GrtEqu)(struct Expression *, struct Operand *, struct Operand *);
1306 unsigned int (*  SmaEqu)(struct Expression *, struct Operand *, struct Operand *);
1307 unsigned int (*  Cond)(struct Expression *, struct Operand *, struct Operand *, struct Operand *);
1308 } __attribute__ ((gcc_struct));
1309
1310 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Operand;
1311
1312 struct Operand
1313 {
1314 int kind;
1315 struct Type * type;
1316 unsigned int ptrSize;
1317 union
1318 {
1319 char c;
1320 unsigned char uc;
1321 short s;
1322 unsigned short us;
1323 int i;
1324 unsigned int ui;
1325 float f;
1326 double d;
1327 long long i64;
1328 uint64 ui64;
1329 } __attribute__ ((gcc_struct));
1330 struct OpTable ops;
1331 } __attribute__ ((gcc_struct));
1332
1333 extern struct Operand GetOperand(struct Expression * exp);
1334
1335 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateParameter;
1336
1337 struct __ecereNameSpace__ecere__com__ClassTemplateParameter;
1338
1339 extern struct __ecereNameSpace__ecere__com__ClassTemplateParameter * __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, int type, void *  info, struct __ecereNameSpace__ecere__com__ClassTemplateArgument * defaultArg);
1340
1341 extern void __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(struct __ecereNameSpace__ecere__com__Class * base);
1342
1343 void __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1344
1345 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
1346
1347 static void ProcessClass(int classType, struct __ecereNameSpace__ecere__sys__OldList * definitions, struct Symbol * symbol, struct __ecereNameSpace__ecere__sys__OldList * baseSpecs, struct __ecereNameSpace__ecere__sys__OldList * enumValues, struct Location * loc, struct __ecereNameSpace__ecere__sys__OldList * defs, void * after, struct __ecereNameSpace__ecere__sys__OldList * initDeclarators, int declMode)
1348 {
1349 void * __ecereTemp1;
1350 struct __ecereNameSpace__ecere__com__Class * regClass;
1351 struct ClassDef * def;
1352 unsigned int redefinition = 0x0;
1353
1354 regClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, symbol->string);
1355 if(regClass && !regClass->internalDecl)
1356 {
1357 if(symbol->parent || (struct Symbol *)globalContext->classes.root == symbol)
1358 {
1359 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalContext->classes, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol);
1360 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
1361 }
1362 redefinition = 0x1;
1363 if(inCompiler)
1364 {
1365 yylloc = *loc;
1366 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "redefinition of class %s\n", (((void *)0))), symbol->string);
1367 return ;
1368 }
1369 }
1370 else
1371 {
1372 char baseName[1024] = "";
1373 unsigned int unitType = 0x0;
1374 unsigned int wouldBeEnum = 0x0;
1375 int inheritanceAccess = 1;
1376
1377 if(baseSpecs != (((void *)0)))
1378 {
1379 struct Type * baseType = ProcessType(baseSpecs, (((void *)0)));
1380
1381 PrintType(baseType, baseName, 0x0, 0x1);
1382 if(baseType->kind == 8)
1383 {
1384 if(baseType->_class->registered && classType == 0)
1385 {
1386 if(baseType->_class->registered->type == 3)
1387 classType = 3;
1388 else if(baseType->_class->registered->type == 2)
1389 classType = 2;
1390 else if(baseType->_class->registered->type == 5)
1391 classType = 5;
1392 else if(baseType->_class->registered->type == 4)
1393 {
1394 wouldBeEnum = 0x1;
1395 }
1396 }
1397 }
1398 else if(baseType->kind == 9 || baseType->kind == 10)
1399 {
1400 classType = 5;
1401 baseName[0] = '\0';
1402 }
1403 else
1404 unitType = 0x1;
1405 FreeType(baseType);
1406 if(((struct Specifier *)baseSpecs->first)->type == 0 && ((struct Specifier *)baseSpecs->first)->specifier == PRIVATE)
1407 inheritanceAccess = 2;
1408 }
1409 if(classType == 0)
1410 {
1411 if(unitType)
1412 classType = 3;
1413 if(definitions != (((void *)0)))
1414 {
1415 for(def = definitions->first; def; def = def->next)
1416 {
1417 if(def->type == 2)
1418 {
1419 struct Declaration * decl = def->decl;
1420
1421 if(decl->type == 0)
1422 {
1423 if(unitType)
1424 {
1425 classType = 2;
1426 break;
1427 }
1428 if(decl->declarators)
1429 {
1430 struct Declarator * d;
1431
1432 for(d = (*decl->declarators).first; d; d = d->next)
1433 {
1434 if(d->structDecl.exp)
1435 {
1436 classType = 2;
1437 break;
1438 }
1439 }
1440 if(d)
1441 break;
1442 }
1443 }
1444 }
1445 }
1446 }
1447 }
1448 if(classType == 0 && wouldBeEnum)
1449 classType = 4;
1450 regClass = symbol->registered = __ecereNameSpace__ecere__com__eSystem_RegisterClass((classType == 6) ? 1 : classType, symbol->string, baseName[0] ? baseName : (((void *)0)), 0, 0, (((void *)0)), (((void *)0)), privateModule, buildingECERECOMModule ? 4 : declMode, inheritanceAccess);
1451 if(regClass)
1452 regClass->symbol = symbol;
1453 }
1454 if(!redefinition)
1455 {
1456 if(classType == 6)
1457 {
1458 struct __ecereNameSpace__ecere__com__DataMember * unionMember = __ecereNameSpace__ecere__com__eMember_New(1, 1);
1459
1460 AddDefinitions(regClass, unionMember, definitions);
1461 __ecereNameSpace__ecere__com__eClass_AddMember(regClass, unionMember);
1462 }
1463 else
1464 AddDefinitions(regClass, (((void *)0)), definitions);
1465 }
1466 if(definitions != (((void *)0)))
1467 {
1468 for(def = definitions->first; def; def = def->next)
1469 {
1470 if(def->type == 0 && def->function->declarator)
1471 {
1472 struct ClassFunction * func = def->function;
1473
1474 func->_class = regClass;
1475 if(!redefinition && !func->dontMangle)
1476 {
1477 struct Declarator * funcDecl = GetFuncDecl(func->declarator);
1478 struct Identifier * id = GetDeclId(funcDecl);
1479 struct __ecereNameSpace__ecere__com__Method * method;
1480
1481 if(func->isVirtual)
1482 {
1483 char * typeString = StringFromSpecDecl(func->specifiers, func->declarator);
1484
1485 method = __ecereNameSpace__ecere__com__eClass_AddVirtualMethod(regClass, id->string, typeString, inCompiler ? func->declarator->symbol : (((void *)0)), def->memberAccess);
1486 (__ecereNameSpace__ecere__com__eSystem_Delete(typeString), typeString = 0);
1487 }
1488 else
1489 {
1490 char * typeString = StringFromSpecDecl(func->specifiers, func->declarator);
1491
1492 method = __ecereNameSpace__ecere__com__eClass_AddMethod(regClass, id->string, typeString, inCompiler ? func->declarator->symbol : (((void *)0)), def->memberAccess);
1493 if(!method)
1494 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Redefinition of method %s in class %s\n", (((void *)0))), id->string, regClass->name);
1495 (__ecereNameSpace__ecere__com__eSystem_Delete(typeString), typeString = 0);
1496 }
1497 if(method && (method->type != 1 || method->_class == regClass))
1498 {
1499 method->symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(func->declarator->symbol->string), ((struct Symbol *)__ecereTemp1)->id = func->declarator->symbol->id, ((struct Symbol *)__ecereTemp1)->type = func->declarator->symbol->type, ((struct Symbol *)__ecereTemp1)->method = method, ((struct Symbol *)__ecereTemp1));
1500 if(func->declarator->symbol->type)
1501 func->declarator->symbol->type->refCount++;
1502 func->declarator->symbol->method = method;
1503 }
1504 else
1505 {
1506 func->declarator->symbol->method = method;
1507 }
1508 }
1509 }
1510 }
1511 }
1512 if(regClass && symbol->templateParams)
1513 {
1514 struct TemplateParameter * param;
1515
1516 for(param = (*symbol->templateParams).first; param; param = param->next)
1517 {
1518 struct __ecereNameSpace__ecere__com__ClassTemplateArgument defaultArg = 
1519 {
1520 0, 0, 0, 0, 0
1521 };
1522
1523 if(param->defaultArgument)
1524 {
1525 switch(param->type)
1526 {
1527 case 0:
1528 defaultArg.dataTypeString = StringFromSpecDecl(param->defaultArgument->templateDatatype->specifiers, param->defaultArgument->templateDatatype->decl);
1529 break;
1530 case 1:
1531 {
1532 char memberString[1024];
1533
1534 memberString[0] = '\0';
1535 if(param->defaultArgument->identifier->_class)
1536 {
1537 if(param->defaultArgument->identifier->_class->type == 8)
1538 {
1539 if(param->defaultArgument->identifier->_class->templateParameter)
1540 strcpy(memberString, param->defaultArgument->identifier->_class->templateParameter->identifier->string);
1541 }
1542 else
1543 {
1544 if(param->defaultArgument->identifier->_class->name)
1545 strcpy(memberString, param->defaultArgument->identifier->_class->name);
1546 }
1547 }
1548 if(memberString[0])
1549 {
1550 strcat(memberString, "::");
1551 }
1552 strcat(memberString, param->defaultArgument->identifier->string);
1553 defaultArg.memberString = __ecereNameSpace__ecere__sys__CopyString(memberString);
1554 break;
1555 }
1556 case 2:
1557 {
1558 struct Operand op;
1559
1560 param->defaultArgument->expression->destType = ProcessType(param->dataType->specifiers, param->dataType->decl);
1561 ProcessExpressionType(param->defaultArgument->expression);
1562 ComputeExpression(param->defaultArgument->expression);
1563 op = GetOperand(param->defaultArgument->expression);
1564 defaultArg.expression.ui64 = op.ui64;
1565 break;
1566 }
1567 }
1568 }
1569 if(param->type == 1)
1570 {
1571 __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(regClass, param->identifier->string, 1, (void *)param->memberType, &defaultArg);
1572 }
1573 else
1574 {
1575 char * typeString = param->dataType ? StringFromSpecDecl(param->dataType->specifiers, param->dataType->decl) : (((void *)0));
1576
1577 __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(regClass, param->identifier->string, param->type, typeString, &defaultArg);
1578 (__ecereNameSpace__ecere__com__eSystem_Delete(typeString), typeString = 0);
1579 }
1580 if(param->type == 0 || param->type == 1)
1581 (__ecereNameSpace__ecere__com__eSystem_Delete(defaultArg.dataTypeString), defaultArg.dataTypeString = 0);
1582 }
1583 __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(regClass);
1584 }
1585 }
1586
1587 extern struct External * curExternal;
1588
1589 extern struct __ecereNameSpace__ecere__sys__OldList *  ast;
1590
1591 extern struct Symbol * FindType(struct Context * ctx, char *  name);
1592
1593 extern struct Symbol * FindClass(char *  name);
1594
1595 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldLink;
1596
1597 struct __ecereNameSpace__ecere__sys__OldLink
1598 {
1599 struct __ecereNameSpace__ecere__sys__OldLink * prev;
1600 struct __ecereNameSpace__ecere__sys__OldLink * next;
1601 void *  data;
1602 } __attribute__ ((gcc_struct));
1603
1604 extern struct ModuleImport * mainModule;
1605
1606 void PrePreProcessClassDefinitions()
1607 {
1608 struct External * external, * next;
1609
1610 curExternal = (((void *)0));
1611 if(ast)
1612 {
1613 for(external = (*ast).first; external; external = next)
1614 {
1615 next = external->next;
1616 curExternal = external;
1617 if(external->type == 2)
1618 {
1619 struct ClassDefinition * _class = external->_class;
1620
1621 if(_class->definitions && (!_class->symbol->registered || !inCompiler))
1622 {
1623 ProcessClass(0, _class->definitions, _class->symbol, _class->baseSpecs, (((void *)0)), &_class->loc, ast, external->prev, (((void *)0)), _class->declMode);
1624 _class->symbol->isStatic = _class->declMode == 3;
1625 }
1626 }
1627 else if(external->type == 1)
1628 {
1629 struct Declaration * declaration = external->declaration;
1630
1631 if(declaration->type == 1)
1632 {
1633 if(declaration->specifiers)
1634 {
1635 struct Specifier * specifier;
1636
1637 for(specifier = (*declaration->specifiers).first; specifier; specifier = specifier->next)
1638 {
1639 if((specifier->type == 2 || specifier->type == 3 || specifier->type == 4) && specifier->id && specifier->id->string && (declaration->declMode || specifier->baseSpecs || (specifier->type == 2 && specifier->definitions)))
1640 {
1641 struct Symbol * type = FindType(globalContext, specifier->id->string);
1642 struct Symbol * symbol = FindClass(specifier->id->string);
1643
1644 if(type)
1645 {
1646 declaration->declMode = 0;
1647 if(symbol)
1648 {
1649 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalContext->classes, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol);
1650 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
1651 }
1652 }
1653 else if(symbol && !symbol->registered)
1654 {
1655 int classType;
1656
1657 if(specifier->type == 2)
1658 classType = 4;
1659 else if(specifier->type == 4)
1660 classType = 6;
1661 else
1662 classType = 1;
1663 ProcessClass(classType, specifier->definitions, symbol, specifier->baseSpecs, specifier->list, &specifier->loc, ast, external->prev, declaration->declarators, declaration->declMode);
1664 symbol->isStatic = declaration->declMode == 3;
1665 }
1666 }
1667 }
1668 }
1669 }
1670 }
1671 else if(external->type == 3)
1672 {
1673 }
1674 }
1675 {
1676 for(external = (*ast).first; external; external = external->next)
1677 {
1678 if(external->type == 2)
1679 {
1680 struct ClassDefinition * _class = external->_class;
1681
1682 if(_class->symbol)
1683 {
1684 struct __ecereNameSpace__ecere__sys__OldLink * link;
1685
1686 for(link = _class->symbol->templatedClasses.first; link; link = link->next)
1687 {
1688 struct Symbol * symbol = link->data;
1689
1690 symbol->registered = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, symbol->string);
1691 }
1692 }
1693 }
1694 else if(external->type == 1)
1695 {
1696 struct Declaration * declaration = external->declaration;
1697
1698 if(declaration->type == 1)
1699 {
1700 if(declaration->specifiers)
1701 {
1702 struct Specifier * specifier;
1703
1704 for(specifier = (*declaration->specifiers).first; specifier; specifier = specifier->next)
1705 {
1706 if((specifier->type == 2 || specifier->type == 3 || specifier->type == 4) && specifier->id && specifier->id->string && (declaration->declMode || specifier->baseSpecs || (specifier->type == 2 && specifier->definitions)))
1707 {
1708 struct Symbol * type = FindType(globalContext, specifier->id->string);
1709 struct Symbol * symbol = FindClass(specifier->id->string);
1710
1711 if(type)
1712 {
1713 }
1714 else if(symbol)
1715 {
1716 struct __ecereNameSpace__ecere__sys__OldLink * link;
1717
1718 for(link = symbol->templatedClasses.first; link; link = link->next)
1719 {
1720 struct Symbol * tplSymbol = link->data;
1721
1722 tplSymbol->registered = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, tplSymbol->string);
1723 tplSymbol->module = symbol->module ? symbol->module : mainModule;
1724 }
1725 }
1726 }
1727 }
1728 }
1729 }
1730 }
1731 }
1732 }
1733 }
1734 }
1735
1736 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
1737
1738 struct __ecereNameSpace__ecere__com__GlobalFunction;
1739
1740 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);
1741
1742 void __ecereRegisterModule_firstPass(struct __ecereNameSpace__ecere__com__Instance * module)
1743 {
1744 struct __ecereNameSpace__ecere__com__Class * class;
1745
1746 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("PrePreProcessClassDefinitions", "void PrePreProcessClassDefinitions(void)", PrePreProcessClassDefinitions, module, 1);
1747 }
1748
1749 void __ecereUnregisterModule_firstPass(struct __ecereNameSpace__ecere__com__Instance * module)
1750 {
1751
1752 }
1753