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