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