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