2 typedef long long int64;
3 typedef unsigned long long uint64;
4 #elif defined(__TINYC__)
6 #define __builtin_va_list va_list
7 #define __builtin_va_start va_start
8 #define __builtin_va_end va_end
10 #define strcasecmp stricmp
11 #define strncasecmp strnicmp
12 #define __declspec(x) __attribute__((x))
14 typedef long long int64;
15 typedef unsigned long long uint64;
17 typedef __int64 int64;
18 typedef unsigned __int64 uint64;
21 #define __ENDIAN_PAD(x) (8 - (x))
23 #define __ENDIAN_PAD(x) 0
25 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
27 struct __ecereNameSpace__ecere__sys__BTNode;
29 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
31 struct __ecereNameSpace__ecere__sys__BinaryTree
33 struct __ecereNameSpace__ecere__sys__BTNode * root;
35 int (* CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, unsigned int a, unsigned int b);
36 void (* FreeKey)(void * key);
37 } __attribute__ ((gcc_struct));
39 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
41 struct __ecereNameSpace__ecere__sys__OldList
48 } __attribute__ ((gcc_struct));
50 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
52 struct __ecereNameSpace__ecere__com__Method
55 struct __ecereNameSpace__ecere__com__Method * parent;
56 struct __ecereNameSpace__ecere__com__Method * left;
57 struct __ecereNameSpace__ecere__com__Method * right;
62 struct __ecereNameSpace__ecere__com__Class * _class;
64 char * dataTypeString;
65 struct Type * dataType;
67 } __attribute__ ((gcc_struct));
69 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
71 struct __ecereNameSpace__ecere__com__Property
73 struct __ecereNameSpace__ecere__com__Property * prev;
74 struct __ecereNameSpace__ecere__com__Property * next;
76 unsigned int isProperty;
79 struct __ecereNameSpace__ecere__com__Class * _class;
80 char * dataTypeString;
81 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
82 struct Type * dataType;
85 unsigned int (* IsSet)();
89 unsigned int conversion;
90 unsigned int watcherOffset;
92 unsigned int compiled;
93 unsigned int selfWatchable;
94 unsigned int isWatchable;
95 } __attribute__ ((gcc_struct));
97 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_CodePosition;
104 unsigned int included;
105 } __attribute__ ((gcc_struct));
107 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Location;
111 struct CodePosition start;
112 struct CodePosition end;
113 } __attribute__ ((gcc_struct));
115 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attrib;
119 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ExtDecl;
123 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDefinition;
125 struct ClassDefinition
127 struct ClassDefinition * prev;
128 struct ClassDefinition * next;
130 struct Specifier * _class;
131 struct __ecereNameSpace__ecere__sys__OldList * baseSpecs;
132 struct __ecereNameSpace__ecere__sys__OldList * definitions;
133 struct Symbol * symbol;
134 struct Location blockStart;
135 struct Location nameLoc;
138 unsigned int deleteWatchable;
139 } __attribute__ ((gcc_struct));
141 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
145 struct Context * parent;
146 struct __ecereNameSpace__ecere__sys__BinaryTree types;
147 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
148 struct __ecereNameSpace__ecere__sys__BinaryTree symbols;
149 struct __ecereNameSpace__ecere__sys__BinaryTree structSymbols;
152 struct __ecereNameSpace__ecere__sys__BinaryTree templateTypes;
153 struct ClassDefinition * classDef;
154 unsigned int templateTypesOnly;
155 unsigned int hasNameSpace;
156 } __attribute__ ((gcc_struct));
158 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
162 struct Instantiation * prev;
163 struct Instantiation * next;
165 struct Specifier * _class;
166 struct Expression * exp;
167 struct __ecereNameSpace__ecere__sys__OldList * members;
168 struct Symbol * symbol;
169 unsigned int fullSet;
170 unsigned int isConstant;
171 unsigned char * data;
172 struct Location nameLoc;
173 struct Location insideLoc;
175 } __attribute__ ((gcc_struct));
177 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
181 struct Declaration * prev;
182 struct Declaration * next;
189 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
190 struct __ecereNameSpace__ecere__sys__OldList * declarators;
191 } __attribute__ ((gcc_struct));
192 struct Instantiation * inst;
195 struct Identifier * id;
196 struct Expression * exp;
197 } __attribute__ ((gcc_struct));
198 } __attribute__ ((gcc_struct));
199 struct Specifier * extStorage;
200 struct Symbol * symbol;
202 } __attribute__ ((gcc_struct));
204 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
208 struct Statement * prev;
209 struct Statement * next;
214 struct __ecereNameSpace__ecere__sys__OldList * expressions;
217 struct Identifier * id;
218 struct Statement * stmt;
219 } __attribute__ ((gcc_struct)) labeled;
222 struct Expression * exp;
223 struct Statement * stmt;
224 } __attribute__ ((gcc_struct)) caseStmt;
227 struct __ecereNameSpace__ecere__sys__OldList * declarations;
228 struct __ecereNameSpace__ecere__sys__OldList * statements;
229 struct Context * context;
230 unsigned int isSwitch;
231 } __attribute__ ((gcc_struct)) compound;
234 struct __ecereNameSpace__ecere__sys__OldList * exp;
235 struct Statement * stmt;
236 struct Statement * elseStmt;
237 } __attribute__ ((gcc_struct)) ifStmt;
240 struct __ecereNameSpace__ecere__sys__OldList * exp;
241 struct Statement * stmt;
242 } __attribute__ ((gcc_struct)) switchStmt;
245 struct __ecereNameSpace__ecere__sys__OldList * exp;
246 struct Statement * stmt;
247 } __attribute__ ((gcc_struct)) whileStmt;
250 struct __ecereNameSpace__ecere__sys__OldList * exp;
251 struct Statement * stmt;
252 } __attribute__ ((gcc_struct)) doWhile;
255 struct Statement * init;
256 struct Statement * check;
257 struct __ecereNameSpace__ecere__sys__OldList * increment;
258 struct Statement * stmt;
259 } __attribute__ ((gcc_struct)) forStmt;
262 struct Identifier * id;
263 } __attribute__ ((gcc_struct)) gotoStmt;
266 struct Specifier * spec;
268 struct __ecereNameSpace__ecere__sys__OldList * inputFields;
269 struct __ecereNameSpace__ecere__sys__OldList * outputFields;
270 struct __ecereNameSpace__ecere__sys__OldList * clobberedFields;
271 } __attribute__ ((gcc_struct)) asmStmt;
274 struct Expression * watcher;
275 struct Expression * object;
276 struct __ecereNameSpace__ecere__sys__OldList * watches;
277 } __attribute__ ((gcc_struct)) _watch;
280 struct Identifier * id;
281 struct __ecereNameSpace__ecere__sys__OldList * exp;
282 struct __ecereNameSpace__ecere__sys__OldList * filter;
283 struct Statement * stmt;
284 } __attribute__ ((gcc_struct)) forEachStmt;
285 struct Declaration * decl;
286 } __attribute__ ((gcc_struct));
287 } __attribute__ ((gcc_struct));
289 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
293 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
297 struct Initializer * prev;
298 struct Initializer * next;
303 struct Expression * exp;
304 struct __ecereNameSpace__ecere__sys__OldList * list;
305 } __attribute__ ((gcc_struct));
306 unsigned int isConstant;
307 } __attribute__ ((gcc_struct));
309 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
311 struct __ecereNameSpace__ecere__com__DataValue
326 } __attribute__ ((gcc_struct));
327 } __attribute__ ((gcc_struct));
329 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
333 struct Expression * prev;
334 struct Expression * next;
342 struct Identifier * identifier;
343 } __attribute__ ((gcc_struct));
344 struct Statement * compound;
345 struct Instantiation * instance;
347 struct __ecereNameSpace__ecere__sys__OldList * list;
350 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
351 struct Declarator * decl;
352 } __attribute__ ((gcc_struct)) _classExp;
355 struct Identifier * id;
356 } __attribute__ ((gcc_struct)) classData;
359 struct Expression * exp;
360 struct __ecereNameSpace__ecere__sys__OldList * arguments;
361 struct Location argLoc;
362 } __attribute__ ((gcc_struct)) call;
365 struct Expression * exp;
366 struct __ecereNameSpace__ecere__sys__OldList * index;
367 } __attribute__ ((gcc_struct)) index;
370 struct Expression * exp;
371 struct Identifier * member;
373 unsigned int thisPtr;
374 } __attribute__ ((gcc_struct)) member;
378 struct Expression * exp1;
379 struct Expression * exp2;
380 } __attribute__ ((gcc_struct)) op;
381 struct TypeName * typeName;
382 struct Specifier * _class;
385 struct TypeName * typeName;
386 struct Expression * exp;
387 } __attribute__ ((gcc_struct)) cast;
390 struct Expression * cond;
391 struct __ecereNameSpace__ecere__sys__OldList * exp;
392 struct Expression * elseExp;
393 } __attribute__ ((gcc_struct)) cond;
396 struct TypeName * typeName;
397 struct Expression * size;
398 } __attribute__ ((gcc_struct)) _new;
401 struct TypeName * typeName;
402 struct Expression * size;
403 struct Expression * exp;
404 } __attribute__ ((gcc_struct)) _renew;
408 struct Identifier * id;
409 } __attribute__ ((gcc_struct)) db;
412 struct Expression * ds;
413 struct Expression * name;
414 } __attribute__ ((gcc_struct)) dbopen;
417 struct TypeName * typeName;
418 struct Initializer * initializer;
419 } __attribute__ ((gcc_struct)) initializer;
422 struct Expression * exp;
423 struct TypeName * typeName;
424 } __attribute__ ((gcc_struct)) vaArg;
425 } __attribute__ ((gcc_struct));
426 unsigned int debugValue;
427 struct __ecereNameSpace__ecere__com__DataValue val;
428 unsigned int address;
429 unsigned int hasAddress;
430 struct Type * expType;
431 struct Type * destType;
434 unsigned int byReference;
435 unsigned int isConstant;
436 unsigned int addedThis;
437 unsigned int needCast;
438 unsigned int thisPtr;
439 } __attribute__ ((gcc_struct));
441 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
443 struct TemplateDatatype;
445 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
447 struct TemplateArgument;
449 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
451 struct TemplateParameter;
453 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
457 struct Specifier * prev;
458 struct Specifier * next;
466 struct ExtDecl * extDecl;
468 struct Symbol * symbol;
469 struct __ecereNameSpace__ecere__sys__OldList * templateArgs;
470 } __attribute__ ((gcc_struct));
473 struct Identifier * id;
474 struct __ecereNameSpace__ecere__sys__OldList * list;
475 struct __ecereNameSpace__ecere__sys__OldList * baseSpecs;
476 struct __ecereNameSpace__ecere__sys__OldList * definitions;
477 unsigned int addNameSpace;
478 struct Context * ctx;
479 } __attribute__ ((gcc_struct));
480 struct Expression * expression;
481 struct Specifier * _class;
482 struct TemplateParameter * templateParameter;
483 } __attribute__ ((gcc_struct));
484 } __attribute__ ((gcc_struct));
486 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
490 struct Identifier * prev;
491 struct Identifier * next;
493 struct Symbol * classSym;
494 struct Specifier * _class;
496 struct Identifier * badID;
497 } __attribute__ ((gcc_struct));
499 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Pointer;
503 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
507 struct Declarator * prev;
508 struct Declarator * next;
511 struct Symbol * symbol;
512 struct Declarator * declarator;
515 struct Identifier * identifier;
518 struct Expression * exp;
519 struct Expression * posExp;
520 struct Attrib * attrib;
521 } __attribute__ ((gcc_struct)) structDecl;
524 struct Expression * exp;
525 struct Specifier * enumClass;
526 } __attribute__ ((gcc_struct)) array;
529 struct __ecereNameSpace__ecere__sys__OldList * parameters;
530 } __attribute__ ((gcc_struct)) function;
533 struct Pointer * pointer;
534 } __attribute__ ((gcc_struct)) pointer;
537 struct ExtDecl * extended;
538 } __attribute__ ((gcc_struct)) extended;
539 } __attribute__ ((gcc_struct));
540 } __attribute__ ((gcc_struct));
542 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
544 struct FunctionDefinition
546 struct FunctionDefinition * prev;
547 struct FunctionDefinition * next;
549 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
550 struct Declarator * declarator;
551 struct __ecereNameSpace__ecere__sys__OldList * declarations;
552 struct Statement * body;
553 struct __ecereNameSpace__ecere__com__Class * _class;
554 struct __ecereNameSpace__ecere__sys__OldList attached;
557 struct Symbol * propSet;
559 unsigned int propertyNoThis;
560 } __attribute__ ((gcc_struct));
562 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
566 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
570 struct External * prev;
571 struct External * next;
574 struct Symbol * symbol;
577 struct FunctionDefinition * function;
578 struct ClassDefinition * _class;
579 struct Declaration * declaration;
581 struct Identifier * id;
582 struct DBTableDef * table;
583 } __attribute__ ((gcc_struct));
585 } __attribute__ ((gcc_struct));
587 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
591 struct ModuleImport * prev;
592 struct ModuleImport * next;
594 struct __ecereNameSpace__ecere__sys__OldList classes;
595 struct __ecereNameSpace__ecere__sys__OldList functions;
598 } __attribute__ ((gcc_struct));
600 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
604 struct ClassImport * prev;
605 struct ClassImport * next;
607 struct __ecereNameSpace__ecere__sys__OldList methods;
608 struct __ecereNameSpace__ecere__sys__OldList properties;
610 unsigned int isRemote;
611 } __attribute__ ((gcc_struct));
613 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
618 struct Symbol * parent;
619 struct Symbol * left;
620 struct Symbol * right;
625 struct __ecereNameSpace__ecere__com__Method * method;
626 struct __ecereNameSpace__ecere__com__Property * _property;
627 struct __ecereNameSpace__ecere__com__Class * registered;
628 } __attribute__ ((gcc_struct));
635 struct External * pointerExternal;
636 struct External * structExternal;
637 } __attribute__ ((gcc_struct));
640 struct External * externalGet;
641 struct External * externalSet;
642 struct External * externalPtr;
643 struct External * externalIsSet;
644 } __attribute__ ((gcc_struct));
647 struct External * methodExternal;
648 struct External * methodCodeExternal;
649 } __attribute__ ((gcc_struct));
650 } __attribute__ ((gcc_struct));
651 unsigned int imported;
652 unsigned int declaredStructSym;
653 struct __ecereNameSpace__ecere__com__Class * _class;
654 unsigned int declaredStruct;
655 unsigned int needConstructor;
656 unsigned int needDestructor;
657 char * constructorName;
660 char * destructorName;
661 struct ModuleImport * module;
662 struct ClassImport * _import;
663 struct Location nameLoc;
664 unsigned int isParam;
665 unsigned int isRemote;
666 unsigned int isStruct;
667 unsigned int fireWatchersDone;
669 unsigned int classData;
670 unsigned int isStatic;
672 struct __ecereNameSpace__ecere__sys__OldList * templateParams;
673 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
674 struct Context * ctx;
676 struct Expression * propCategory;
677 } __attribute__ ((gcc_struct));
679 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
688 struct Symbol * _class;
691 struct __ecereNameSpace__ecere__sys__OldList members;
693 } __attribute__ ((gcc_struct));
696 struct Type * returnType;
697 struct __ecereNameSpace__ecere__sys__OldList params;
698 struct Symbol * thisClass;
699 unsigned int staticMethod;
700 struct TemplateParameter * thisClassTemplate;
701 } __attribute__ ((gcc_struct));
704 struct __ecereNameSpace__ecere__com__Method * method;
705 struct __ecereNameSpace__ecere__com__Class * methodClass;
706 struct __ecereNameSpace__ecere__com__Class * usedClass;
707 } __attribute__ ((gcc_struct));
710 struct Type * arrayType;
712 struct Expression * arraySizeExp;
713 unsigned int freeExp;
714 struct Symbol * enumClass;
715 } __attribute__ ((gcc_struct));
717 struct TemplateParameter * templateParameter;
718 } __attribute__ ((gcc_struct));
719 unsigned int isSigned;
721 unsigned int constant;
728 unsigned int byReference;
729 unsigned int extraParam;
731 unsigned int directClassAccess;
732 unsigned int computing;
733 unsigned int dllExport;
735 unsigned int keepCast;
736 unsigned int passAsTemplate;
738 } __attribute__ ((gcc_struct));
740 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
742 struct __ecereNameSpace__ecere__com__Class
744 struct __ecereNameSpace__ecere__com__Class * prev;
745 struct __ecereNameSpace__ecere__com__Class * next;
751 int (* Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
752 void (* Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
755 struct __ecereNameSpace__ecere__com__Class * base;
756 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
757 struct __ecereNameSpace__ecere__sys__BinaryTree members;
758 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
759 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
760 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
761 struct __ecereNameSpace__ecere__sys__OldList derivatives;
765 struct __ecereNameSpace__ecere__com__Instance * module;
766 struct __ecereNameSpace__ecere__com__NameSpace * nameSpace;
767 char * dataTypeString;
768 struct Type * dataType;
770 int defaultAlignment;
771 void (* Initialize)();
773 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
774 char * designerClass;
775 unsigned int noExpansion;
776 char * defaultProperty;
777 unsigned int comRedefinition;
779 unsigned int isRemote;
780 unsigned int internalDecl;
782 unsigned int computeSize;
784 int destructionWatchOffset;
786 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
787 int inheritanceAccess;
790 struct __ecereNameSpace__ecere__sys__OldList conversions;
791 struct __ecereNameSpace__ecere__sys__OldList templateParams;
792 struct __ecereNameSpace__ecere__com__ClassTemplateArgument * templateArgs;
793 struct __ecereNameSpace__ecere__com__Class * templateClass;
794 struct __ecereNameSpace__ecere__sys__OldList templatized;
796 } __attribute__ ((gcc_struct));
798 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
800 struct __ecereNameSpace__ecere__com__Instance
803 struct __ecereNameSpace__ecere__com__Class * _class;
805 } __attribute__ ((gcc_struct));
807 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
809 struct __ecereNameSpace__ecere__com__DataMember
811 struct __ecereNameSpace__ecere__com__DataMember * prev;
812 struct __ecereNameSpace__ecere__com__DataMember * next;
814 unsigned int isProperty;
817 struct __ecereNameSpace__ecere__com__Class * _class;
818 char * dataTypeString;
819 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
820 struct Type * dataType;
824 struct __ecereNameSpace__ecere__sys__OldList members;
825 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
828 } __attribute__ ((gcc_struct));
830 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
832 struct __ecereNameSpace__ecere__com__SerialBuffer
834 unsigned char * _buffer;
838 } __attribute__ ((gcc_struct));
840 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
842 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
848 char * dataTypeString;
849 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
850 } __attribute__ ((gcc_struct));
851 struct __ecereNameSpace__ecere__com__DataValue expression;
857 struct __ecereNameSpace__ecere__com__DataMember * member;
858 struct __ecereNameSpace__ecere__com__Property * prop;
859 struct __ecereNameSpace__ecere__com__Method * method;
860 } __attribute__ ((gcc_struct));
861 } __attribute__ ((gcc_struct));
862 } __attribute__ ((gcc_struct));
863 } __attribute__ ((gcc_struct));
867 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
870 typedef union YYSTYPE
875 struct Identifier * id;
876 struct Expression * exp;
877 struct Specifier * specifier;
878 struct __ecereNameSpace__ecere__sys__OldList * list;
879 struct Enumerator * enumerator;
880 struct Declarator * declarator;
881 struct Pointer * pointer;
882 struct Initializer * initializer;
883 struct InitDeclarator * initDeclarator;
884 struct TypeName * typeName;
885 struct Declaration * declaration;
886 struct Statement * stmt;
887 struct FunctionDefinition * function;
888 struct External * external;
889 struct Context * context;
890 struct AsmField * asmField;
891 struct Attrib * attrib;
892 struct ExtDecl * extDecl;
893 struct Attribute * attribute;
894 struct Instantiation * instance;
895 struct MembersInit * membersInit;
896 struct MemberInit * memberInit;
897 struct ClassFunction * classFunction;
898 struct ClassDefinition * _class;
899 struct ClassDef * classDef;
900 struct PropertyDef * prop;
902 struct Symbol * symbol;
903 struct PropertyWatch * propertyWatch;
904 struct TemplateParameter * templateParameter;
905 struct TemplateArgument * templateArgument;
906 struct TemplateDatatype * templateDatatype;
907 struct DBTableEntry * dbtableEntry;
908 struct DBIndexItem * dbindexItem;
909 struct DBTableDef * dbtableDef;
910 } __attribute__ ((gcc_struct)) YYSTYPE;
912 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Enumerator;
916 struct Enumerator * prev;
917 struct Enumerator * next;
919 struct Identifier * id;
920 struct Expression * exp;
921 } __attribute__ ((gcc_struct));
923 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_InitDeclarator;
925 struct InitDeclarator
927 struct InitDeclarator * prev;
928 struct InitDeclarator * next;
930 struct Declarator * declarator;
931 struct Initializer * initializer;
932 } __attribute__ ((gcc_struct));
934 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_AsmField;
938 struct AsmField * prev;
939 struct AsmField * next;
942 struct Expression * expression;
943 } __attribute__ ((gcc_struct));
945 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attribute;
949 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassFunction;
953 struct ClassFunction * prev;
954 struct ClassFunction * next;
956 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
957 struct Declarator * declarator;
958 struct __ecereNameSpace__ecere__sys__OldList * declarations;
959 struct Statement * body;
960 struct __ecereNameSpace__ecere__com__Class * _class;
961 struct __ecereNameSpace__ecere__sys__OldList attached;
964 struct Symbol * propSet;
965 unsigned int isVirtual;
966 unsigned int isConstructor;
967 unsigned int isDestructor;
968 unsigned int dontMangle;
971 } __attribute__ ((gcc_struct));
973 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MembersInit;
977 struct MembersInit * prev;
978 struct MembersInit * next;
983 struct __ecereNameSpace__ecere__sys__OldList * dataMembers;
984 struct ClassFunction * function;
985 } __attribute__ ((gcc_struct));
986 } __attribute__ ((gcc_struct));
988 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MemberInit;
992 struct MemberInit * prev;
993 struct MemberInit * next;
995 struct Location realLoc;
996 struct __ecereNameSpace__ecere__sys__OldList * identifiers;
997 struct Initializer * initializer;
999 unsigned int variable;
1000 unsigned int takeOutExp;
1001 } __attribute__ ((gcc_struct));
1003 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyDef;
1007 struct PropertyDef * prev;
1008 struct PropertyDef * next;
1009 struct Location loc;
1010 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
1011 struct Declarator * declarator;
1012 struct Identifier * id;
1013 struct Statement * getStmt;
1014 struct Statement * setStmt;
1015 struct Statement * issetStmt;
1016 struct Symbol * symbol;
1017 unsigned int conversion;
1018 unsigned int isWatchable;
1019 struct Expression * category;
1020 } __attribute__ ((gcc_struct));
1022 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyWatch;
1024 struct PropertyWatch
1026 struct PropertyWatch * prev;
1027 struct PropertyWatch * next;
1028 struct Location loc;
1029 struct Statement * compound;
1030 struct __ecereNameSpace__ecere__sys__OldList * properties;
1031 unsigned int deleteWatch;
1032 } __attribute__ ((gcc_struct));
1034 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDef;
1038 struct ClassDef * prev;
1039 struct ClassDef * next;
1040 struct Location loc;
1044 struct Declaration * decl;
1045 struct ClassFunction * function;
1046 struct __ecereNameSpace__ecere__sys__OldList * defProperties;
1047 struct PropertyDef * propertyDef;
1048 struct PropertyWatch * propertyWatch;
1050 struct Identifier * defaultProperty;
1053 struct Identifier * id;
1054 struct Initializer * initializer;
1055 } __attribute__ ((gcc_struct));
1056 } __attribute__ ((gcc_struct));
1059 } __attribute__ ((gcc_struct));
1061 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableEntry;
1063 struct DBTableEntry;
1065 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBIndexItem;
1069 extern YYSTYPE yylval;
1071 extern struct Location yylloc;
1073 extern struct External * curExternal;
1075 static struct Statement * curCompound;
1077 static struct Statement * createInstancesBody;
1079 static struct Statement * destroyInstancesBody;
1081 extern unsigned int inCompiler;
1083 extern struct Statement * MkCompoundStmt(struct __ecereNameSpace__ecere__sys__OldList * declarations, struct __ecereNameSpace__ecere__sys__OldList * statements);
1085 extern struct __ecereNameSpace__ecere__sys__OldList * MkList(void);
1087 extern struct Context * globalContext;
1089 extern void ListAdd(struct __ecereNameSpace__ecere__sys__OldList * list, void * item);
1091 extern struct Specifier * MkSpecifier(int specifier);
1093 extern char * __ecereNameSpace__ecere__sys__GetLastDirectory(char * string, char * output);
1095 extern char * outputFile;
1097 extern unsigned int __ecereNameSpace__ecere__sys__StripExtension(char * string);
1099 extern void __ecereNameSpace__ecere__sys__ChangeCh(char * string, char ch1, char ch2);
1101 extern int sprintf(char * , char * , ...);
1103 extern struct Declarator * MkDeclaratorFunction(struct Declarator * declarator, struct __ecereNameSpace__ecere__sys__OldList * parameters);
1105 extern struct Declarator * MkDeclaratorIdentifier(struct Identifier * id);
1107 extern struct Identifier * MkIdentifier(char * string);
1109 extern struct FunctionDefinition * MkFunction(struct __ecereNameSpace__ecere__sys__OldList * specifiers, struct Declarator * declarator, struct __ecereNameSpace__ecere__sys__OldList * declarationList);
1111 extern void ProcessFunctionBody(struct FunctionDefinition * func, struct Statement * body);
1113 extern struct __ecereNameSpace__ecere__sys__OldList * ast;
1115 extern struct External * MkExternalFunction(struct FunctionDefinition * function);
1117 extern void * __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
1119 static void CreateInstancesBody()
1121 void * __ecereTemp1;
1123 if(inCompiler && !createInstancesBody)
1125 char registerName[1024], moduleName[274];
1126 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
1127 struct Declarator * declarator;
1129 createInstancesBody = MkCompoundStmt((((void *)0)), MkList());
1130 createInstancesBody->compound.context = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context), ((struct Context *)__ecereTemp1)->parent = globalContext, ((struct Context *)__ecereTemp1));
1131 specifiers = MkList();
1132 ListAdd(specifiers, MkSpecifier(VOID));
1133 __ecereNameSpace__ecere__sys__GetLastDirectory(outputFile, moduleName);
1134 __ecereNameSpace__ecere__sys__StripExtension(moduleName);
1135 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, ' ', '_');
1136 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '.', '_');
1137 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '-', '_');
1138 sprintf(registerName, "__ecereCreateModuleInstances_%s", moduleName);
1139 declarator = MkDeclaratorFunction(MkDeclaratorIdentifier(MkIdentifier(registerName)), (((void *)0)));
1141 struct FunctionDefinition * function = MkFunction(specifiers, declarator, (((void *)0)));
1143 ProcessFunctionBody(function, createInstancesBody);
1144 ListAdd(ast, MkExternalFunction(function));
1146 destroyInstancesBody = MkCompoundStmt((((void *)0)), MkList());
1147 destroyInstancesBody->compound.context = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context), ((struct Context *)__ecereTemp1)->parent = globalContext, ((struct Context *)__ecereTemp1));
1148 specifiers = MkList();
1149 ListAdd(specifiers, MkSpecifier(VOID));
1150 sprintf(registerName, "__ecereDestroyModuleInstances_%s", moduleName);
1151 declarator = MkDeclaratorFunction(MkDeclaratorIdentifier(MkIdentifier(registerName)), (((void *)0)));
1153 struct FunctionDefinition * function = MkFunction(specifiers, declarator, (((void *)0)));
1155 ProcessFunctionBody(function, destroyInstancesBody);
1156 ListAdd(ast, MkExternalFunction(function));
1161 static void ProcessInitializer(struct Initializer * init);
1163 static void ProcessMemberInitData(struct MemberInit * member)
1165 if(member->initializer)
1166 ProcessInitializer(member->initializer);
1169 static void ProcessFunction(struct FunctionDefinition * function);
1171 static void ProcessInstantiation(struct Instantiation * inst)
1173 if(inst->members && (*inst->members).first)
1175 struct MembersInit * members;
1177 for(members = (*inst->members).first; members; members = members->next)
1179 if(members->type == 0)
1181 if(members->dataMembers)
1183 struct MemberInit * member;
1185 for(member = (*members->dataMembers).first; member; member = member->next)
1186 ProcessMemberInitData(member);
1189 else if(members->type == 1)
1191 ProcessFunction((struct FunctionDefinition *)members->function);
1197 extern struct __ecereNameSpace__ecere__com__Property * __ecereNameSpace__ecere__com__eClass_FindProperty(struct __ecereNameSpace__ecere__com__Class * _class, char * name, struct __ecereNameSpace__ecere__com__Instance * module);
1199 extern struct __ecereNameSpace__ecere__com__Instance * privateModule;
1201 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eClass_FindDataMember(struct __ecereNameSpace__ecere__com__Class * _class, char * name, struct __ecereNameSpace__ecere__com__Instance * module, struct __ecereNameSpace__ecere__com__DataMember ** subMemberStack, int * subMemberStackPos);
1203 extern void * memcpy(void * , const void * , unsigned int size);
1205 extern void __ecereNameSpace__ecere__com__eClass_FindNextMember(struct __ecereNameSpace__ecere__com__Class * _class, struct __ecereNameSpace__ecere__com__Class ** curClass, struct __ecereNameSpace__ecere__com__DataMember ** curMember, struct __ecereNameSpace__ecere__com__DataMember ** subMemberStack, int * subMemberStackPos);
1207 extern struct Expression * CopyExpression(struct Expression * exp);
1209 extern struct Expression * MkExpConstant(char * string);
1211 extern struct Expression * MkExpMember(struct Expression * expression, struct Identifier * member);
1213 extern struct Expression * MkExpOp(struct Expression * exp1, int op, struct Expression * exp2);
1215 extern void FreeType(struct Type * type);
1217 extern void ProcessExpressionType(struct Expression * exp);
1219 static void ProcessExpression(struct Expression * exp);
1221 static unsigned int ProcessInstMembers_SimpleMemberEnsure(struct __ecereNameSpace__ecere__com__DataMember * parentMember, struct Instantiation * inst, struct Expression * instExp, struct __ecereNameSpace__ecere__sys__OldList * list, unsigned int zeroOut)
1223 struct Symbol * classSym = inst->_class->symbol;
1224 unsigned int fullSet = 0x1;
1225 struct __ecereNameSpace__ecere__com__DataMember * dataMember;
1227 for(dataMember = parentMember->members.first; dataMember; dataMember = dataMember->next)
1229 if(!dataMember->isProperty)
1231 if(!dataMember->name && (dataMember->type == 1 || dataMember->type == 2))
1233 if(!ProcessInstMembers_SimpleMemberEnsure(dataMember, inst, instExp, list, zeroOut))
1238 unsigned int memberFilled = 0x0;
1240 if(inst->members && (*inst->members).first)
1242 struct __ecereNameSpace__ecere__com__Class * curClass = (((void *)0));
1243 struct __ecereNameSpace__ecere__com__DataMember * curMember = (((void *)0));
1244 struct __ecereNameSpace__ecere__com__DataMember * subMemberStack[256];
1245 int subMemberStackPos = 0;
1246 struct MembersInit * members;
1248 for(members = (*inst->members).first; members; members = members->next)
1250 if(members->type == 0)
1252 struct MemberInit * member = (((void *)0));
1254 for(member = (*members->dataMembers).first; member; member = member->next)
1256 if(member->identifiers)
1258 struct Identifier * firstID = (*member->identifiers).first;
1259 struct __ecereNameSpace__ecere__com__DataMember * _subMemberStack[256];
1260 int _subMemberStackPos = 0;
1261 struct __ecereNameSpace__ecere__com__DataMember * thisMember = (struct __ecereNameSpace__ecere__com__DataMember *)__ecereNameSpace__ecere__com__eClass_FindProperty(classSym->registered, firstID->string, privateModule);
1264 thisMember = __ecereNameSpace__ecere__com__eClass_FindDataMember(classSym->registered, firstID->string, privateModule, _subMemberStack, &_subMemberStackPos);
1267 if(thisMember && thisMember->memberAccess == 1)
1269 curMember = thisMember;
1270 curClass = curMember->_class;
1271 memcpy(subMemberStack, _subMemberStack, sizeof(int) * _subMemberStackPos);
1272 subMemberStackPos = _subMemberStackPos;
1274 if(!firstID->next && thisMember == dataMember)
1283 __ecereNameSpace__ecere__com__eClass_FindNextMember(classSym->registered, &curClass, &curMember, subMemberStack, &subMemberStackPos);
1284 if(curMember == dataMember)
1302 struct Expression * instExpCopy = CopyExpression(instExp);
1303 struct Expression * memberExp;
1304 struct Expression * setExp;
1305 struct Expression * value = MkExpConstant("0");
1307 memberExp = MkExpMember(instExpCopy, MkIdentifier(dataMember->name));
1308 memberExp->member.memberType = 3;
1309 value->usage = (value->usage & ~0x1) | (((unsigned int)0x1) << 0);
1310 setExp = MkExpOp(memberExp, '=', value);
1311 value->loc = inst->loc;
1312 setExp->loc = inst->loc;
1313 FreeType(instExpCopy->expType);
1314 instExpCopy->expType = instExp->expType;
1315 if(instExp->expType)
1316 instExp->expType->refCount++;
1317 ProcessExpressionType(setExp);
1318 ProcessExpression(setExp);
1319 ListAdd(list, setExp);
1329 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__BitMember;
1331 struct __ecereNameSpace__ecere__com__BitMember
1333 struct __ecereNameSpace__ecere__com__BitMember * prev;
1334 struct __ecereNameSpace__ecere__com__BitMember * next;
1336 unsigned int isProperty;
1339 struct __ecereNameSpace__ecere__com__Class * _class;
1340 char * dataTypeString;
1341 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
1342 struct Type * dataType;
1347 } __attribute__ ((gcc_struct));
1349 extern struct Declarator * SpecDeclFromString(char * string, struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * baseDecl);
1351 extern struct Expression * MkExpBrackets(struct __ecereNameSpace__ecere__sys__OldList * expressions);
1353 extern struct __ecereNameSpace__ecere__sys__OldList * MkListOne(void * item);
1355 extern struct Expression * MkExpCast(struct TypeName * typeName, struct Expression * expression);
1357 extern struct TypeName * MkTypeName(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Declarator * declarator);
1359 extern void FreeInitializer(struct Initializer * initializer);
1361 extern void DeclareProperty(struct __ecereNameSpace__ecere__com__Property * prop, char * setName, char * getName);
1363 extern struct Expression * MkExpCall(struct Expression * expression, struct __ecereNameSpace__ecere__sys__OldList * arguments);
1365 extern struct Expression * MkExpIdentifier(struct Identifier * id);
1367 extern struct Type * MkClassType(char * name);
1369 extern struct TypeName * QMkClass(char * spec, struct Declarator * decl);
1371 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_FindMethod(struct __ecereNameSpace__ecere__com__Class * _class, char * name, struct __ecereNameSpace__ecere__com__Instance * module);
1373 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Clear(struct __ecereNameSpace__ecere__sys__OldList * this);
1375 static unsigned int ProcessInstMembers(struct Instantiation * inst, struct Expression * instExp, struct __ecereNameSpace__ecere__sys__OldList * list, unsigned int zeroOut)
1377 struct MembersInit * members;
1378 struct Symbol * classSym = inst->_class->symbol;
1379 unsigned int fullSet = 0x1, convert = 0x0;
1381 if(classSym && classSym->registered && classSym->registered->type == 2)
1383 struct Expression * exp = (((void *)0));
1385 if(inst->members && (*inst->members).first)
1387 struct __ecereNameSpace__ecere__com__Class * _class = (((void *)0));
1389 while(_class != classSym->registered)
1391 struct __ecereNameSpace__ecere__com__BitMember * bitMember = (((void *)0));
1392 struct __ecereNameSpace__ecere__com__Class * lastClass = _class;
1394 for(_class = classSym->registered; _class->base != lastClass && _class->base->type != 1000; _class = _class->base)
1396 for(bitMember = _class->membersAndProperties.first; bitMember; bitMember = bitMember->next)
1398 struct __ecereNameSpace__ecere__com__BitMember * curMember = (((void *)0));
1399 struct __ecereNameSpace__ecere__com__Class * curClass = (((void *)0));
1400 struct __ecereNameSpace__ecere__com__DataMember * subMemberStack[256];
1401 int subMemberStackPos = 0;
1402 struct MemberInit * member = (((void *)0));
1403 unsigned int found = 0x0;
1405 for(members = (*inst->members).first; members; members = members->next)
1407 if(members->type == 0)
1409 for(member = (*members->dataMembers).first; member; member = member->next)
1411 if(member->identifiers)
1413 struct Identifier * firstID = (*member->identifiers).first;
1414 struct __ecereNameSpace__ecere__com__DataMember * _subMemberStack[256];
1415 int _subMemberStackPos = 0;
1416 struct __ecereNameSpace__ecere__com__BitMember * thisMember = (struct __ecereNameSpace__ecere__com__BitMember *)__ecereNameSpace__ecere__com__eClass_FindDataMember(_class, firstID->string, privateModule, _subMemberStack, &_subMemberStackPos);
1420 thisMember = (struct __ecereNameSpace__ecere__com__BitMember *)__ecereNameSpace__ecere__com__eClass_FindProperty(_class, firstID->string, privateModule);
1422 if(thisMember && thisMember->memberAccess == 1)
1424 curMember = thisMember;
1425 curClass = curMember->_class;
1426 memcpy(subMemberStack, _subMemberStack, sizeof(int) * _subMemberStackPos);
1427 subMemberStackPos = _subMemberStackPos;
1429 if(thisMember == bitMember)
1437 __ecereNameSpace__ecere__com__eClass_FindNextMember(classSym->registered, &curClass, (struct __ecereNameSpace__ecere__com__DataMember **)&curMember, subMemberStack, &subMemberStackPos);
1438 if(curMember == bitMember)
1451 if(!bitMember->isProperty)
1453 struct Expression * part = (((void *)0));
1454 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1455 struct Declarator * decl;
1457 decl = SpecDeclFromString(_class->dataTypeString, specs, (((void *)0)));
1458 ProcessInitializer(member->initializer);
1459 if(member->initializer && member->initializer->type == 0)
1465 sprintf(pos, "%d", bitMember->pos);
1466 part = MkExpBrackets(MkListOne(MkExpOp(MkExpBrackets(MkListOne(MkExpCast(MkTypeName(specs, decl), MkExpBrackets(MkListOne(member->initializer->exp))))), LEFT_OP, MkExpConstant(pos))));
1469 part = MkExpBrackets(MkListOne(MkExpCast(MkTypeName(specs, decl), MkExpBrackets(MkListOne(member->initializer->exp)))));
1470 member->initializer->exp = (((void *)0));
1471 FreeInitializer(member->initializer);
1472 member->initializer = (((void *)0));
1475 exp = MkExpOp(exp, '|', part);
1481 char setName[1024], getName[1024];
1483 DeclareProperty((struct __ecereNameSpace__ecere__com__Property *)bitMember, setName, getName);
1484 if(member->initializer && member->initializer->type == 0)
1486 exp = MkExpCall(MkExpIdentifier(MkIdentifier(setName)), MkListOne(member->initializer->exp));
1487 member->initializer->exp = (((void *)0));
1488 FreeInitializer(member->initializer);
1489 member->initializer = (((void *)0));
1497 exp = MkExpBrackets(MkListOne(exp));
1499 exp = MkExpConstant("0");
1500 exp->expType = MkClassType(classSym->string);
1501 ProcessExpression(exp);
1504 else if(classSym && classSym->registered && classSym->registered->type == 3)
1506 struct __ecereNameSpace__ecere__com__Class * _class = classSym->registered;
1507 struct Expression * exp = (((void *)0));
1509 if(inst->members && (*inst->members).first)
1511 struct MemberInit * member = (((void *)0));
1512 struct __ecereNameSpace__ecere__com__Property * prop = (((void *)0));
1513 unsigned int found = 0x0;
1515 for(members = (*inst->members).first; members; members = members->next)
1517 if(members->type == 0)
1519 for(member = (*members->dataMembers).first; member; member = member->next)
1521 if(member->identifiers)
1523 struct Identifier * firstID = (*member->identifiers).first;
1525 prop = __ecereNameSpace__ecere__com__eClass_FindProperty(_class, firstID->string, privateModule);
1531 prop = (((void *)0));
1547 char setName[1024], getName[1024];
1549 DeclareProperty(prop, setName, getName);
1550 if(member->initializer && member->initializer->type == 0)
1552 exp = MkExpCall(MkExpIdentifier(MkIdentifier(setName)), MkListOne(member->initializer->exp));
1553 member->initializer->exp = (((void *)0));
1554 FreeInitializer(member->initializer);
1555 member->initializer = (((void *)0));
1560 ProcessInitializer(member->initializer);
1561 if(member->initializer && member->initializer->type == 0)
1563 exp = MkExpCast(QMkClass(_class->fullName, (((void *)0))), MkExpBrackets(MkListOne(member->initializer->exp)));
1564 member->initializer->exp = (((void *)0));
1565 FreeInitializer(member->initializer);
1566 member->initializer = (((void *)0));
1572 exp = MkExpBrackets(MkListOne(exp));
1574 exp = MkExpConstant("0");
1575 ProcessExpression(exp);
1578 else if(classSym && classSym->registered)
1580 if(classSym->registered->type == 1)
1582 struct __ecereNameSpace__ecere__com__Class * _class = (((void *)0));
1584 while(_class != classSym->registered)
1586 struct __ecereNameSpace__ecere__com__DataMember * dataMember;
1587 struct __ecereNameSpace__ecere__com__Class * lastClass = _class;
1589 for(_class = classSym->registered; _class->base != lastClass && _class->base->type != 1000; _class = _class->base)
1591 if(_class->structSize != _class->memberOffset)
1593 for(dataMember = _class->membersAndProperties.first; dataMember; dataMember = dataMember->next)
1595 if(!dataMember->isProperty)
1597 if(!dataMember->name && (dataMember->type == 1 || dataMember->type == 2))
1599 if(!ProcessInstMembers_SimpleMemberEnsure(dataMember, inst, instExp, list, zeroOut))
1604 unsigned int memberFilled = 0x0;
1606 if(inst->members && (*inst->members).first)
1608 struct __ecereNameSpace__ecere__com__Class * curClass = (((void *)0));
1609 struct __ecereNameSpace__ecere__com__DataMember * curMember = (((void *)0));
1610 struct __ecereNameSpace__ecere__com__DataMember * subMemberStack[256];
1611 int subMemberStackPos = 0;
1613 for(members = (*inst->members).first; members; members = members->next)
1615 if(members->type == 0 && members->dataMembers)
1617 struct MemberInit * member = (((void *)0));
1619 for(member = (*members->dataMembers).first; member; member = member->next)
1621 if(member->identifiers)
1623 struct __ecereNameSpace__ecere__com__DataMember * _subMemberStack[256];
1624 int _subMemberStackPos = 0;
1625 struct Identifier * firstID = (*member->identifiers).first;
1626 struct __ecereNameSpace__ecere__com__DataMember * thisMember = (struct __ecereNameSpace__ecere__com__DataMember *)__ecereNameSpace__ecere__com__eClass_FindProperty(classSym->registered, firstID->string, privateModule);
1629 thisMember = __ecereNameSpace__ecere__com__eClass_FindDataMember(classSym->registered, firstID->string, privateModule, _subMemberStack, &_subMemberStackPos);
1632 if(thisMember->memberAccess == 1)
1634 curMember = thisMember;
1635 curClass = curMember->_class;
1636 memcpy(subMemberStack, _subMemberStack, sizeof(int) * _subMemberStackPos);
1637 subMemberStackPos = _subMemberStackPos;
1639 if(!firstID->next && curMember == dataMember)
1648 __ecereNameSpace__ecere__com__eClass_FindNextMember(classSym->registered, &curClass, &curMember, subMemberStack, &subMemberStackPos);
1649 if(curMember == dataMember)
1667 struct Expression * instExpCopy = CopyExpression(instExp);
1668 struct Expression * memberExp;
1669 struct Expression * setExp;
1670 struct Expression * value = MkExpConstant("0");
1672 memberExp = MkExpMember(instExpCopy, MkIdentifier(dataMember->name));
1673 memberExp->member.memberType = 3;
1674 value->usage = (value->usage & ~0x1) | (((unsigned int)0x1) << 0);
1675 setExp = MkExpOp(memberExp, '=', value);
1676 value->loc = inst->loc;
1677 setExp->loc = inst->loc;
1678 FreeType(instExpCopy->expType);
1679 instExpCopy->expType = instExp->expType;
1680 if(instExp->expType)
1681 instExp->expType->refCount++;
1682 ProcessExpressionType(setExp);
1683 ProcessExpression(setExp);
1684 ListAdd(list, setExp);
1693 if(inst->members && (*inst->members).first)
1695 struct __ecereNameSpace__ecere__com__Class * curClass = (((void *)0));
1696 struct __ecereNameSpace__ecere__com__DataMember * curMember = (((void *)0));
1697 struct __ecereNameSpace__ecere__com__DataMember * subMemberStack[256];
1698 int subMemberStackPos = 0;
1700 for(members = (*inst->members).first; members; members = members->next)
1702 if(members->type == 0 && members->dataMembers)
1704 struct MemberInit * member = (((void *)0));
1705 struct __ecereNameSpace__ecere__com__Method * method = (((void *)0));
1707 for(member = (*members->dataMembers).first; member; member = member->next)
1709 struct Identifier * ident = (((void *)0));
1710 struct __ecereNameSpace__ecere__com__DataMember * thisMember = (((void *)0));
1712 if(member->identifiers)
1714 struct __ecereNameSpace__ecere__com__DataMember * _subMemberStack[256];
1715 int _subMemberStackPos = 0;
1716 struct Identifier * firstID = (*member->identifiers).first;
1718 thisMember = (struct __ecereNameSpace__ecere__com__DataMember *)__ecereNameSpace__ecere__com__eClass_FindProperty(classSym->registered, firstID->string, privateModule);
1720 thisMember = __ecereNameSpace__ecere__com__eClass_FindDataMember(classSym->registered, firstID->string, privateModule, _subMemberStack, &_subMemberStackPos);
1724 if(thisMember->memberAccess == 1)
1726 curMember = thisMember;
1727 curClass = curMember->_class;
1728 memcpy(subMemberStack, _subMemberStack, sizeof(int) * _subMemberStackPos);
1729 subMemberStackPos = _subMemberStackPos;
1732 else if(classSym->registered->type != 1)
1734 method = __ecereNameSpace__ecere__com__eClass_FindMethod(classSym->registered, ident->string, privateModule);
1735 if(!method || method->type != 1)
1736 method = (((void *)0));
1741 __ecereNameSpace__ecere__com__eClass_FindNextMember(classSym->registered, &curClass, &curMember, subMemberStack, &subMemberStackPos);
1742 thisMember = curMember;
1744 if(thisMember || method)
1746 struct Expression * instExpCopy = CopyExpression(instExp);
1747 struct Expression * setExp = (((void *)0));
1749 instExpCopy->tempCount = instExp->tempCount;
1751 ident = MkIdentifier(thisMember->name);
1754 struct Expression * memberExp;
1756 if(thisMember && thisMember->isProperty && ((struct __ecereNameSpace__ecere__com__Property *)thisMember)->conversion)
1758 if(member->identifiers && (*member->identifiers).count > 1)
1760 struct Identifier * id = (*member->identifiers).first;
1762 memberExp = MkExpMember(instExpCopy, id);
1763 for(id = id->next; id; id = id->next)
1764 memberExp = MkExpMember(memberExp, id);
1767 memberExp = MkExpMember(instExpCopy, ident);
1768 if(member->initializer && member->initializer->type == 0 && member->initializer->exp)
1770 member->initializer->exp->usage = (member->initializer->exp->usage & ~0x1) | (((unsigned int)0x1) << 0);
1771 setExp = MkExpOp(memberExp, '=', member->initializer->exp);
1772 member->initializer->exp = (((void *)0));
1773 FreeInitializer(member->initializer);
1774 member->initializer = (((void *)0));
1776 memberExp->loc = inst->loc;
1777 if(member->identifiers)
1778 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Clear((&*member->identifiers));
1780 setExp->loc = inst->loc;
1781 FreeType(instExpCopy->expType);
1782 instExpCopy->expType = instExp->expType;
1783 if(instExp->expType)
1784 instExp->expType->refCount++;
1787 ProcessExpressionType(setExp);
1788 ProcessExpression(setExp);
1789 ListAdd(list, setExp);
1798 return fullSet || convert;
1801 extern struct ModuleImport * mainModule;
1803 extern char * __ecereNameSpace__ecere__sys__CopyString(char * string);
1805 extern struct Specifier * MkStructOrUnion(int type, struct Identifier * id, struct __ecereNameSpace__ecere__sys__OldList * definitions);
1807 extern struct Declarator * MkDeclaratorPointer(struct Pointer * pointer, struct Declarator * declarator);
1809 extern struct Pointer * MkPointer(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Pointer * pointer);
1811 extern struct InitDeclarator * MkInitDeclarator(struct Declarator * declarator, struct Initializer * initializer);
1813 extern struct Declaration * MkDeclaration(struct __ecereNameSpace__ecere__sys__OldList * specifiers, struct __ecereNameSpace__ecere__sys__OldList * initDeclarators);
1815 extern struct External * MkExternalDeclaration(struct Declaration * declaration);
1817 extern void DeclareStruct(char * name, unsigned int skipNoHead);
1819 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void * item);
1821 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert(struct __ecereNameSpace__ecere__sys__OldList * this, void * prevItem, void * item);
1823 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Move(struct __ecereNameSpace__ecere__sys__OldList * this, void * item, void * prevItem);
1825 void DeclareClass(struct Symbol * classSym, char * className)
1827 void * __ecereTemp1;
1829 if(classSym && classSym->id == (((int)0x7fffffff)))
1831 struct Declaration * decl;
1832 struct __ecereNameSpace__ecere__sys__OldList * specifiers, * declarators;
1833 struct Declarator * d;
1835 if(!classSym->_import)
1837 if(!classSym->module)
1838 classSym->module = mainModule;
1839 if(!classSym->module)
1841 classSym->_import = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassImport), ((struct ClassImport *)__ecereTemp1)->isRemote = classSym->registered ? classSym->registered->isRemote : 0x0, ((struct ClassImport *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(classSym->string), ((struct ClassImport *)__ecereTemp1));
1842 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&classSym->module->classes, classSym->_import);
1844 classSym->_import->itself = 0x1;
1845 specifiers = MkList();
1846 declarators = MkList();
1847 ListAdd(specifiers, MkSpecifier(EXTERN));
1848 ListAdd(specifiers, MkStructOrUnion(3, MkIdentifier("__ecereNameSpace__ecere__com__Class"), (((void *)0))));
1849 d = MkDeclaratorPointer(MkPointer((((void *)0)), (((void *)0))), MkDeclaratorIdentifier(MkIdentifier(className)));
1850 ListAdd(declarators, MkInitDeclarator(d, (((void *)0))));
1851 decl = MkDeclaration(specifiers, declarators);
1854 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert((&*ast), curExternal->prev, (classSym->pointerExternal = MkExternalDeclaration(decl)));
1855 classSym->id = curExternal->symbol ? curExternal->symbol->idCode : 0;
1856 classSym->idCode = classSym->id;
1859 else if(classSym && curExternal->symbol->idCode < classSym->id)
1861 if(classSym->structExternal)
1862 DeclareStruct(classSym->string, classSym->registered && classSym->registered->type == 5);
1863 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Move((&*ast), classSym->pointerExternal, curExternal->prev);
1864 if(classSym->structExternal)
1865 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Move((&*ast), classSym->structExternal, classSym->pointerExternal);
1866 classSym->id = curExternal->symbol->idCode;
1867 classSym->idCode = classSym->id;
1871 void ProcessExpressionInstPass(struct Expression * exp)
1873 ProcessExpression(exp);
1876 extern void FreeExpression(struct Expression * exp);
1878 extern struct Context * curContext;
1880 static unsigned int ProcessBracketInst(struct Instantiation * inst, struct __ecereNameSpace__ecere__sys__OldList * list);
1882 extern struct Specifier * MkSpecifierName(char * name);
1884 extern struct Initializer * MkInitializerList(struct __ecereNameSpace__ecere__sys__OldList * list);
1886 extern struct Declaration * MkDeclarationInst(struct Instantiation * inst);
1888 extern struct Instantiation * MkInstantiation(struct Specifier * _class, struct Expression * exp, struct __ecereNameSpace__ecere__sys__OldList * members);
1890 extern struct Specifier * CopySpecifier(struct Specifier * spec);
1892 extern struct Expression * QMkExpId(char * id);
1894 static void ProcessDeclaration(struct Declaration * decl);
1896 extern char * strcpy(char * , const char * );
1898 extern struct Symbol * FindClass(char * name);
1900 extern void FullClassNameCat(char * output, char * className, unsigned int includeTemplateParams);
1902 extern void MangleClassName(char * className);
1904 static struct Declaration * curDecl;
1906 static int declTempCount;
1908 extern void FreeInstance(struct Instantiation * inst);
1910 extern struct Type * ProcessTypeString(char * string, unsigned int staticMethod);
1912 extern void ProcessMethodType(struct __ecereNameSpace__ecere__com__Method * method);
1914 static void ProcessStatement(struct Statement * stmt);
1916 extern void CheckTemplateTypes(struct Expression * exp);
1918 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(struct __ecereNameSpace__ecere__sys__OldList * this, void * item);
1920 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(struct __ecereNameSpace__ecere__sys__OldList * this, void (* freeFn)(void * ));
1922 static void ProcessExpression(struct Expression * exp)
1930 struct Instantiation * inst = exp->instance;
1932 if(inCompiler && inst->_class)
1934 char className[1024];
1935 struct Symbol * classSym = inst->_class->symbol;
1936 struct Expression * instExp;
1938 if(classSym && classSym->registered && classSym->registered->type == 2)
1942 struct __ecereNameSpace__ecere__sys__OldList list =
1947 ProcessInstMembers(inst, (((void *)0)), &list, 0x0);
1948 ProcessExpression(inst->exp);
1951 exp->op.exp1 = inst->exp;
1952 exp->op.exp2 = list.first;
1953 inst->exp = (((void *)0));
1957 struct Type * expType = exp->expType;
1958 struct Expression * prev = exp->prev, * next = exp->next;
1959 struct __ecereNameSpace__ecere__sys__OldList list =
1964 ProcessInstMembers(inst, (((void *)0)), &list, 0x0);
1965 FreeType(exp->destType);
1966 *exp = *(struct Expression *)list.first;
1968 struct Expression * firstExp = list.first;
1970 ((firstExp ? (__ecereClass_Expression->Destructor ? __ecereClass_Expression->Destructor(firstExp) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(firstExp)) : 0), firstExp = 0);
1972 FreeType(exp->destType);
1973 exp->destType = expType;
1978 else if(classSym && classSym->registered && (classSym->registered->type == 3 || classSym->registered->type == 4))
1982 struct __ecereNameSpace__ecere__sys__OldList list =
1986 struct Expression * e;
1988 ProcessInstMembers(inst, (((void *)0)), &list, 0x0);
1989 ProcessExpression(inst->exp);
1992 exp->op.exp1 = inst->exp;
1993 exp->op.exp2 = list.first;
1994 inst->exp = (((void *)0));
1995 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(&list, list.first);
1996 while(e = list.first)
1998 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(&list, e);
2004 struct Expression * prev = exp->prev, * next = exp->next;
2005 struct Type * expType = exp->expType;
2006 struct __ecereNameSpace__ecere__sys__OldList list =
2011 ProcessInstMembers(inst, (((void *)0)), &list, 0x0);
2014 struct Expression * e = list.first;
2016 FreeType(exp->destType);
2018 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(&list, e);
2019 ((e ? (__ecereClass_Expression->Destructor ? __ecereClass_Expression->Destructor(e) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(e)) : 0), e = 0);
2020 exp->expType = expType;
2023 while(e = list.first)
2025 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(&list, e);
2032 exp->constant = __ecereNameSpace__ecere__sys__CopyString("0");
2036 else if(classSym && classSym->registered && classSym->registered->type == 1)
2041 exp->list = MkList();
2042 ProcessInstMembers(inst, inst->exp, exp->list, 0x0);
2043 ProcessExpression(inst->exp);
2044 if(!(*exp->list).count)
2046 exp->type = (int)1000;
2048 inst->exp = (((void *)0));
2052 struct Declaration * decl;
2053 struct Declaration * dummyDecl;
2056 dummyDecl = MkDeclaration((((void *)0)), (((void *)0)));
2057 if(!curCompound->compound.declarations)
2058 curCompound->compound.declarations = MkList();
2059 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert((&*curCompound->compound.declarations), (((void *)0)), dummyDecl);
2060 sprintf(className, "__simpleStruct%d", curContext->simpleID++);
2062 struct __ecereNameSpace__ecere__sys__OldList * list = MkList();
2064 if(inst->isConstant && ProcessBracketInst(inst, list))
2066 decl = MkDeclaration(MkList(), MkList());
2067 ListAdd(decl->specifiers, MkSpecifierName(inst->_class->name));
2068 ListAdd(decl->declarators, MkInitDeclarator(MkDeclaratorIdentifier(MkIdentifier(className)), MkInitializerList(list)));
2070 exp->identifier = MkIdentifier(className);
2074 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free((&*list), (((void *)0)));
2075 (__ecereNameSpace__ecere__com__eSystem_Delete(list), list = 0);
2076 decl = MkDeclarationInst(MkInstantiation(CopySpecifier(inst->_class), MkExpIdentifier(MkIdentifier(className)), (((void *)0))));
2078 exp->list = MkList();
2079 instExp = QMkExpId(className);
2080 instExp->loc = exp->loc;
2081 instExp->expType = MkClassType(inst->_class->name);
2082 decl->inst->fullSet = ProcessInstMembers(inst, instExp, exp->list, 0x0);
2083 ListAdd(exp->list, instExp);
2086 FreeType(exp->expType);
2087 exp->expType = MkClassType(inst->_class->name);
2089 void * prev = dummyDecl->prev, * next = dummyDecl->next;
2092 dummyDecl->prev = prev;
2093 dummyDecl->next = next;
2094 ((decl ? (__ecereClass_Declaration->Destructor ? __ecereClass_Declaration->Destructor(decl) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(decl)) : 0), decl = 0);
2097 ProcessDeclaration(decl);
2103 struct Expression * newCall;
2105 if(classSym && classSym->registered && classSym->registered->type == 5 && (classSym->registered->templateClass ? classSym->registered->templateClass->fixed : classSym->registered->fixed))
2109 sprintf(size, "%d", classSym->registered->templateClass ? classSym->registered->templateClass->structSize : classSym->registered->structSize);
2110 newCall = MkExpCall(QMkExpId("ecere::com::eSystem_New0"), MkListOne(MkExpConstant(size)));
2111 newCall->byReference = 0x1;
2115 strcpy(className, "__ecereClass_");
2116 if(classSym && classSym->registered && classSym->registered->type == 5 && classSym->registered->templateClass)
2118 classSym = FindClass(classSym->registered->templateClass->fullName);
2119 FullClassNameCat(className, classSym->string, 0x1);
2122 FullClassNameCat(className, inst->_class->name, 0x1);
2123 MangleClassName(className);
2124 DeclareClass(classSym, className);
2125 newCall = MkExpCall(QMkExpId("ecere::com::eInstance_New"), MkListOne(QMkExpId(className)));
2126 ProcessExpressionType(newCall);
2127 newCall->byReference = 0x1;
2131 if(inst->members && (*inst->members).first)
2134 exp->list = MkList();
2137 ListAdd(exp->list, MkExpOp(inst->exp, '=', newCall));
2140 FreeExpression(newCall);
2141 ProcessInstMembers(inst, inst->exp, exp->list, 0x0);
2143 FreeExpression(inst->exp);
2149 exp->op.exp1 = inst->exp;
2150 exp->op.exp2 = newCall;
2151 ProcessExpression(inst->exp);
2153 inst->exp = (((void *)0));
2157 if(inst->members && (*inst->members).first)
2159 int __simpleStruct0;
2160 char ecereTemp[100];
2161 struct MembersInit * members;
2162 int tempCount = exp->tempCount;
2163 struct Expression * tmpExp;
2165 for(members = (*inst->members).first; members; members = members->next)
2167 if(members->type == 0 && members->dataMembers)
2169 struct MemberInit * member;
2171 for(member = (*members->dataMembers).first; member; member = member->next)
2173 if(member->initializer && member->initializer->type == 0)
2175 int __simpleStruct0;
2177 ProcessMemberInitData(member);
2178 tempCount = (__simpleStruct0 = member->initializer->exp->tempCount, (tempCount > __simpleStruct0) ? tempCount : __simpleStruct0);
2185 tempCount = ((tempCount > declTempCount) ? tempCount : declTempCount);
2188 curExternal->function->tempCount = (__simpleStruct0 = curExternal->function->tempCount, (__simpleStruct0 > tempCount) ? __simpleStruct0 : tempCount);
2189 sprintf(ecereTemp, "__ecereTemp%d", tempCount);
2190 instExp = MkExpBrackets(MkListOne(MkExpCast(QMkClass(inst->_class->name, (((void *)0))), (tmpExp = QMkExpId(ecereTemp), tmpExp->byReference = 0x1, tmpExp))));
2191 instExp->tempCount = tempCount;
2193 exp->list = MkList();
2194 ListAdd(exp->list, MkExpOp((tmpExp = QMkExpId(ecereTemp), tmpExp->byReference = 0x1, tmpExp), '=', newCall));
2195 instExp->expType = MkClassType(inst->_class->name);
2196 ProcessInstMembers(inst, instExp, exp->list, 0x0);
2197 FreeExpression(instExp);
2198 ProcessExpression(tmpExp);
2200 ListAdd(exp->list, MkExpBrackets(MkListOne(MkExpCast(QMkClass(inst->_class->name, (((void *)0))), (tmpExp = QMkExpId(ecereTemp), tmpExp->byReference = 0x1, tmpExp)))));
2201 exp->tempCount = tempCount;
2204 declTempCount = ((declTempCount > tempCount) ? declTempCount : tempCount);
2209 FreeType(newCall->destType);
2210 FreeType(newCall->expType);
2211 newCall->destType = exp->destType;
2212 newCall->expType = exp->expType;
2214 ((newCall ? (__ecereClass_Expression->Destructor ? __ecereClass_Expression->Destructor(newCall) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(newCall)) : 0), newCall = 0);
2222 ProcessInstantiation(inst);
2231 ProcessExpression(exp->_new.size);
2235 ProcessExpression(exp->_renew.size);
2236 ProcessExpression(exp->_renew.exp);
2240 unsigned int assign = 0x0;
2246 exp->op.exp2->usage = (exp->op.exp2->usage & ~0x1) | (((unsigned int)0x1) << 0);
2248 exp->op.exp1->usage = (exp->op.exp1->usage & ~0x2) | (((unsigned int)0x1) << 1);
2262 exp->op.exp2->usage = (exp->op.exp2->usage & ~0x1) | (((unsigned int)0x1) << 0);
2265 exp->op.exp1->usage = (exp->op.exp1->usage & ~0x2) | (((unsigned int)0x1) << 1);
2270 exp->op.exp1->usage = (exp->op.exp1->usage & ~0x2) | (((unsigned int)0x1) << 1);
2272 if(exp->op.exp1 && exp->op.exp2)
2274 exp->op.exp1->usage = (exp->op.exp1->usage & ~0x1) | (((unsigned int)0x1) << 0);
2275 exp->op.exp2->usage = (exp->op.exp2->usage & ~0x1) | (((unsigned int)0x1) << 0);
2283 exp->op.exp1->usage = (exp->op.exp1->usage & ~0x1) | (((unsigned int)0x1) << 0);
2288 exp->op.exp2->usage = (exp->op.exp2->usage & ~0x1) | (((unsigned int)0x1) << 0);
2305 exp->op.exp1->usage = (exp->op.exp1->usage & ~0x1) | (((unsigned int)0x1) << 0);
2307 exp->op.exp2->usage = (exp->op.exp2->usage & ~0x1) | (((unsigned int)0x1) << 0);
2312 ProcessExpression(exp->op.exp1);
2317 exp->op.exp2->tempCount = exp->op.exp1->tempCount;
2318 ProcessExpression(exp->op.exp2);
2325 struct Expression * e;
2327 for(e = (*exp->list).first; e; e = e->next)
2329 int __simpleStruct2, __simpleStruct3;
2330 int __simpleStruct0, __simpleStruct1;
2332 e->tempCount = (__simpleStruct0 = e->tempCount, __simpleStruct1 = exp->tempCount, (__simpleStruct0 > __simpleStruct1) ? __simpleStruct0 : __simpleStruct1);
2335 e->usage |= (exp->usage & ((((unsigned int)(0x1)) | (((unsigned int)(0x1)) << 2))));
2337 ProcessExpression(e);
2338 exp->tempCount = (__simpleStruct2 = exp->tempCount, __simpleStruct3 = e->tempCount, (__simpleStruct2 > __simpleStruct3) ? __simpleStruct2 : __simpleStruct3);
2344 struct Expression * e;
2346 exp->index.exp->usage = (exp->index.exp->usage & ~0x1) | (((unsigned int)0x1) << 0);
2347 ProcessExpression(exp->index.exp);
2348 for(e = (*exp->index.index).first; e; e = e->next)
2351 e->usage = (e->usage & ~0x1) | (((unsigned int)0x1) << 0);
2352 ProcessExpression(e);
2354 exp->tempCount = exp->index.exp->tempCount;
2359 struct Expression * e;
2360 struct __ecereNameSpace__ecere__com__Method * method = (((void *)0));
2362 ProcessExpression(exp->call.exp);
2363 if(exp->call.arguments)
2365 for(e = (*exp->call.arguments).first; e; e = e->next)
2367 e->usage = (e->usage & ~0x1) | (((unsigned int)0x1) << 0);
2368 e->usage = (e->usage & ~0x4) | (((unsigned int)0x1) << 2);
2369 ProcessExpression(e);
2376 exp->member.exp->usage = (exp->member.exp->usage & ~0x1) | (((unsigned int)0x1) << 0);
2377 ProcessExpression(exp->member.exp);
2378 if(!exp->member.memberType)
2380 struct Type * type = exp->member.exp->expType;
2382 if((type && type->kind == 8 && exp->member.member))
2384 struct __ecereNameSpace__ecere__com__Class * _class = (exp->member.member->_class && exp->member.member->classSym) ? exp->member.member->classSym->registered : (type->_class ? type->_class->registered : (((void *)0)));
2385 struct __ecereNameSpace__ecere__com__Property * prop = (((void *)0));
2386 struct __ecereNameSpace__ecere__com__Method * method = (((void *)0));
2387 struct __ecereNameSpace__ecere__com__DataMember * member = (((void *)0));
2388 struct __ecereNameSpace__ecere__com__Property * revConvert = (((void *)0));
2390 if(exp->member.thisPtr)
2392 member = __ecereNameSpace__ecere__com__eClass_FindDataMember(_class, exp->member.member->string, privateModule, (((void *)0)), (((void *)0)));
2394 prop = __ecereNameSpace__ecere__com__eClass_FindProperty(_class, exp->member.member->string, privateModule);
2398 prop = __ecereNameSpace__ecere__com__eClass_FindProperty(_class, exp->member.member->string, (((void *)0)));
2400 member = __ecereNameSpace__ecere__com__eClass_FindDataMember(_class, exp->member.member->string, (((void *)0)), (((void *)0)), (((void *)0)));
2401 if(!prop && !member)
2403 method = __ecereNameSpace__ecere__com__eClass_FindMethod(_class, exp->member.member->string, (((void *)0)));
2406 prop = __ecereNameSpace__ecere__com__eClass_FindProperty(_class, exp->member.member->string, privateModule);
2408 member = __ecereNameSpace__ecere__com__eClass_FindDataMember(_class, exp->member.member->string, privateModule, (((void *)0)), (((void *)0)));
2412 if(!prop && !member)
2413 method = __ecereNameSpace__ecere__com__eClass_FindMethod(_class, exp->member.member->string, privateModule);
2414 if(!prop && !member && !method)
2416 struct Symbol * classSym = FindClass(exp->member.member->string);
2420 struct __ecereNameSpace__ecere__com__Class * convertClass = classSym->registered;
2423 revConvert = __ecereNameSpace__ecere__com__eClass_FindProperty(convertClass, _class->fullName, privateModule);
2428 exp->member.memberType = 1;
2430 prop->dataType = ProcessTypeString(prop->dataTypeString, 0x0);
2431 FreeType(exp->expType);
2432 exp->expType = prop->dataType;
2434 prop->dataType->refCount++;
2438 exp->member.memberType = 2;
2439 if(!method->dataType)
2440 ProcessMethodType(method);
2441 FreeType(exp->expType);
2442 exp->expType = method->dataType;
2443 if(method->dataType)
2444 method->dataType->refCount++;
2448 exp->member.memberType = 3;
2449 DeclareStruct(_class->fullName, 0x0);
2450 if(!member->dataType)
2451 member->dataType = ProcessTypeString(member->dataTypeString, 0x0);
2452 FreeType(exp->expType);
2453 exp->expType = member->dataType;
2454 if(member->dataType)
2455 member->dataType->refCount++;
2459 exp->member.memberType = 4;
2460 FreeType(exp->expType);
2461 exp->expType = MkClassType(revConvert->_class->fullName);
2471 exp->cast.exp->usage = (exp->cast.exp->usage & ~0x1) | (((unsigned int)0x1) << 0);
2472 ProcessExpression(exp->cast.exp);
2477 struct Expression * e;
2479 if(((unsigned int)((exp->usage & 0x1) >> 0)))
2480 exp->cond.cond->usage = (exp->cond.cond->usage & ~0x1) | (((unsigned int)0x1) << 0);
2481 ProcessExpression(exp->cond.cond);
2482 for(e = (*exp->cond.exp).first; e; e = e->next)
2484 if(!e->next && ((unsigned int)((exp->usage & 0x1) >> 0)))
2485 e->usage = (e->usage & ~0x1) | (((unsigned int)0x1) << 0);
2486 ProcessExpression(e);
2488 if(exp->cond.elseExp)
2490 if(((unsigned int)((exp->usage & 0x1) >> 0)))
2491 exp->cond.elseExp->usage = (exp->cond.elseExp->usage & ~0x1) | (((unsigned int)0x1) << 0);
2492 ProcessExpression(exp->cond.elseExp);
2498 if(exp->compound->compound.statements && ((struct Statement *)(*exp->compound->compound.statements).last)->type == 3 && (*((struct Statement *)(*exp->compound->compound.statements).last)->expressions).last)
2500 ((struct Expression *)(*((struct Statement *)(*exp->compound->compound.statements).last)->expressions).last)->usage = exp->usage;
2502 ProcessStatement(exp->compound);
2507 ProcessExpression(exp->vaArg.exp);
2512 ProcessInitializer(exp->initializer.initializer);
2516 CheckTemplateTypes(exp);
2519 static void ProcessInitializer(struct Initializer * init)
2524 init->exp->usage = (init->exp->usage & ~0x1) | (((unsigned int)0x1) << 0);
2525 ProcessExpression(init->exp);
2529 struct Initializer * i;
2531 for(i = (*init->list).first; i; i = i->next)
2532 ProcessInitializer(i);
2538 static void ProcessSpecifier(struct Specifier * spec)
2550 struct Enumerator * e;
2554 for(e = (*spec->list).first; e; e = e->next)
2557 ProcessExpression(e->exp);
2565 if(spec->definitions)
2567 struct ClassDef * def;
2569 for(def = (*spec->definitions).first; def; def = def->next)
2571 if(def->type == 2 && def->decl && def->decl->type == 0)
2572 ProcessDeclaration(def->decl);
2580 extern struct Specifier * _MkSpecifierName(char * name, struct Symbol * symbol, struct __ecereNameSpace__ecere__sys__OldList * templateArgs);
2582 extern struct Identifier * CopyIdentifier(struct Identifier * id);
2584 extern struct MemberInit * MkMemberInit(struct __ecereNameSpace__ecere__sys__OldList * ids, struct Initializer * initializer);
2586 extern struct Initializer * MkInitializerAssignment(struct Expression * exp);
2588 extern int strcmp(const char * , const char * );
2590 extern struct Expression * MkExpInstance(struct Instantiation * inst);
2592 extern struct MembersInit * MkMembersInitList(struct __ecereNameSpace__ecere__sys__OldList * dataMembers);
2594 static unsigned int ProcessBracketInst_DataMember(struct __ecereNameSpace__ecere__com__DataMember * parentMember, struct Instantiation * inst, struct __ecereNameSpace__ecere__sys__OldList * list)
2596 struct Symbol * classSym = inst->_class->symbol;
2597 struct __ecereNameSpace__ecere__com__DataMember * dataMember = (((void *)0));
2598 unsigned int someMemberSet = 0x0;
2600 for(dataMember = parentMember->members.first; dataMember; dataMember = dataMember->next)
2602 struct MembersInit * members;
2603 struct MemberInit * member = (((void *)0));
2605 if(!dataMember->name && (dataMember->type == 1 || dataMember->type == 2))
2607 if(!ProcessBracketInst_DataMember(dataMember, inst, list))
2612 struct __ecereNameSpace__ecere__com__Class * curClass = (((void *)0));
2613 struct __ecereNameSpace__ecere__com__DataMember * curMember = (((void *)0));
2614 struct __ecereNameSpace__ecere__com__DataMember * subMemberStack[256];
2615 int subMemberStackPos = 0;
2616 unsigned int found = 0x0;
2618 if(inst->members && (*inst->members).first)
2620 for(members = (*inst->members).first; members; members = members->next)
2622 if(members->type == 0)
2624 for(member = (*members->dataMembers).first; member; member = member->next)
2626 if(member->identifiers)
2628 struct Identifier * firstID = (*member->identifiers).first;
2629 struct __ecereNameSpace__ecere__com__DataMember * _subMemberStack[256];
2630 int _subMemberStackPos = 0;
2631 struct __ecereNameSpace__ecere__com__DataMember * thisMember;
2633 thisMember = firstID ? (struct __ecereNameSpace__ecere__com__DataMember *)__ecereNameSpace__ecere__com__eClass_FindProperty(classSym->registered, firstID->string, privateModule) : (((void *)0));
2634 if(!thisMember && firstID)
2635 thisMember = __ecereNameSpace__ecere__com__eClass_FindDataMember(classSym->registered, firstID->string, privateModule, _subMemberStack, &_subMemberStackPos);
2636 if(thisMember && thisMember->memberAccess == 1)
2638 curMember = thisMember;
2639 curClass = curMember->_class;
2640 memcpy(subMemberStack, _subMemberStack, sizeof(int) * _subMemberStackPos);
2641 subMemberStackPos = _subMemberStackPos;
2643 if(dataMember == thisMember)
2645 if((*member->identifiers).count > 1 && member->initializer && member->initializer->type == 0)
2647 struct __ecereNameSpace__ecere__sys__OldList * partList = MkList();
2648 struct Symbol * symbol;
2649 struct Specifier * spec;
2650 struct MembersInit * nextMembers;
2651 struct MemberInit * next = member->next;
2653 if(!dataMember->dataType)
2654 dataMember->dataType = ProcessTypeString(dataMember->dataTypeString, 0x0);
2655 symbol = (dataMember->dataType && dataMember->dataType->kind == 8) ? dataMember->dataType->_class : (((void *)0));
2656 spec = _MkSpecifierName(dataMember->dataTypeString, symbol, (((void *)0)));
2658 struct __ecereNameSpace__ecere__sys__OldList * identifiers = MkList();
2659 struct Identifier * id;
2661 for(id = ((struct Identifier *)(*member->identifiers).first)->next; id; id = id->next)
2662 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*identifiers), CopyIdentifier(id));
2663 ListAdd(partList, MkMemberInit(identifiers, MkInitializerAssignment(member->initializer->exp)));
2665 for(nextMembers = members; nextMembers; nextMembers = nextMembers->next)
2667 if(!nextMembers->dataMembers)
2669 if(members != nextMembers)
2670 next = (*nextMembers->dataMembers).first;
2671 if(nextMembers->type == 0)
2673 struct MemberInit * nextMember;
2675 for(nextMember = next; nextMember; nextMember = next, next = nextMember ? nextMember->next : (((void *)0)))
2677 struct Identifier * nextID = (*nextMember->identifiers).first;
2679 if(nextMember->identifiers && (*nextMember->identifiers).count > 1 && !strcmp(firstID->string, nextID->string))
2681 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*nextMembers->dataMembers), nextMember);
2682 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*nextMember->identifiers), nextID);
2683 ListAdd(partList, nextMember);
2688 member->initializer->exp = MkExpInstance(MkInstantiation(spec, (((void *)0)), MkListOne(MkMembersInitList(partList))));
2696 __ecereNameSpace__ecere__com__eClass_FindNextMember(classSym->registered, &curClass, &curMember, subMemberStack, &subMemberStackPos);
2697 if(curMember == dataMember)
2709 if(member && member->initializer && member->initializer->type == 0)
2711 struct Expression * memberExp = (((void *)0));
2713 if(member->initializer->exp->type == 1 && member->initializer->exp->expType && member->initializer->exp->expType->_class->registered->type == 1)
2715 struct __ecereNameSpace__ecere__sys__OldList * subList = MkList();
2717 ProcessBracketInst(member->initializer->exp->instance, subList);
2718 FreeExpression(member->initializer->exp);
2719 ListAdd(list, MkInitializerList(subList));
2723 member->initializer->exp->usage = (member->initializer->exp->usage & ~0x1) | (((unsigned int)0x1) << 0);
2724 ProcessExpression(member->initializer->exp);
2725 ListAdd(list, MkInitializerAssignment(member->initializer->exp));
2727 member->initializer->exp = (((void *)0));
2728 FreeInitializer(member->initializer);
2729 member->initializer = (((void *)0));
2730 someMemberSet = 0x1;
2732 else if(member && member->initializer && member->initializer->type == 1)
2734 ListAdd(list, member->initializer);
2735 member->initializer = (((void *)0));
2736 someMemberSet = 0x1;
2738 else if(dataMember && dataMember->dataTypeString && parentMember->type != 1)
2740 struct Symbol * classSym;
2742 if(!dataMember->dataType)
2743 dataMember->dataType = ProcessTypeString(dataMember->dataTypeString, 0x0);
2744 classSym = (dataMember->dataType && dataMember->dataType->kind == 8) ? dataMember->dataType->_class : (((void *)0));
2745 if(classSym && classSym->registered && classSym->registered->type == 1)
2747 struct __ecereNameSpace__ecere__sys__OldList * subList = MkList();
2748 struct Specifier * spec = _MkSpecifierName(dataMember->dataTypeString, classSym, (((void *)0)));
2749 struct Instantiation * inst = MkInstantiation(spec, (((void *)0)), (((void *)0)));
2751 ProcessBracketInst(inst, subList);
2753 ListAdd(list, MkInitializerList(subList));
2756 ListAdd(list, MkInitializerAssignment(MkExpConstant("0")));
2760 if(parentMember->type == 1 && !someMemberSet)
2762 struct Symbol * classSym;
2764 dataMember = parentMember->members.first;
2765 if(!dataMember->dataType && dataMember->dataTypeString)
2766 dataMember->dataType = ProcessTypeString(dataMember->dataTypeString, 0x0);
2767 classSym = (dataMember->dataType && dataMember->dataType->kind == 8) ? dataMember->dataType->_class : (((void *)0));
2768 if(classSym && classSym->registered && classSym->registered->type == 1)
2770 struct __ecereNameSpace__ecere__sys__OldList * subList = MkList();
2771 struct Specifier * spec = _MkSpecifierName(dataMember->dataTypeString, classSym, (((void *)0)));
2772 struct Instantiation * inst = MkInstantiation(spec, (((void *)0)), (((void *)0)));
2774 ProcessBracketInst(inst, subList);
2776 ListAdd(list, MkInitializerList(subList));
2779 ListAdd(list, MkInitializerAssignment(MkExpConstant("0")));
2784 extern void Compiler_Error(char * format, ...);
2786 extern char * __ecereNameSpace__ecere__GetTranslatedString(struct __ecereNameSpace__ecere__com__Instance * module, char * string, char * stringAndContext);
2788 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
2790 static unsigned int ProcessBracketInst(struct Instantiation * inst, struct __ecereNameSpace__ecere__sys__OldList * list)
2792 static int recursionCount = 0;
2793 struct Symbol * classSym = inst->_class->symbol;
2794 struct __ecereNameSpace__ecere__com__Class * _class = (((void *)0));
2796 if(recursionCount > 500)
2799 while(_class != classSym->registered)
2801 struct __ecereNameSpace__ecere__com__DataMember * dataMember;
2802 struct __ecereNameSpace__ecere__com__Class * lastClass = _class;
2804 for(_class = classSym->registered; _class->base != lastClass && _class->base->type != 1000; _class = _class->base)
2806 for(dataMember = _class->membersAndProperties.first; dataMember; dataMember = dataMember->next)
2808 if(!dataMember->isProperty && !dataMember->name && (dataMember->type == 1 || dataMember->type == 2))
2810 if(!ProcessBracketInst_DataMember(dataMember, inst, list))
2818 struct MembersInit * members;
2819 struct MemberInit * member = (((void *)0));
2820 unsigned int found = 0x0;
2822 if(inst->members && (*inst->members).first)
2824 struct __ecereNameSpace__ecere__com__DataMember * curMember = (((void *)0));
2825 struct __ecereNameSpace__ecere__com__Class * curClass = (((void *)0));
2826 struct __ecereNameSpace__ecere__com__DataMember * subMemberStack[256];
2827 int subMemberStackPos = 0;
2829 for(members = (*inst->members).first; members; members = members->next)
2831 if(members->type == 0)
2833 for(member = (*members->dataMembers).first; member; member = member->next)
2835 struct Identifier * firstID = member->identifiers ? (*member->identifiers).first : (((void *)0));
2839 struct __ecereNameSpace__ecere__com__DataMember * _subMemberStack[256];
2840 int _subMemberStackPos = 0;
2841 struct __ecereNameSpace__ecere__com__DataMember * thisMember = (struct __ecereNameSpace__ecere__com__DataMember *)__ecereNameSpace__ecere__com__eClass_FindProperty(classSym->registered, firstID->string, privateModule);
2844 thisMember = __ecereNameSpace__ecere__com__eClass_FindDataMember(classSym->registered, firstID->string, privateModule, _subMemberStack, &_subMemberStackPos);
2847 curMember = thisMember;
2848 curClass = curMember->_class;
2849 memcpy(subMemberStack, _subMemberStack, sizeof(int) * _subMemberStackPos);
2850 subMemberStackPos = _subMemberStackPos;
2852 if(curMember == dataMember)
2854 if(dataMember->isProperty)
2856 if(!((struct __ecereNameSpace__ecere__com__Property *)dataMember)->Set)
2858 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "No set defined for property %s\n", (((void *)0))), dataMember->name);
2864 if((*member->identifiers).count > 1 && member->initializer && member->initializer->type == 0)
2866 struct __ecereNameSpace__ecere__sys__OldList * partList = MkList();
2867 struct Specifier * spec;
2868 struct MembersInit * nextMembers;
2869 struct MemberInit * next = member->next;
2870 struct Symbol * symbol;
2872 if(!dataMember->dataType)
2873 dataMember->dataType = ProcessTypeString(dataMember->dataTypeString, 0x0);
2874 symbol = (dataMember->dataType && dataMember->dataType->kind == 8) ? dataMember->dataType->_class : (((void *)0));
2875 spec = _MkSpecifierName(dataMember->dataTypeString, symbol, (((void *)0)));
2876 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*member->identifiers), firstID);
2877 ListAdd(partList, MkMemberInit(member->identifiers, MkInitializerAssignment(member->initializer->exp)));
2878 for(nextMembers = members; nextMembers; nextMembers = nextMembers->next)
2880 if(!nextMembers->dataMembers)
2882 if(members != nextMembers)
2883 next = (*nextMembers->dataMembers).first;
2884 if(nextMembers->type == 0)
2886 struct MemberInit * nextMember;
2888 for(nextMember = next; nextMember; nextMember = next, next = nextMember ? nextMember->next : (((void *)0)))
2890 struct Identifier * nextID = (*nextMember->identifiers).first;
2892 if(nextMember->identifiers && (*nextMember->identifiers).count > 1 && !strcmp(firstID->string, nextID->string))
2894 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*nextMembers->dataMembers), nextMember);
2895 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*nextMember->identifiers), nextID);
2896 ListAdd(partList, nextMember);
2901 member->initializer->exp = MkExpInstance(MkInstantiation(spec, (((void *)0)), MkListOne(MkMembersInitList(partList))));
2902 member->identifiers = (((void *)0));
2910 __ecereNameSpace__ecere__com__eClass_FindNextMember(classSym->registered, &curClass, &curMember, subMemberStack, &subMemberStackPos);
2911 if(curMember == dataMember)
2913 if(dataMember->isProperty)
2915 if(!((struct __ecereNameSpace__ecere__com__Property *)dataMember)->Set)
2917 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "No set defined for property %s\n", (((void *)0))), dataMember->name);
2933 if(dataMember->isProperty)
2935 if(member && member->initializer && member->initializer->type == 0)
2937 struct Expression * memberExp = (((void *)0));
2939 if(member->initializer->exp->type == 1 && member->initializer->exp->expType && member->initializer->exp->expType->_class && member->initializer->exp->expType->_class->registered && member->initializer->exp->expType->_class->registered->type == 1)
2941 struct __ecereNameSpace__ecere__sys__OldList * subList = MkList();
2943 ProcessBracketInst(member->initializer->exp->instance, subList);
2944 FreeExpression(member->initializer->exp);
2945 ListAdd(list, MkInitializerList(subList));
2949 member->initializer->exp->usage = (member->initializer->exp->usage & ~0x1) | (((unsigned int)0x1) << 0);
2950 ProcessExpression(member->initializer->exp);
2951 ListAdd(list, MkInitializerAssignment(member->initializer->exp));
2953 member->takeOutExp = 0x1;
2955 else if(member && member->initializer && member->initializer->type == 1)
2957 ListAdd(list, member->initializer);
2958 member->initializer = (((void *)0));
2960 else if(dataMember && dataMember->dataTypeString)
2962 struct Symbol * classSym;
2964 if(!dataMember->dataType)
2965 dataMember->dataType = ProcessTypeString(dataMember->dataTypeString, 0x0);
2966 classSym = (dataMember->dataType && dataMember->dataType->kind == 8) ? dataMember->dataType->_class : (((void *)0));
2967 if(classSym && classSym->registered && classSym->registered->type == 1)
2969 struct __ecereNameSpace__ecere__sys__OldList * subList = MkList();
2970 struct Specifier * spec = _MkSpecifierName(dataMember->dataTypeString, classSym, (((void *)0)));
2971 struct Instantiation * inst = MkInstantiation(spec, (((void *)0)), (((void *)0)));
2973 ProcessBracketInst(inst, subList);
2975 ListAdd(list, MkInitializerList(subList));
2977 else if(dataMember->dataType->kind == 12)
2978 ListAdd(list, MkInitializerList(MkListOne(MkInitializerAssignment(MkExpConstant("0")))));
2980 ListAdd(list, MkInitializerAssignment(MkExpConstant("0")));
2985 if(inst->members && (*inst->members).first)
2987 struct MembersInit * members;
2988 struct MemberInit * member = (((void *)0));
2990 for(members = (*inst->members).first; members; members = members->next)
2992 if(members->type == 0)
2994 for(member = (*members->dataMembers).first; member; member = member->next)
2996 if(member->takeOutExp)
2998 member->initializer->exp = (((void *)0));
2999 FreeInitializer(member->initializer);
3000 member->initializer = (((void *)0));
3010 extern struct Statement * MkExpressionStmt(struct __ecereNameSpace__ecere__sys__OldList * expressions);
3012 extern void FreeList(struct __ecereNameSpace__ecere__sys__OldList * list, void (* )(void * ));
3014 static void ProcessDeclaration(struct Declaration * decl)
3026 if(decl->specifiers)
3028 struct Specifier * s;
3030 for(s = (*decl->specifiers).first; s; s = s->next)
3032 ProcessSpecifier(s);
3035 if(decl->declarators)
3037 struct InitDeclarator * d;
3039 for(d = (*decl->declarators).first; d; d = d->next)
3042 ProcessInitializer(d->initializer);
3047 curDecl = (((void *)0));
3054 struct Instantiation * inst = decl->inst;
3058 struct Symbol * classSym = inst->_class->symbol;
3062 struct Statement * stmt;
3064 if(!inst->isConstant || (classSym && classSym->registered && (classSym->registered->type == 0 || classSym->registered->type == 5)))
3067 decl->specifiers = MkListOne(MkSpecifierName(inst->_class->name));
3068 if(decl->declMode == 3)
3070 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert((&*decl->specifiers), (((void *)0)), MkSpecifier(STATIC));
3072 decl->declarators = MkListOne(MkInitDeclarator(MkDeclaratorIdentifier(MkIdentifier(inst->exp->identifier->string)), (((void *)0))));
3073 ProcessDeclaration(decl);
3074 CreateInstancesBody();
3076 struct Expression * exp = MkExpInstance(inst);
3078 stmt = MkExpressionStmt(MkListOne(exp));
3079 ListAdd(createInstancesBody->compound.statements, stmt);
3080 ProcessExpressionType(exp);
3082 if(classSym && classSym->registered && (classSym->registered->type == 0))
3084 ListAdd(createInstancesBody->compound.statements, MkExpressionStmt(MkListOne(MkExpCall(MkExpIdentifier(MkIdentifier("ecere::com::eInstance_IncRef")), MkListOne(CopyExpression(inst->exp))))));
3086 struct Expression * exp = MkExpOp((((void *)0)), DELETE, CopyExpression(inst->exp));
3088 ListAdd(destroyInstancesBody->compound.statements, MkExpressionStmt(MkListOne(exp)));
3089 ProcessExpressionType(exp);
3092 else if(classSym && classSym->registered && (classSym->registered->type == 5))
3094 struct Expression * exp = MkExpOp((((void *)0)), DELETE, CopyExpression(inst->exp));
3096 ListAdd(destroyInstancesBody->compound.statements, MkExpressionStmt(MkListOne(exp)));
3097 ProcessExpressionType(exp);
3103 CreateInstancesBody();
3107 char className[1024];
3110 decl->specifiers = MkList();
3111 decl->declarators = MkList();
3112 if(classSym && classSym->registered && classSym->registered->type == 2)
3114 struct __ecereNameSpace__ecere__sys__OldList list =
3119 ProcessInstMembers(inst, inst->exp, &list, 0x0);
3120 ProcessExpression(inst->exp);
3121 ListAdd(decl->specifiers, MkSpecifierName(inst->_class->name));
3122 ListAdd(decl->declarators, MkInitDeclarator(MkDeclaratorIdentifier(inst->exp->identifier), MkInitializerAssignment(list.first)));
3123 inst->exp->identifier = (((void *)0));
3125 else if(classSym && classSym->registered && classSym->registered->type == 3)
3127 struct __ecereNameSpace__ecere__sys__OldList list =
3132 ProcessInstMembers(inst, inst->exp, &list, 0x0);
3133 ProcessExpression(inst->exp);
3134 ListAdd(decl->specifiers, MkSpecifierName(inst->_class->name));
3135 ListAdd(decl->declarators, MkInitDeclarator(MkDeclaratorIdentifier(inst->exp->identifier), MkInitializerAssignment(list.first)));
3136 inst->exp->identifier = (((void *)0));
3138 else if(classSym && classSym->registered && classSym->registered->type == 1)
3140 struct Expression * exp;
3142 DeclareStruct(inst->_class->name, 0x0);
3143 ProcessExpression(inst->exp);
3147 ListAdd(decl->specifiers, MkSpecifierName(inst->_class->name));
3148 ListAdd(decl->declarators, MkInitDeclarator(MkDeclaratorIdentifier(inst->exp->identifier), (((void *)0))));
3149 inst->exp->identifier = (((void *)0));
3153 struct __ecereNameSpace__ecere__sys__OldList * list = MkList();
3155 if(ProcessBracketInst(inst, list))
3157 ListAdd(decl->specifiers, MkSpecifierName(inst->_class->name));
3158 ListAdd(decl->declarators, MkInitDeclarator(MkDeclaratorIdentifier(inst->exp->identifier), MkInitializerList(list)));
3159 inst->exp->identifier = (((void *)0));
3163 FreeList(list, FreeInitializer);
3164 exp = MkExpBrackets(MkList());
3165 ProcessInstMembers(inst, inst->exp, exp->list, 0x1);
3166 ListAdd(exp->list, CopyExpression(inst->exp));
3167 ListAdd(decl->specifiers, MkSpecifierName(inst->_class->name));
3168 ListAdd(decl->declarators, MkInitDeclarator(MkDeclaratorIdentifier(inst->exp->identifier), MkInitializerAssignment(exp)));
3169 inst->exp->identifier = (((void *)0));
3176 struct Expression * newCall;
3178 if(classSym && classSym->registered && classSym->registered->type == 5 && (classSym->registered->templateClass ? classSym->registered->templateClass->fixed : classSym->registered->fixed))
3182 sprintf(size, "%d", classSym->registered->templateClass ? classSym->registered->templateClass->structSize : classSym->registered->structSize);
3183 newCall = MkExpCall(QMkExpId("ecere::com::eSystem_New0"), MkListOne(MkExpConstant(size)));
3187 strcpy(className, "__ecereClass_");
3188 if(classSym && classSym->registered && classSym->registered->type == 5 && classSym->registered->templateClass)
3190 classSym = FindClass(classSym->registered->templateClass->fullName);
3191 FullClassNameCat(className, classSym->string, 0x1);
3194 FullClassNameCat(className, inst->_class->name, 0x1);
3195 MangleClassName(className);
3196 DeclareClass(classSym, className);
3197 newCall = MkExpCall(QMkExpId("ecere::com::eInstance_New"), MkListOne(QMkExpId(className)));
3198 ProcessExpressionType(newCall);
3199 newCall->byReference = 0x1;
3202 DeclareClass(classSym, className);
3205 struct Expression * exp, * newExp;
3206 struct Identifier * id = CopyIdentifier(inst->exp->identifier);
3208 if(inst->members && (*inst->members).first)
3210 newExp = MkExpOp(CopyExpression(inst->exp), '=', newCall);
3211 exp = MkExpBrackets(MkList());
3212 ListAdd(exp->list, newExp);
3213 ProcessInstMembers(inst, inst->exp, exp->list, 0x0);
3214 ListAdd(exp->list, inst->exp);
3215 ProcessExpression(inst->exp);
3216 inst->exp = (((void *)0));
3220 ListAdd(decl->specifiers, MkSpecifierName(inst->_class->name));
3221 ListAdd(decl->declarators, MkInitDeclarator(MkDeclaratorIdentifier(id), MkInitializerAssignment(exp)));
3224 FreeExpression(newCall);
3230 ProcessInstantiation(inst);
3235 if(decl->specifiers)
3237 struct Specifier * spec;
3239 for(spec = (*decl->specifiers).first; spec; spec = spec->next)
3240 ProcessSpecifier(spec);
3247 static void ProcessStatement(struct Statement * stmt)
3253 if(stmt->labeled.stmt)
3254 ProcessStatement(stmt->labeled.stmt);
3257 if(stmt->caseStmt.exp)
3258 ProcessExpression(stmt->caseStmt.exp);
3259 if(stmt->caseStmt.stmt)
3260 ProcessStatement(stmt->caseStmt.stmt);
3264 if(stmt->compound.context)
3266 struct Declaration * decl;
3267 struct Statement * s;
3268 struct Statement * prevCompound = curCompound;
3269 struct Context * prevContext = curContext;
3271 if(!stmt->compound.isSwitch)
3274 curContext = stmt->compound.context;
3276 if(stmt->compound.declarations)
3278 for(decl = (*stmt->compound.declarations).first; decl; decl = decl->next)
3279 ProcessDeclaration(decl);
3281 if(stmt->compound.statements)
3283 for(s = (*stmt->compound.statements).first; s; s = s->next)
3285 ProcessStatement(s);
3288 curCompound = prevCompound;
3289 curContext = prevContext;
3295 struct Expression * exp;
3297 if(stmt->expressions)
3299 for(exp = (*stmt->expressions).first; exp; exp = exp->next)
3301 ProcessExpression(exp);
3308 struct Expression * exp;
3310 ((struct Expression *)(*stmt->ifStmt.exp).last)->usage = (((struct Expression *)(*stmt->ifStmt.exp).last)->usage & ~0x1) | (((unsigned int)0x1) << 0);
3311 for(exp = (*stmt->ifStmt.exp).first; exp; exp = exp->next)
3313 ProcessExpression(exp);
3315 if(stmt->ifStmt.stmt)
3316 ProcessStatement(stmt->ifStmt.stmt);
3317 if(stmt->ifStmt.elseStmt)
3318 ProcessStatement(stmt->ifStmt.elseStmt);
3323 struct Expression * exp;
3325 ((struct Expression *)(*stmt->switchStmt.exp).last)->usage = (((struct Expression *)(*stmt->switchStmt.exp).last)->usage & ~0x1) | (((unsigned int)0x1) << 0);
3326 for(exp = (*stmt->switchStmt.exp).first; exp; exp = exp->next)
3327 ProcessExpression(exp);
3328 ProcessStatement(stmt->switchStmt.stmt);
3333 if(stmt->whileStmt.exp)
3335 struct Expression * exp;
3337 ((struct Expression *)(*stmt->whileStmt.exp).last)->usage = (((struct Expression *)(*stmt->whileStmt.exp).last)->usage & ~0x1) | (((unsigned int)0x1) << 0);
3338 for(exp = (*stmt->whileStmt.exp).first; exp; exp = exp->next)
3340 ProcessExpression(exp);
3343 if(stmt->whileStmt.stmt)
3344 ProcessStatement(stmt->whileStmt.stmt);
3349 if(stmt->doWhile.exp)
3351 struct Expression * exp;
3353 ((struct Expression *)(*stmt->doWhile.exp).last)->usage = (((struct Expression *)(*stmt->doWhile.exp).last)->usage & ~0x1) | (((unsigned int)0x1) << 0);
3354 for(exp = (*stmt->doWhile.exp).first; exp; exp = exp->next)
3356 ProcessExpression(exp);
3359 if(stmt->doWhile.stmt)
3360 ProcessStatement(stmt->doWhile.stmt);
3365 struct Expression * exp;
3367 if(stmt->forStmt.init)
3368 ProcessStatement(stmt->forStmt.init);
3369 if(stmt->forStmt.check && stmt->forStmt.check->expressions)
3371 ((struct Expression *)(*stmt->forStmt.check->expressions).last)->usage = (((struct Expression *)(*stmt->forStmt.check->expressions).last)->usage & ~0x1) | (((unsigned int)0x1) << 0);
3373 if(stmt->forStmt.check)
3374 ProcessStatement(stmt->forStmt.check);
3375 if(stmt->forStmt.increment)
3377 for(exp = (*stmt->forStmt.increment).first; exp; exp = exp->next)
3378 ProcessExpression(exp);
3380 if(stmt->forStmt.stmt)
3381 ProcessStatement(stmt->forStmt.stmt);
3392 struct Expression * exp;
3394 if(stmt->expressions && (*stmt->expressions).last)
3396 ((struct Expression *)(*stmt->expressions).last)->usage = (((struct Expression *)(*stmt->expressions).last)->usage & ~0x1) | (((unsigned int)0x1) << 0);
3397 for(exp = (*stmt->expressions).first; exp; exp = exp->next)
3399 ProcessExpression(exp);
3406 ProcessDeclaration(stmt->decl);
3411 struct AsmField * field;
3413 if(stmt->asmStmt.inputFields)
3415 for(field = (*stmt->asmStmt.inputFields).first; field; field = field->next)
3416 if(field->expression)
3417 ProcessExpression(field->expression);
3419 if(stmt->asmStmt.outputFields)
3421 for(field = (*stmt->asmStmt.outputFields).first; field; field = field->next)
3422 if(field->expression)
3423 ProcessExpression(field->expression);
3425 if(stmt->asmStmt.clobberedFields)
3427 for(field = (*stmt->asmStmt.clobberedFields).first; field; field = field->next)
3428 if(field->expression)
3429 ProcessExpression(field->expression);
3436 static void ProcessFunction(struct FunctionDefinition * function)
3440 yylloc = function->loc;
3441 ProcessStatement(function->body);
3445 extern struct Type * MkClassTypeSymbol(struct Symbol * symbol);
3447 extern void FreeSymbol(struct Symbol * symbol);
3449 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
3451 void __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
3453 void ProcessInstantiations()
3455 struct External * external;
3457 for(external = (*ast).first; external; external = external->next)
3459 curExternal = external;
3460 if(external->type == 1)
3462 if(external->declaration)
3463 ProcessDeclaration(external->declaration);
3465 else if(external->type == 0)
3467 ProcessFunction(external->function);
3469 else if(external->type == 2)
3471 struct ClassDefinition * _class = external->_class;
3473 if(_class->definitions)
3475 struct ClassDef * def;
3477 for(def = (*_class->definitions).first; def; def = def->next)
3481 curExternal = def->function->declarator ? def->function->declarator->symbol->pointerExternal : external;
3482 ProcessFunction((struct FunctionDefinition *)def->function);
3484 else if(def->type == 2 && def->decl->type == 2)
3486 ProcessInstantiation(def->decl->inst);
3488 else if(def->type == 1 && def->defProperties)
3490 struct MemberInit * defProperty;
3491 struct Symbol * thisSymbol = (thisSymbol = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), thisSymbol->string = __ecereNameSpace__ecere__sys__CopyString("this"), thisSymbol->type = MkClassTypeSymbol(_class->symbol), thisSymbol);
3493 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)thisSymbol);
3494 for(defProperty = (*def->defProperties).first; defProperty; defProperty = defProperty->next)
3496 ProcessMemberInitData(defProperty);
3498 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalContext->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)thisSymbol);
3499 FreeSymbol(thisSymbol);
3501 else if(def->type == 3 && def->propertyDef)
3503 struct PropertyDef * prop = def->propertyDef;
3504 struct Symbol * thisSymbol = (thisSymbol = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), thisSymbol->string = __ecereNameSpace__ecere__sys__CopyString("this"), thisSymbol->type = MkClassTypeSymbol(_class->symbol), thisSymbol);
3506 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)thisSymbol);
3509 curExternal = prop->symbol ? prop->symbol->externalSet : (((void *)0));
3510 ProcessStatement(prop->setStmt);
3514 curExternal = prop->symbol ? prop->symbol->externalGet : (((void *)0));
3515 ProcessStatement(prop->getStmt);
3519 curExternal = prop->symbol ? prop->symbol->externalIsSet : (((void *)0));
3520 ProcessStatement(prop->issetStmt);
3522 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalContext->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)thisSymbol);
3523 FreeSymbol(thisSymbol);
3525 else if(def->type == 4 && def->propertyWatch)
3527 struct PropertyWatch * propertyWatch = def->propertyWatch;
3528 struct Symbol * thisSymbol = (thisSymbol = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), thisSymbol->string = __ecereNameSpace__ecere__sys__CopyString("this"), thisSymbol->type = MkClassTypeSymbol(_class->symbol), thisSymbol);
3530 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)thisSymbol);
3531 if(propertyWatch->compound)
3533 struct Symbol * thisSymbol = (thisSymbol = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), thisSymbol->string = __ecereNameSpace__ecere__sys__CopyString("this"), thisSymbol->type = MkClassTypeSymbol(_class->symbol), thisSymbol);
3535 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&propertyWatch->compound->compound.context->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)thisSymbol);
3536 curExternal = (((void *)0));
3537 ProcessStatement(propertyWatch->compound);
3539 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalContext->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)thisSymbol);
3540 FreeSymbol(thisSymbol);
3548 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
3550 struct __ecereNameSpace__ecere__com__GlobalFunction;
3552 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);
3554 void __ecereRegisterModule_pass16(struct __ecereNameSpace__ecere__com__Instance * module)
3556 struct __ecereNameSpace__ecere__com__Class * class;
3558 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("DeclareClass", "void DeclareClass(Symbol classSym, char * className)", DeclareClass, module, 1);
3559 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ProcessExpressionInstPass", "void ProcessExpressionInstPass(Expression exp)", ProcessExpressionInstPass, module, 2);
3560 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ProcessInstantiations", "void ProcessInstantiations(void)", ProcessInstantiations, module, 1);
3563 void __ecereUnregisterModule_pass16(struct __ecereNameSpace__ecere__com__Instance * module)