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