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