1 /* Code generated from eC source file: pass3.ec */
3 #define __runtimePlatform 1
4 #elif defined(__APPLE__)
5 #define __runtimePlatform 3
7 #define __runtimePlatform 2
10 typedef long long int64;
11 typedef unsigned long long uint64;
15 #elif defined(__TINYC__)
17 #define __builtin_va_list va_list
18 #define __builtin_va_start va_start
19 #define __builtin_va_end va_end
21 #define strcasecmp stricmp
22 #define strncasecmp strnicmp
23 #define __declspec(x) __attribute__((x))
27 typedef long long int64;
28 typedef unsigned long long uint64;
30 typedef __int64 int64;
31 typedef unsigned __int64 uint64;
34 #define __ENDIAN_PAD(x) (8 - (x))
36 #define __ENDIAN_PAD(x) 0
39 # if defined(__GNUC__) || defined(__TINYC__)
40 # define ecere_stdcall __attribute__((__stdcall__))
41 # define ecere_gcc_struct __attribute__((gcc_struct))
43 # define ecere_stdcall __stdcall
44 # define ecere_gcc_struct
47 # define ecere_stdcall
48 # define ecere_gcc_struct
51 #include <sys/types.h>
54 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, BOOL = 367, _BOOL = 368, _COMPLEX = 369, _IMAGINARY = 370, RESTRICT = 371, THREAD = 372, WIDE_STRING_LITERAL = 373, BUILTIN_OFFSETOF = 374
57 extern int targetPlatform;
59 extern struct __ecereNameSpace__ecere__com__Property * __ecereProp_Type_isPointerType;
61 struct __ecereNameSpace__ecere__sys__OldList
70 struct __ecereNameSpace__ecere__sys__BTNode;
72 struct __ecereNameSpace__ecere__com__DataValue
87 } ecere_gcc_struct __anon1;
90 struct __ecereNameSpace__ecere__com__SerialBuffer
92 unsigned char * _buffer;
98 extern void * __ecereNameSpace__ecere__com__eSystem_New(unsigned int size);
100 extern void * __ecereNameSpace__ecere__com__eSystem_New0(unsigned int size);
102 extern void * __ecereNameSpace__ecere__com__eSystem_Renew(void * memory, unsigned int size);
104 extern void * __ecereNameSpace__ecere__com__eSystem_Renew0(void * memory, unsigned int size);
106 extern void __ecereNameSpace__ecere__com__eSystem_Delete(void * memory);
114 struct Instantiation;
120 struct ClassFunction;
122 struct ClassDefinition;
126 struct PropertyWatch;
128 struct TemplateArgument;
144 extern char * __ecereNameSpace__ecere__sys__CopyString(const char * string);
150 extern void FullClassNameCat(char * output, const char * className, unsigned int includeTemplateParams);
152 extern int strcmp(const char * , const char * );
154 extern char * strchr(const char * , int);
156 extern char * strcpy(char * , const char * );
158 extern size_t strlen(const char * );
160 struct __ecereNameSpace__ecere__com__LinkList
167 struct __ecereNameSpace__ecere__com__LinkElement
173 extern void Compiler_Error(const char * format, ...);
175 struct __ecereNameSpace__ecere__com__GlobalFunction;
177 struct __ecereNameSpace__ecere__com__IteratorPointer;
179 extern struct __ecereNameSpace__ecere__sys__OldList * MkList(void);
181 extern void FreeList(struct __ecereNameSpace__ecere__sys__OldList * list, void (* FreeFunction)(void * ));
183 extern struct __ecereNameSpace__ecere__sys__OldList * MkListOne(void * item);
185 extern struct __ecereNameSpace__ecere__sys__OldList * ast;
187 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void * item);
189 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert(struct __ecereNameSpace__ecere__sys__OldList * this, void * prevItem, void * item);
191 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(struct __ecereNameSpace__ecere__sys__OldList * this, void * item);
193 extern struct Context * curContext;
195 extern struct Context * globalContext;
199 struct CodePosition start;
200 struct CodePosition end;
203 extern struct Location yylloc;
212 struct Attrib * attr;
213 } ecere_gcc_struct __anon1;
216 extern struct ExtDecl * MkExtDeclString(char * s);
220 extern struct External * curExternal;
222 extern struct External * DeclareStruct(struct External * neededBy, const char * name, unsigned int skipNoHead, unsigned int needDereference);
224 extern void FreeExternal(struct External * external);
228 struct __ecereNameSpace__ecere__com__LinkElement in;
229 struct __ecereNameSpace__ecere__com__LinkElement out;
230 struct External * from;
231 struct External * to;
232 unsigned int breakable;
235 struct __ecereNameSpace__ecere__com__Class;
237 struct __ecereNameSpace__ecere__com__Instance
240 struct __ecereNameSpace__ecere__com__Class * _class;
244 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char * name);
246 extern void __ecereNameSpace__ecere__com__eClass_SetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char * name, long long value);
248 extern void * __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
250 extern void __ecereNameSpace__ecere__com__eInstance_SetMethod(struct __ecereNameSpace__ecere__com__Instance * instance, const char * name, void * function);
252 extern void __ecereNameSpace__ecere__com__eInstance_IncRef(struct __ecereNameSpace__ecere__com__Instance * instance);
254 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Remove;
256 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Add;
258 struct __ecereNameSpace__ecere__com__Property;
260 extern void __ecereNameSpace__ecere__com__eInstance_FireSelfWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
262 extern void __ecereNameSpace__ecere__com__eInstance_StopWatching(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property, struct __ecereNameSpace__ecere__com__Instance * object);
264 extern void __ecereNameSpace__ecere__com__eInstance_Watch(void * instance, struct __ecereNameSpace__ecere__com__Property * _property, void * object, void (* callback)(void * , void * ));
266 extern void __ecereNameSpace__ecere__com__eInstance_FireWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
270 extern struct Specifier * CopySpecifier(struct Specifier * spec);
272 extern void FreeSpecifier(struct Specifier * spec);
274 extern void FreeSpecifierContents(struct Specifier * spec);
276 extern struct Specifier * MkSpecifier(int specifier);
278 extern struct Specifier * MkSpecifierName(const char * name);
282 extern struct Declarator * SpecDeclFromString(const char * string, struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * baseDecl);
284 extern void FreeDeclarator(struct Declarator * decl);
286 struct TemplateDatatype
288 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
289 struct Declarator * decl;
292 extern struct Declarator * QMkPtrDecl(const char * id);
296 extern struct Symbol * FindClass(const char * name);
300 extern struct Identifier * MkIdentifier(const char * string);
302 extern struct Specifier * MkStructOrUnion(int type, struct Identifier * id, struct __ecereNameSpace__ecere__sys__OldList * definitions);
304 extern struct Declarator * MkDeclaratorIdentifier(struct Identifier * id);
308 struct Identifier * prev;
309 struct Identifier * next;
311 struct Symbol * classSym;
312 struct Specifier * _class;
314 struct Identifier * badID;
317 static void InstDeclPassIdentifier(struct Identifier * id)
319 if(strchr(id->string, ':'))
326 strcpy(newID, "__ecereNameSpace__");
328 for(c = 0; (ch = id->string[c]); c++)
335 (__ecereNameSpace__ecere__com__eSystem_Delete(id->string), id->string = 0);
336 id->string = __ecereNameSpace__ecere__sys__CopyString(newID);
342 struct __ecereNameSpace__ecere__com__Property
344 struct __ecereNameSpace__ecere__com__Property * prev;
345 struct __ecereNameSpace__ecere__com__Property * next;
347 unsigned int isProperty;
350 struct __ecereNameSpace__ecere__com__Class * _class;
351 const char * dataTypeString;
352 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
353 struct Type * dataType;
354 void (* Set)(void * , int);
355 int (* Get)(void * );
356 unsigned int (* IsSet)(void * );
360 unsigned int conversion;
361 unsigned int watcherOffset;
362 const char * category;
363 unsigned int compiled;
364 unsigned int selfWatchable;
365 unsigned int isWatchable;
368 extern struct Type * ProcessTypeString(const char * string, unsigned int staticMethod);
370 extern struct Type * ProcessType(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl);
372 extern void FreeType(struct Type * type);
376 extern struct Expression * MkExpBrackets(struct __ecereNameSpace__ecere__sys__OldList * expressions);
378 extern struct Expression * MoveExpContents(struct Expression * exp);
380 extern struct Expression * GetNonBracketsExp(struct Expression * exp);
382 extern void FreeExpContents(struct Expression * exp);
388 struct TypeName * prev;
389 struct TypeName * next;
391 struct __ecereNameSpace__ecere__sys__OldList * qualifiers;
392 struct Declarator * declarator;
394 struct Expression * bitCount;
397 extern struct TypeName * MkTypeName(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Declarator * declarator);
399 extern void FreeTypeName(struct TypeName * typeName);
401 extern struct Expression * MkExpCast(struct TypeName * typeName, struct Expression * expression);
407 struct Declarator * prev;
408 struct Declarator * next;
411 struct Symbol * symbol;
412 struct Declarator * declarator;
415 struct Identifier * identifier;
418 struct Expression * exp;
419 struct Expression * posExp;
420 struct Attrib * attrib;
421 } ecere_gcc_struct structDecl;
424 struct Expression * exp;
425 struct Specifier * enumClass;
426 } ecere_gcc_struct array;
429 struct __ecereNameSpace__ecere__sys__OldList * parameters;
430 } ecere_gcc_struct function;
433 struct Pointer * pointer;
434 } ecere_gcc_struct pointer;
437 struct ExtDecl * extended;
438 } ecere_gcc_struct extended;
439 } ecere_gcc_struct __anon1;
442 extern struct Pointer * MkPointer(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Pointer * pointer);
444 extern struct Declarator * MkDeclaratorPointer(struct Pointer * pointer, struct Declarator * declarator);
448 struct Pointer * prev;
449 struct Pointer * next;
451 struct __ecereNameSpace__ecere__sys__OldList * qualifiers;
452 struct Pointer * pointer;
455 struct __ecereNameSpace__ecere__sys__BinaryTree;
457 struct __ecereNameSpace__ecere__sys__BinaryTree
459 struct __ecereNameSpace__ecere__sys__BTNode * root;
461 int (* CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
462 void (* FreeKey)(void * key);
465 struct __ecereNameSpace__ecere__com__Module;
467 extern struct __ecereNameSpace__ecere__com__GlobalFunction * __ecereNameSpace__ecere__com__eSystem_RegisterFunction(const char * name, const char * type, void * func, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
469 struct __ecereNameSpace__ecere__com__DataMember;
471 struct __ecereNameSpace__ecere__com__DataMember
473 struct __ecereNameSpace__ecere__com__DataMember * prev;
474 struct __ecereNameSpace__ecere__com__DataMember * next;
476 unsigned int isProperty;
479 struct __ecereNameSpace__ecere__com__Class * _class;
480 const char * dataTypeString;
481 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
482 struct Type * dataType;
486 struct __ecereNameSpace__ecere__sys__OldList members;
487 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
489 short structAlignment;
490 short pointerAlignment;
493 struct InitDeclarator;
497 struct FunctionDefinition;
499 struct __ecereNameSpace__ecere__com__Method;
501 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
507 const char * dataTypeString;
508 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
509 } ecere_gcc_struct __anon1;
510 struct __ecereNameSpace__ecere__com__DataValue expression;
513 const char * memberString;
516 struct __ecereNameSpace__ecere__com__DataMember * member;
517 struct __ecereNameSpace__ecere__com__Property * prop;
518 struct __ecereNameSpace__ecere__com__Method * method;
519 } ecere_gcc_struct __anon1;
520 } ecere_gcc_struct __anon2;
521 } ecere_gcc_struct __anon1;
524 struct __ecereNameSpace__ecere__com__Method
527 struct __ecereNameSpace__ecere__com__Method * parent;
528 struct __ecereNameSpace__ecere__com__Method * left;
529 struct __ecereNameSpace__ecere__com__Method * right;
534 struct __ecereNameSpace__ecere__com__Class * _class;
536 const char * dataTypeString;
537 struct Type * dataType;
544 struct Symbol * parent;
545 struct Symbol * left;
546 struct Symbol * right;
551 struct __ecereNameSpace__ecere__com__Method * method;
552 struct __ecereNameSpace__ecere__com__Property * _property;
553 struct __ecereNameSpace__ecere__com__Class * registered;
554 } ecere_gcc_struct __anon1;
555 unsigned int notYetDeclared;
560 struct External * pointerExternal;
561 struct External * structExternal;
562 } ecere_gcc_struct __anon1;
565 struct External * externalGet;
566 struct External * externalSet;
567 struct External * externalPtr;
568 struct External * externalIsSet;
569 } ecere_gcc_struct __anon2;
572 struct External * methodExternal;
573 struct External * methodCodeExternal;
574 } ecere_gcc_struct __anon3;
575 } ecere_gcc_struct __anon2;
576 unsigned int imported;
577 unsigned int declaredStructSym;
578 struct __ecereNameSpace__ecere__com__Class * _class;
579 unsigned int declaredStruct;
580 unsigned int needConstructor;
581 unsigned int needDestructor;
582 char * constructorName;
585 char * destructorName;
586 struct ModuleImport * module;
587 struct ClassImport * _import;
588 struct Location nameLoc;
589 unsigned int isParam;
590 unsigned int isRemote;
591 unsigned int isStruct;
592 unsigned int fireWatchersDone;
594 unsigned int classData;
595 unsigned int isStatic;
597 struct __ecereNameSpace__ecere__sys__OldList * templateParams;
598 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
599 struct Context * ctx;
601 struct Expression * propCategory;
602 unsigned int mustRegister;
605 struct TemplateParameter;
609 struct Specifier * prev;
610 struct Specifier * next;
618 struct ExtDecl * extDecl;
620 struct Symbol * symbol;
621 struct __ecereNameSpace__ecere__sys__OldList * templateArgs;
622 struct Specifier * nsSpec;
623 } ecere_gcc_struct __anon1;
626 struct Identifier * id;
627 struct __ecereNameSpace__ecere__sys__OldList * list;
628 struct __ecereNameSpace__ecere__sys__OldList * baseSpecs;
629 struct __ecereNameSpace__ecere__sys__OldList * definitions;
630 unsigned int addNameSpace;
631 struct Context * ctx;
632 struct ExtDecl * extDeclStruct;
633 } ecere_gcc_struct __anon2;
634 struct Expression * expression;
635 struct Specifier * _class;
636 struct TemplateParameter * templateParameter;
637 } ecere_gcc_struct __anon1;
640 struct TemplateParameter
642 struct TemplateParameter * prev;
643 struct TemplateParameter * next;
646 struct Identifier * identifier;
649 struct TemplateDatatype * dataType;
651 } ecere_gcc_struct __anon1;
652 struct TemplateArgument * defaultArgument;
653 const char * dataTypeString;
654 struct Type * baseType;
664 struct Symbol * _class;
667 struct __ecereNameSpace__ecere__sys__OldList members;
669 } ecere_gcc_struct __anon1;
672 struct Type * returnType;
673 struct __ecereNameSpace__ecere__sys__OldList params;
674 struct Symbol * thisClass;
675 unsigned int staticMethod;
676 struct TemplateParameter * thisClassTemplate;
677 } ecere_gcc_struct __anon2;
680 struct __ecereNameSpace__ecere__com__Method * method;
681 struct __ecereNameSpace__ecere__com__Class * methodClass;
682 struct __ecereNameSpace__ecere__com__Class * usedClass;
683 } ecere_gcc_struct __anon3;
686 struct Type * arrayType;
688 struct Expression * arraySizeExp;
689 unsigned int freeExp;
690 struct Symbol * enumClass;
691 } ecere_gcc_struct __anon4;
693 struct TemplateParameter * templateParameter;
694 } ecere_gcc_struct __anon1;
699 struct __ecereNameSpace__ecere__com__Class * thisClassFrom;
707 unsigned int isSigned : 1;
708 unsigned int constant : 1;
709 unsigned int truth : 1;
710 unsigned int byReference : 1;
711 unsigned int extraParam : 1;
712 unsigned int directClassAccess : 1;
713 unsigned int computing : 1;
714 unsigned int keepCast : 1;
715 unsigned int passAsTemplate : 1;
716 unsigned int dllExport : 1;
717 unsigned int attrStdcall : 1;
718 unsigned int declaredWithStruct : 1;
719 unsigned int typedByReference : 1;
720 unsigned int casted : 1;
721 unsigned int pointerAlignment : 1;
722 unsigned int isLong : 1;
723 unsigned int signedBeforePromotion : 1;
726 unsigned int IsVoidPtrCast(struct TypeName * typeName)
728 unsigned int result = 0;
729 struct Declarator * d = typeName->declarator;
731 if(d && d->type == 5 && d->__anon1.pointer.pointer && !d->__anon1.pointer.pointer->pointer)
733 if(typeName->qualifiers)
735 struct Specifier * s;
737 for(s = (*typeName->qualifiers).first; s; s = s->next)
739 if(s->type == 0 && s->__anon1.specifier == VOID)
747 unsigned int __ecereProp_Type_Get_isPointerType(struct Type * this);
753 struct Enumerator * prev;
754 struct Enumerator * next;
756 struct Identifier * id;
757 struct Expression * exp;
764 struct Initializer * prev;
765 struct Initializer * next;
770 struct Expression * exp;
771 struct __ecereNameSpace__ecere__sys__OldList * list;
772 } ecere_gcc_struct __anon1;
773 unsigned int isConstant;
774 struct Identifier * id;
777 struct InitDeclarator
779 struct InitDeclarator * prev;
780 struct InitDeclarator * next;
782 struct Declarator * declarator;
783 struct Initializer * initializer;
790 struct ClassDef * prev;
791 struct ClassDef * next;
796 struct Declaration * decl;
797 struct ClassFunction * function;
798 struct __ecereNameSpace__ecere__sys__OldList * defProperties;
799 struct PropertyDef * propertyDef;
800 struct PropertyWatch * propertyWatch;
802 struct Identifier * defaultProperty;
805 struct Identifier * id;
806 struct Initializer * initializer;
807 } ecere_gcc_struct __anon1;
808 } ecere_gcc_struct __anon1;
815 struct Declaration * prev;
816 struct Declaration * next;
823 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
824 struct __ecereNameSpace__ecere__sys__OldList * declarators;
825 } ecere_gcc_struct __anon1;
826 struct Instantiation * inst;
829 struct Identifier * id;
830 struct Expression * exp;
831 } ecere_gcc_struct __anon2;
832 } ecere_gcc_struct __anon1;
833 struct Specifier * extStorage;
834 struct Symbol * symbol;
840 struct External * prev;
841 struct External * next;
844 struct Symbol * symbol;
847 struct FunctionDefinition * function;
848 struct ClassDefinition * _class;
849 struct Declaration * declaration;
851 struct Identifier * id;
852 struct DBTableDef * table;
853 } ecere_gcc_struct __anon1;
855 struct External * fwdDecl;
856 struct __ecereNameSpace__ecere__com__Instance * outgoing;
857 struct __ecereNameSpace__ecere__com__Instance * incoming;
858 int nonBreakableIncoming;
861 struct External * __ecereMethod_External_ForwardDeclare();
867 struct AsmField * prev;
868 struct AsmField * next;
871 struct Expression * expression;
872 struct Identifier * symbolic;
875 struct __ecereNameSpace__ecere__com__NameSpace;
877 struct __ecereNameSpace__ecere__com__NameSpace
880 struct __ecereNameSpace__ecere__com__NameSpace * btParent;
881 struct __ecereNameSpace__ecere__com__NameSpace * left;
882 struct __ecereNameSpace__ecere__com__NameSpace * right;
884 struct __ecereNameSpace__ecere__com__NameSpace * parent;
885 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
886 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
887 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
888 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
891 struct __ecereNameSpace__ecere__com__Class
893 struct __ecereNameSpace__ecere__com__Class * prev;
894 struct __ecereNameSpace__ecere__com__Class * next;
900 unsigned int (* Constructor)(void * );
901 void (* Destructor)(void * );
904 struct __ecereNameSpace__ecere__com__Class * base;
905 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
906 struct __ecereNameSpace__ecere__sys__BinaryTree members;
907 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
908 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
909 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
910 struct __ecereNameSpace__ecere__sys__OldList derivatives;
914 struct __ecereNameSpace__ecere__com__Instance * module;
915 struct __ecereNameSpace__ecere__com__NameSpace * nameSpace;
916 const char * dataTypeString;
917 struct Type * dataType;
919 int defaultAlignment;
920 void (* Initialize)();
922 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
923 const char * designerClass;
924 unsigned int noExpansion;
925 const char * defaultProperty;
926 unsigned int comRedefinition;
929 unsigned int internalDecl;
931 unsigned int computeSize;
932 short structAlignment;
933 short pointerAlignment;
934 int destructionWatchOffset;
936 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
937 int inheritanceAccess;
938 const char * fullName;
940 struct __ecereNameSpace__ecere__sys__OldList conversions;
941 struct __ecereNameSpace__ecere__sys__OldList templateParams;
942 struct __ecereNameSpace__ecere__com__ClassTemplateArgument * templateArgs;
943 struct __ecereNameSpace__ecere__com__Class * templateClass;
944 struct __ecereNameSpace__ecere__sys__OldList templatized;
946 unsigned int isInstanceClass;
947 unsigned int byValueSystemClass;
950 struct __ecereNameSpace__ecere__com__Application
955 unsigned int isGUIApp;
956 struct __ecereNameSpace__ecere__sys__OldList allModules;
957 char * parsedCommand;
958 struct __ecereNameSpace__ecere__com__NameSpace systemNameSpace;
961 extern void __ecereNameSpace__ecere__com__PrintLn(struct __ecereNameSpace__ecere__com__Class * class, const void * object, ...);
963 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
965 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
967 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
969 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
971 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__LinkList;
973 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_char__PTR_;
975 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TopoEdge;
977 struct __ecereNameSpace__ecere__com__Module
979 struct __ecereNameSpace__ecere__com__Instance * application;
980 struct __ecereNameSpace__ecere__sys__OldList classes;
981 struct __ecereNameSpace__ecere__sys__OldList defines;
982 struct __ecereNameSpace__ecere__sys__OldList functions;
983 struct __ecereNameSpace__ecere__sys__OldList modules;
984 struct __ecereNameSpace__ecere__com__Instance * prev;
985 struct __ecereNameSpace__ecere__com__Instance * next;
991 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
992 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
995 static void ReplaceByInstancePtr(struct Specifier * spec, struct Declarator ** declPtr, int type)
997 struct Declarator * decl = *declPtr;
999 if(decl && decl->type == 5)
1004 decl->__anon1.pointer.pointer = MkPointer((((void *)0)), decl->__anon1.pointer.pointer);
1008 struct Declarator * newDecl = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declarator);
1013 decl->declarator = newDecl;
1018 decl->__anon1.pointer.pointer = MkPointer((((void *)0)), (((void *)0)));
1023 static int ReplaceClassSpec(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Specifier * spec, unsigned int param)
1027 struct TemplateParameter * parameter = spec->__anon1.templateParameter;
1029 if(!param && parameter->dataTypeString)
1031 struct __ecereNameSpace__ecere__sys__OldList * newSpecs = MkList();
1032 struct Declarator * decl = SpecDeclFromString(parameter->dataTypeString, newSpecs, (((void *)0)));
1034 if((*newSpecs).first)
1036 struct Specifier * newSpec = CopySpecifier((*newSpecs).first);
1039 ((newSpec ? __extension__ ({
1040 void * __ecerePtrToDelete = (newSpec);
1042 __ecereClass_Specifier->Destructor ? __ecereClass_Specifier->Destructor((void *)__ecerePtrToDelete) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(__ecerePtrToDelete);
1043 }) : 0), newSpec = 0);
1045 FreeList(newSpecs, (void *)(FreeSpecifier));
1048 unsigned int isPointer = decl->type == 5;
1051 FreeDeclarator(decl);
1056 else if(!param && parameter->__anon1.dataType)
1058 struct __ecereNameSpace__ecere__sys__OldList * newSpecs = parameter->__anon1.dataType->specifiers;
1059 struct Declarator * decl = parameter->__anon1.dataType->decl;
1061 if((*newSpecs).first)
1063 struct Specifier * newSpec = CopySpecifier((*newSpecs).first);
1066 ((newSpec ? __extension__ ({
1067 void * __ecerePtrToDelete = (newSpec);
1069 __ecereClass_Specifier->Destructor ? __ecereClass_Specifier->Destructor((void *)__ecerePtrToDelete) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(__ecerePtrToDelete);
1070 }) : 0), newSpec = 0);
1074 unsigned int isPointer = decl->type == 5;
1083 spec->__anon1.__anon1.name = __ecereNameSpace__ecere__sys__CopyString("uint64");
1084 spec->__anon1.__anon1.symbol = FindClass("uint64");
1087 if(spec->type == 1 || spec->type == 7)
1089 struct Symbol * classSym = spec->__anon1.__anon1.symbol;
1093 classSym = FindClass("ecere::com::Class");
1097 struct __ecereNameSpace__ecere__com__Class * _class = classSym->__anon1.registered;
1099 FreeSpecifierContents(spec);
1101 if(_class && _class->type == 1)
1106 FullClassNameCat(name, _class->fullName, 0);
1107 FreeSpecifierContents(spec);
1109 spec->__anon1.__anon2.baseSpecs = (((void *)0));
1110 spec->__anon1.__anon2.id = MkIdentifier(name);
1111 spec->__anon1.__anon2.list = (((void *)0));
1112 spec->__anon1.__anon2.definitions = (((void *)0));
1113 spec->__anon1.__anon2.ctx = (((void *)0));
1114 spec->__anon1.__anon2.addNameSpace = 0;
1116 else if(_class && _class->type == 5)
1118 char name[1024] = "";
1120 FullClassNameCat(name, _class->fullName, 0);
1122 spec->__anon1.__anon2.baseSpecs = (((void *)0));
1123 spec->__anon1.__anon2.id = MkIdentifier(name);
1124 spec->__anon1.__anon2.list = (((void *)0));
1125 spec->__anon1.__anon2.definitions = (((void *)0));
1126 spec->__anon1.__anon2.ctx = (((void *)0));
1127 spec->__anon1.__anon2.addNameSpace = 0;
1131 if((_class->type != 1000 || !strcmp(_class->fullName, "enum") || (_class->dataTypeString && !strcmp(_class->dataTypeString, "char *")) || !strcmp(_class->fullName, "uint64") || !strcmp(_class->fullName, "uint32") || !strcmp(_class->fullName, "uint16") || !strcmp(_class->fullName, "uintptr") || !strcmp(_class->fullName, "intptr") || !strcmp(_class->fullName, "uintsize") || !strcmp(_class->fullName, "intsize") || !strcmp(_class->fullName, "uint") || !strcmp(_class->fullName, "byte")))
1133 if(_class->dataTypeString)
1135 if(!strcmp(_class->dataTypeString, "uint64") || !strcmp(_class->dataTypeString, "uint32") || !strcmp(_class->dataTypeString, "uint16") || !strcmp(_class->dataTypeString, "uintptr") || !strcmp(_class->dataTypeString, "intptr") || !strcmp(_class->dataTypeString, "uintsize") || !strcmp(_class->dataTypeString, "intsize") || !strcmp(_class->dataTypeString, "uint") || !strcmp(_class->dataTypeString, "byte"))
1137 if(!_class->dataType)
1138 _class->dataType = ProcessTypeString(_class->dataTypeString, 0);
1139 if(_class->dataType && _class->dataType->kind == 8)
1140 classSym = _class->dataType->__anon1._class;
1142 classSym = FindClass(_class->dataTypeString);
1143 _class = classSym ? classSym->__anon1.registered : (((void *)0));
1145 spec->__anon1.__anon1.name = __ecereNameSpace__ecere__sys__CopyString(!strcmp(_class->dataTypeString, "char *") ? "char" : _class->dataTypeString);
1146 spec->__anon1.__anon1.symbol = (((void *)0));
1150 spec->__anon1.__anon1.name = __ecereNameSpace__ecere__sys__CopyString((((void *)0)));
1151 spec->__anon1.__anon1.symbol = (((void *)0));
1154 else if(!_class->base)
1157 spec->__anon1.specifier = VOID;
1164 spec->__anon1.__anon2.id = MkIdentifier("__ecereNameSpace__ecere__com__Instance");
1165 spec->__anon1.__anon2.list = (((void *)0));
1166 spec->__anon1.__anon2.baseSpecs = (((void *)0));
1167 spec->__anon1.__anon2.definitions = (((void *)0));
1168 spec->__anon1.__anon2.ctx = (((void *)0));
1169 spec->__anon1.__anon2.addNameSpace = 0;
1171 if(_class && _class->dataTypeString && !strcmp(_class->dataTypeString, "char *"))
1173 if(!_class || _class->type == 0 || _class->type == 5)
1175 else if(param && _class->type == 1)
1179 else if(spec->type == 0)
1181 if(spec->__anon1.specifier == ANY_OBJECT || spec->__anon1.specifier == CLASS)
1183 spec->__anon1.specifier = CONST;
1184 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(specs, MkSpecifier(VOID));
1191 void TopoSort(struct __ecereNameSpace__ecere__sys__OldList * input)
1193 struct __ecereNameSpace__ecere__sys__OldList L =
1197 struct __ecereNameSpace__ecere__sys__OldList S =
1201 struct __ecereNameSpace__ecere__sys__OldList B =
1205 struct External * n, * next;
1207 for(n = (*input).first; n; n = next)
1210 if(n->type == 1 && !n->__anon1.declaration)
1212 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*input), n);
1213 if(n->symbol && n->symbol->__anon2.__anon1.structExternal == n)
1214 n->symbol->__anon2.__anon1.structExternal = (((void *)0));
1217 else if(!((struct __ecereNameSpace__ecere__com__LinkList *)(((char *)n->incoming + 0 + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->count)
1219 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*input), n);
1220 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&S, n);
1222 else if(!n->nonBreakableIncoming)
1224 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*input), n);
1225 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&B, n);
1230 struct TopoEdge * e, * ne;
1234 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(&S, (struct __ecereNameSpace__ecere__com__IteratorPointer *)n);
1235 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&L, n);
1236 for(e = ((struct __ecereNameSpace__ecere__com__LinkList *)(((char *)n->outgoing + 0 + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->first; e; e = ne)
1238 struct External * m = e->to;
1239 struct __ecereNameSpace__ecere__sys__OldList * list;
1241 if(m->nonBreakableIncoming)
1250 __ecereNameSpace__ecere__com__PrintLn(__ecereClass_char__PTR_, "!!! Something's wrong !!!", (void *)0);
1254 m->nonBreakableIncoming--;
1256 ((void (*)(struct __ecereNameSpace__ecere__com__Instance *, struct __ecereNameSpace__ecere__com__IteratorPointer * it))__extension__ ({
1257 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = n->outgoing;
1259 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__LinkList->_vTbl;
1260 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Remove])(n->outgoing, (struct __ecereNameSpace__ecere__com__IteratorPointer *)e);
1261 ((void (*)(struct __ecereNameSpace__ecere__com__Instance *, struct __ecereNameSpace__ecere__com__IteratorPointer * it))__extension__ ({
1262 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = m->incoming;
1264 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__LinkList->_vTbl;
1265 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Remove])(m->incoming, (struct __ecereNameSpace__ecere__com__IteratorPointer *)e);
1266 ((e ? __extension__ ({
1267 void * __ecerePtrToDelete = (e);
1269 __ecereClass_TopoEdge->Destructor ? __ecereClass_TopoEdge->Destructor((void *)__ecerePtrToDelete) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(__ecerePtrToDelete);
1271 if(!((struct __ecereNameSpace__ecere__com__LinkList *)(((char *)m->incoming + 0 + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->count)
1273 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*list), m);
1274 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&S, m);
1276 else if(!m->nonBreakableIncoming)
1278 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*list), m);
1279 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&B, m);
1283 else if((n = B.first))
1285 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(&B, (struct __ecereNameSpace__ecere__com__IteratorPointer *)n);
1286 for(e = ((struct __ecereNameSpace__ecere__com__LinkList *)(((char *)n->incoming + 0 + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->first; e; e = ne)
1288 struct TopoEdge * e2, * n2;
1289 struct External * m = e->from;
1290 struct External * f;
1292 f = __ecereMethod_External_ForwardDeclare(m);
1295 struct External * c, * next;
1297 for(c = (*input).first; c; c = next)
1300 if(!((struct __ecereNameSpace__ecere__com__LinkList *)(((char *)c->incoming + 0 + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->count)
1302 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*input), c);
1303 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&S, c);
1305 else if(!c->nonBreakableIncoming)
1307 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*input), c);
1308 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&B, c);
1312 for(e2 = ((struct __ecereNameSpace__ecere__com__LinkList *)(((char *)m->outgoing + 0 + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->first; e2; e2 = n2)
1317 struct External * to = e2->to;
1325 ((void (*)(struct __ecereNameSpace__ecere__com__Instance *, struct __ecereNameSpace__ecere__com__IteratorPointer * it))__extension__ ({
1326 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = m->outgoing;
1328 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__LinkList->_vTbl;
1329 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Remove])(m->outgoing, (struct __ecereNameSpace__ecere__com__IteratorPointer *)e2);
1330 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))__extension__ ({
1331 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f->outgoing;
1333 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__LinkList->_vTbl;
1334 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(f->outgoing, (uint64)(uintptr_t)(e2));
1335 to->nonBreakableIncoming++;
1336 if(e2 != e && to->nonBreakableIncoming == 1)
1338 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(&B, to);
1339 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*input), to);
1343 if(!((struct __ecereNameSpace__ecere__com__LinkList *)(((char *)f->incoming + 0 + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->count)
1344 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&S, f);
1345 else if(!f->nonBreakableIncoming)
1346 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&B, f);
1348 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*input), f);
1352 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*input), n);
1358 Compiler_Error("declarations cycles found\n");
1365 for(n = (*input).first; n; n = next)
1368 if(n->type == 1 && (!n->__anon1.declaration || ((!n->__anon1.declaration->__anon1.__anon1.specifiers || !(*n->__anon1.declaration->__anon1.__anon1.specifiers).count) && (!n->__anon1.declaration->__anon1.__anon1.declarators || !(*n->__anon1.declaration->__anon1.__anon1.declarators).count))))
1370 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*input), n);
1371 if(n->symbol && n->symbol->__anon2.__anon1.structExternal == n)
1372 n->symbol->__anon2.__anon1.structExternal = (((void *)0));
1378 void __ecereUnregisterModule_pass3(struct __ecereNameSpace__ecere__com__Instance * module)
1385 typedef union YYSTYPE
1390 struct Identifier * id;
1391 struct Expression * exp;
1392 struct Specifier * specifier;
1393 struct __ecereNameSpace__ecere__sys__OldList * list;
1394 struct Enumerator * enumerator;
1395 struct Declarator * declarator;
1396 struct Pointer * pointer;
1397 struct Initializer * initializer;
1398 struct InitDeclarator * initDeclarator;
1399 struct TypeName * typeName;
1400 struct Declaration * declaration;
1401 struct Statement * stmt;
1402 struct FunctionDefinition * function;
1403 struct External * external;
1404 struct Context * context;
1405 struct AsmField * asmField;
1406 struct Attrib * attrib;
1407 struct ExtDecl * extDecl;
1408 struct Attribute * attribute;
1409 struct Instantiation * instance;
1410 struct MembersInit * membersInit;
1411 struct MemberInit * memberInit;
1412 struct ClassFunction * classFunction;
1413 struct ClassDefinition * _class;
1414 struct ClassDef * classDef;
1415 struct PropertyDef * prop;
1417 struct Symbol * symbol;
1418 struct PropertyWatch * propertyWatch;
1419 struct TemplateParameter * templateParameter;
1420 struct TemplateArgument * templateArgument;
1421 struct TemplateDatatype * templateDatatype;
1422 struct DBTableEntry * dbtableEntry;
1423 struct DBIndexItem * dbindexItem;
1424 struct DBTableDef * dbtableDef;
1425 } ecere_gcc_struct YYSTYPE;
1427 extern YYSTYPE yylval;
1431 struct Expression * prev;
1432 struct Expression * next;
1433 struct Location loc;
1440 struct Identifier * identifier;
1441 } ecere_gcc_struct __anon1;
1442 struct Statement * compound;
1443 struct Instantiation * instance;
1447 unsigned int intlString;
1448 unsigned int wideString;
1449 } ecere_gcc_struct __anon2;
1450 struct __ecereNameSpace__ecere__sys__OldList * list;
1453 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
1454 struct Declarator * decl;
1455 } ecere_gcc_struct _classExp;
1458 struct Identifier * id;
1459 } ecere_gcc_struct classData;
1462 struct Expression * exp;
1463 struct __ecereNameSpace__ecere__sys__OldList * arguments;
1464 struct Location argLoc;
1465 } ecere_gcc_struct call;
1468 struct Expression * exp;
1469 struct __ecereNameSpace__ecere__sys__OldList * index;
1470 } ecere_gcc_struct index;
1473 struct Expression * exp;
1474 struct Identifier * member;
1476 unsigned int thisPtr;
1477 } ecere_gcc_struct member;
1481 struct Expression * exp1;
1482 struct Expression * exp2;
1483 } ecere_gcc_struct op;
1484 struct TypeName * typeName;
1485 struct Specifier * _class;
1488 struct TypeName * typeName;
1489 struct Expression * exp;
1490 } ecere_gcc_struct cast;
1493 struct Expression * cond;
1494 struct __ecereNameSpace__ecere__sys__OldList * exp;
1495 struct Expression * elseExp;
1496 } ecere_gcc_struct cond;
1499 struct TypeName * typeName;
1500 struct Expression * size;
1501 } ecere_gcc_struct _new;
1504 struct TypeName * typeName;
1505 struct Expression * size;
1506 struct Expression * exp;
1507 } ecere_gcc_struct _renew;
1511 struct Identifier * id;
1512 } ecere_gcc_struct db;
1515 struct Expression * ds;
1516 struct Expression * name;
1517 } ecere_gcc_struct dbopen;
1520 struct TypeName * typeName;
1521 struct Initializer * initializer;
1522 } ecere_gcc_struct initializer;
1525 struct Expression * exp;
1526 struct TypeName * typeName;
1527 } ecere_gcc_struct vaArg;
1530 struct TypeName * typeName;
1531 struct Identifier * id;
1532 } ecere_gcc_struct offset;
1533 } ecere_gcc_struct __anon1;
1534 unsigned int debugValue;
1535 struct __ecereNameSpace__ecere__com__DataValue val;
1537 unsigned int hasAddress;
1538 struct Type * expType;
1539 struct Type * destType;
1542 unsigned int byReference;
1543 unsigned int isConstant;
1544 unsigned int addedThis;
1545 unsigned int needCast;
1546 unsigned int thisPtr;
1547 unsigned int opDestType;
1548 unsigned int usedInComparison;
1549 unsigned int ambiguousUnits;
1550 unsigned int parentOpDestType;
1551 unsigned int needTemplateCast;
1556 struct Statement * prev;
1557 struct Statement * next;
1558 struct Location loc;
1562 struct __ecereNameSpace__ecere__sys__OldList * expressions;
1565 struct Identifier * id;
1566 struct Statement * stmt;
1567 } ecere_gcc_struct labeled;
1570 struct Expression * exp;
1571 struct Statement * stmt;
1572 } ecere_gcc_struct caseStmt;
1575 struct __ecereNameSpace__ecere__sys__OldList * declarations;
1576 struct __ecereNameSpace__ecere__sys__OldList * statements;
1577 struct Context * context;
1578 unsigned int isSwitch;
1579 } ecere_gcc_struct compound;
1582 struct __ecereNameSpace__ecere__sys__OldList * exp;
1583 struct Statement * stmt;
1584 struct Statement * elseStmt;
1585 } ecere_gcc_struct ifStmt;
1588 struct __ecereNameSpace__ecere__sys__OldList * exp;
1589 struct Statement * stmt;
1590 } ecere_gcc_struct switchStmt;
1593 struct __ecereNameSpace__ecere__sys__OldList * exp;
1594 struct Statement * stmt;
1595 } ecere_gcc_struct whileStmt;
1598 struct __ecereNameSpace__ecere__sys__OldList * exp;
1599 struct Statement * stmt;
1600 } ecere_gcc_struct doWhile;
1603 struct Statement * init;
1604 struct Statement * check;
1605 struct __ecereNameSpace__ecere__sys__OldList * increment;
1606 struct Statement * stmt;
1607 } ecere_gcc_struct forStmt;
1610 struct Identifier * id;
1611 } ecere_gcc_struct gotoStmt;
1614 struct Specifier * spec;
1616 struct __ecereNameSpace__ecere__sys__OldList * inputFields;
1617 struct __ecereNameSpace__ecere__sys__OldList * outputFields;
1618 struct __ecereNameSpace__ecere__sys__OldList * clobberedFields;
1619 } ecere_gcc_struct asmStmt;
1622 struct Expression * watcher;
1623 struct Expression * object;
1624 struct __ecereNameSpace__ecere__sys__OldList * watches;
1625 } ecere_gcc_struct _watch;
1628 struct Identifier * id;
1629 struct __ecereNameSpace__ecere__sys__OldList * exp;
1630 struct __ecereNameSpace__ecere__sys__OldList * filter;
1631 struct Statement * stmt;
1632 } ecere_gcc_struct forEachStmt;
1633 struct Declaration * decl;
1634 } ecere_gcc_struct __anon1;
1637 struct FunctionDefinition
1639 struct FunctionDefinition * prev;
1640 struct FunctionDefinition * next;
1641 struct Location loc;
1642 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
1643 struct Declarator * declarator;
1644 struct __ecereNameSpace__ecere__sys__OldList * declarations;
1645 struct Statement * body;
1646 struct __ecereNameSpace__ecere__com__Class * _class;
1647 struct __ecereNameSpace__ecere__sys__OldList attached;
1650 struct Symbol * propSet;
1652 unsigned int propertyNoThis;
1655 static void AddPointerCast(struct Expression * e)
1657 struct Type * src = e->expType;
1659 if(src && (src->kind == 20 || src->kind == 8))
1661 if(e->type != 11 || !IsVoidPtrCast(e->__anon1.cast.typeName))
1665 if(src->kind == 20 && src->__anon1.templateParameter && src->__anon1.templateParameter->type == 0)
1667 struct Type * newType = (((void *)0));
1669 if(src->__anon1.templateParameter->dataTypeString)
1670 newType = ProcessTypeString(src->__anon1.templateParameter->dataTypeString, 0);
1671 else if(src->__anon1.templateParameter->__anon1.dataType)
1672 newType = ProcessType(src->__anon1.templateParameter->__anon1.dataType->specifiers, src->__anon1.templateParameter->__anon1.dataType->decl);
1679 if(src && src->kind == 8 && src->__anon1._class)
1681 struct __ecereNameSpace__ecere__com__Class * sc = src->__anon1._class->__anon1.registered;
1683 if(src->thisClassFrom && src->thisClassFrom->base)
1684 sc = src->thisClassFrom;
1685 if(sc && (sc->type == 1 || sc->type == 5))
1687 struct Type * dest = e->destType;
1689 if(dest && (dest->kind == 20 || dest->kind == 8))
1693 if(dest->kind == 20 && dest->__anon1.templateParameter && dest->__anon1.templateParameter->type == 0)
1695 struct Type * newType = (((void *)0));
1697 if(dest->__anon1.templateParameter->dataTypeString)
1698 newType = ProcessTypeString(dest->__anon1.templateParameter->dataTypeString, 0);
1699 else if(dest->__anon1.templateParameter->__anon1.dataType)
1700 newType = ProcessType(dest->__anon1.templateParameter->__anon1.dataType->specifiers, dest->__anon1.templateParameter->__anon1.dataType->decl);
1707 if(!dest->passAsTemplate && dest->kind == 8 && dest->__anon1._class && dest->__anon1._class->__anon1.registered)
1709 struct __ecereNameSpace__ecere__com__Class * dc = dest->__anon1._class->__anon1.registered;
1711 if(sc->templateClass)
1712 sc = sc->templateClass;
1713 if(dc->templateClass)
1714 dc = dc->templateClass;
1715 if(dc->base && sc != dc)
1717 e->__anon1.cast.exp = MkExpBrackets(MkListOne(MoveExpContents(e)));
1719 e->__anon1.typeName = MkTypeName(MkListOne(MkSpecifier(VOID)), QMkPtrDecl((((void *)0))));
1729 else if(src && src->kind == 22 && e->destType && e->destType->classObjectType)
1731 struct Expression * nbExp = GetNonBracketsExp(e);
1733 if(nbExp->type != 11 || !IsVoidPtrCast(nbExp->__anon1.cast.typeName))
1735 e->__anon1.cast.exp = MkExpBrackets(MkListOne(MoveExpContents(e)));
1737 e->__anon1.typeName = MkTypeName(MkListOne(MkSpecifier(VOID)), QMkPtrDecl((((void *)0))));
1742 static void InstDeclPassDeclaration(struct Declaration * decl);
1744 static void InstDeclPassSpecifier(struct Specifier * spec, unsigned int byRefTypedObject)
1749 if(spec->__anon1.specifier == TYPED_OBJECT)
1752 spec->__anon1.__anon1.extDecl = MkExtDeclString(__ecereNameSpace__ecere__sys__CopyString(byRefTypedObject ? "struct __ecereNameSpace__ecere__com__Class * class, void *" : "struct __ecereNameSpace__ecere__com__Class * class, const void *"));
1753 DeclareStruct(curExternal, "ecere::com::Class", 0, 1);
1760 struct Enumerator * e;
1762 if(spec->__anon1.__anon2.list)
1764 for(e = (*spec->__anon1.__anon2.list).first; e; e = e->next)
1773 if(spec->__anon1.__anon2.definitions)
1775 struct ClassDef * def;
1777 for(def = (*spec->__anon1.__anon2.definitions).first; def; def = def->next)
1778 if(def->__anon1.decl)
1779 InstDeclPassDeclaration(def->__anon1.decl);
1781 if(spec->__anon1.__anon2.id)
1782 InstDeclPassIdentifier(spec->__anon1.__anon2.id);
1786 if(spec->__anon1.__anon1.extDecl && spec->__anon1.__anon1.extDecl->type == 0 && spec->__anon1.__anon1.extDecl->__anon1.s)
1788 if(!strcmp(spec->__anon1.__anon1.extDecl->__anon1.s, "dllexport"))
1790 struct Specifier * prevSpec;
1792 (__ecereNameSpace__ecere__com__eSystem_Delete(spec->__anon1.__anon1.extDecl->__anon1.s), spec->__anon1.__anon1.extDecl->__anon1.s = 0);
1793 for(prevSpec = spec->prev; prevSpec; prevSpec = prevSpec->prev)
1794 if(prevSpec->type == 0 && prevSpec->__anon1.specifier == EXTERN)
1798 if(targetPlatform == 1)
1799 spec->__anon1.__anon1.extDecl->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("__declspec(dllexport)");
1801 spec->__anon1.__anon1.extDecl->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("__attribute__ ((visibility(\"default\")))");
1805 if(targetPlatform == 1)
1806 spec->__anon1.__anon1.extDecl->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("extern __declspec(dllexport)");
1808 spec->__anon1.__anon1.extDecl->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("extern __attribute__ ((visibility(\"default\")))");
1811 else if(!strcmp(spec->__anon1.__anon1.extDecl->__anon1.s, "stdcall") || !strcmp(spec->__anon1.__anon1.extDecl->__anon1.s, "_stdcall") || !strcmp(spec->__anon1.__anon1.extDecl->__anon1.s, "__stdcall") || !strcmp(spec->__anon1.__anon1.extDecl->__anon1.s, "__stdcall__"))
1813 (__ecereNameSpace__ecere__com__eSystem_Delete(spec->__anon1.__anon1.extDecl->__anon1.s), spec->__anon1.__anon1.extDecl->__anon1.s = 0);
1814 spec->__anon1.__anon1.extDecl->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("ecere_stdcall");
1821 void InstDeclPassTypeName(struct TypeName * type, unsigned int param);
1823 static void InstDeclPassDeclarator(struct Declarator * decl)
1828 if(decl->declarator)
1829 InstDeclPassDeclarator(decl->declarator);
1833 if(decl->__anon1.identifier)
1834 InstDeclPassIdentifier(decl->__anon1.identifier);
1838 if(decl->declarator)
1839 InstDeclPassDeclarator(decl->declarator);
1842 if(decl->declarator)
1843 InstDeclPassDeclarator(decl->declarator);
1847 if(decl->declarator)
1848 InstDeclPassDeclarator(decl->declarator);
1849 if(decl->__anon1.function.parameters)
1851 struct TypeName * type;
1853 if(decl->declarator)
1854 InstDeclPassDeclarator(decl->declarator);
1855 for(type = (*decl->__anon1.function.parameters).first; type; type = type->next)
1857 unsigned int typedObject = 0;
1858 struct Specifier * spec = (((void *)0));
1860 if(type->qualifiers)
1862 spec = (struct Specifier *)(*type->qualifiers).first;
1863 if(spec && spec->type == 1 && !strcmp(spec->__anon1.__anon1.name, "class"))
1866 InstDeclPassTypeName(type, 1);
1869 struct TypeName * _class = (_class = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TypeName), _class->qualifiers = MkListOne(MkStructOrUnion(3, MkIdentifier("__ecereNameSpace__ecere__com__Class"), (((void *)0)))), _class->declarator = MkDeclaratorPointer(MkPointer((((void *)0)), (((void *)0))), MkDeclaratorIdentifier(MkIdentifier("class"))), _class);
1871 DeclareStruct(curExternal, "ecere::com::Class", 0, 1);
1872 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert((&*decl->__anon1.function.parameters), spec->prev, _class);
1881 if((decl->type == 6 || decl->type == 7) && decl->__anon1.extended.extended)
1883 if(decl->__anon1.extended.extended->type == 0 && decl->__anon1.extended.extended->__anon1.s && !strcmp(decl->__anon1.extended.extended->__anon1.s, "dllexport"))
1885 (__ecereNameSpace__ecere__com__eSystem_Delete(decl->__anon1.extended.extended->__anon1.s), decl->__anon1.extended.extended->__anon1.s = 0);
1886 if(targetPlatform == 1)
1887 decl->__anon1.extended.extended->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("extern __declspec(dllexport)");
1889 decl->__anon1.extended.extended->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("extern __attribute__ ((visibility(\"default\")))");
1891 else if(decl->__anon1.extended.extended->type == 0 && decl->__anon1.extended.extended->__anon1.s && (!strcmp(decl->__anon1.extended.extended->__anon1.s, "stdcall") || !strcmp(decl->__anon1.extended.extended->__anon1.s, "_stdcall") || !strcmp(decl->__anon1.extended.extended->__anon1.s, "__stdcall") || !strcmp(decl->__anon1.extended.extended->__anon1.s, "__stdcall__")))
1893 (__ecereNameSpace__ecere__com__eSystem_Delete(decl->__anon1.extended.extended->__anon1.s), decl->__anon1.extended.extended->__anon1.s = 0);
1894 decl->__anon1.extended.extended->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("ecere_stdcall");
1897 if(decl->declarator)
1898 InstDeclPassDeclarator(decl->declarator);
1903 void InstDeclPassTypeName(struct TypeName * type, unsigned int param)
1905 if(type->qualifiers)
1907 struct Specifier * spec;
1909 for(spec = (*type->qualifiers).first; spec; spec = spec->next)
1913 if((result = ReplaceClassSpec(type->qualifiers, spec, param)))
1914 ReplaceByInstancePtr(spec, &type->declarator, result);
1917 struct Symbol * classSym = (spec->type == 1) ? spec->__anon1.__anon1.symbol : (((void *)0));
1919 if(type->classObjectType && (!classSym || (classSym && classSym->__anon1.registered && (classSym->__anon1.registered->type == 4 || classSym->__anon1.registered->type == 2 || classSym->__anon1.registered->type == 3))))
1920 ReplaceByInstancePtr(spec, &type->declarator, 2);
1922 InstDeclPassSpecifier(spec, type->declarator && type->declarator->type == 5);
1925 if(type->declarator)
1926 InstDeclPassDeclarator(type->declarator);
1929 static void InstDeclPassExpression(struct Expression * exp);
1931 static void InstDeclPassInitializer(struct Initializer * init)
1936 if(init->__anon1.exp)
1938 InstDeclPassExpression(init->__anon1.exp);
1939 AddPointerCast(init->__anon1.exp);
1944 struct Initializer * i;
1946 for(i = (*init->__anon1.list).first; i; i = i->next)
1947 InstDeclPassInitializer(i);
1953 static void InstDeclPassStatement(struct Statement * stmt)
1958 if(stmt->__anon1.decl)
1959 InstDeclPassDeclaration(stmt->__anon1.decl);
1962 InstDeclPassStatement(stmt->__anon1.labeled.stmt);
1965 if(stmt->__anon1.caseStmt.exp)
1966 InstDeclPassExpression(stmt->__anon1.caseStmt.exp);
1967 if(stmt->__anon1.caseStmt.stmt)
1968 InstDeclPassStatement(stmt->__anon1.caseStmt.stmt);
1972 struct Declaration * decl;
1973 struct Statement * s;
1974 struct Context * prevContext = curContext;
1976 if(!stmt->__anon1.compound.isSwitch)
1977 curContext = stmt->__anon1.compound.context;
1978 if(stmt->__anon1.compound.declarations)
1980 for(decl = (*stmt->__anon1.compound.declarations).first; decl; decl = decl->next)
1981 InstDeclPassDeclaration(decl);
1983 if(stmt->__anon1.compound.statements)
1985 for(s = (*stmt->__anon1.compound.statements).first; s; s = s->next)
1986 InstDeclPassStatement(s);
1988 curContext = prevContext;
1993 if(stmt->__anon1.expressions)
1995 struct Expression * exp;
1997 for(exp = (*stmt->__anon1.expressions).first; exp; exp = exp->next)
1998 InstDeclPassExpression(exp);
2004 if(stmt->__anon1.ifStmt.exp)
2006 struct Expression * exp;
2008 for(exp = (*stmt->__anon1.ifStmt.exp).first; exp; exp = exp->next)
2009 InstDeclPassExpression(exp);
2011 if(stmt->__anon1.ifStmt.stmt)
2012 InstDeclPassStatement(stmt->__anon1.ifStmt.stmt);
2013 if(stmt->__anon1.ifStmt.elseStmt)
2014 InstDeclPassStatement(stmt->__anon1.ifStmt.elseStmt);
2019 struct Expression * exp;
2021 if(stmt->__anon1.switchStmt.exp)
2023 for(exp = (*stmt->__anon1.switchStmt.exp).first; exp; exp = exp->next)
2024 InstDeclPassExpression(exp);
2026 InstDeclPassStatement(stmt->__anon1.switchStmt.stmt);
2031 struct Expression * exp;
2033 if(stmt->__anon1.whileStmt.exp)
2035 for(exp = (*stmt->__anon1.whileStmt.exp).first; exp; exp = exp->next)
2036 InstDeclPassExpression(exp);
2038 InstDeclPassStatement(stmt->__anon1.whileStmt.stmt);
2043 if(stmt->__anon1.doWhile.exp)
2045 struct Expression * exp;
2047 for(exp = (*stmt->__anon1.doWhile.exp).first; exp; exp = exp->next)
2048 InstDeclPassExpression(exp);
2050 if(stmt->__anon1.doWhile.stmt)
2051 InstDeclPassStatement(stmt->__anon1.doWhile.stmt);
2056 struct Expression * exp;
2058 if(stmt->__anon1.forStmt.init)
2059 InstDeclPassStatement(stmt->__anon1.forStmt.init);
2060 if(stmt->__anon1.forStmt.check)
2061 InstDeclPassStatement(stmt->__anon1.forStmt.check);
2062 if(stmt->__anon1.forStmt.increment)
2064 for(exp = (*stmt->__anon1.forStmt.increment).first; exp; exp = exp->next)
2065 InstDeclPassExpression(exp);
2067 if(stmt->__anon1.forStmt.stmt)
2068 InstDeclPassStatement(stmt->__anon1.forStmt.stmt);
2079 struct Expression * exp;
2081 if(stmt->__anon1.expressions)
2083 for(exp = (*stmt->__anon1.expressions).first; exp; exp = exp->next)
2084 InstDeclPassExpression(exp);
2085 AddPointerCast((*stmt->__anon1.expressions).last);
2091 struct AsmField * field;
2093 if(stmt->__anon1.asmStmt.inputFields)
2095 for(field = (*stmt->__anon1.asmStmt.inputFields).first; field; field = field->next)
2096 if(field->expression)
2097 InstDeclPassExpression(field->expression);
2099 if(stmt->__anon1.asmStmt.outputFields)
2101 for(field = (*stmt->__anon1.asmStmt.outputFields).first; field; field = field->next)
2102 if(field->expression)
2103 InstDeclPassExpression(field->expression);
2105 if(stmt->__anon1.asmStmt.clobberedFields)
2107 for(field = (*stmt->__anon1.asmStmt.clobberedFields).first; field; field = field->next)
2108 if(field->expression)
2109 InstDeclPassExpression(field->expression);
2116 static void InstDeclPassDeclaration(struct Declaration * decl)
2122 if(decl->__anon1.__anon1.specifiers)
2124 struct Specifier * spec;
2126 for(spec = (*decl->__anon1.__anon1.specifiers).first; spec; spec = spec->next)
2130 if((type = ReplaceClassSpec(decl->__anon1.__anon1.specifiers, spec, 0)))
2132 struct InitDeclarator * d;
2134 if(decl->__anon1.__anon1.declarators)
2136 for(d = (*decl->__anon1.__anon1.declarators).first; d; d = d->next)
2137 ReplaceByInstancePtr(spec, &d->declarator, type);
2140 InstDeclPassSpecifier(spec, 0);
2143 if(decl->__anon1.__anon1.declarators)
2145 struct InitDeclarator * d;
2147 for(d = (*decl->__anon1.__anon1.declarators).first; d; d = d->next)
2149 InstDeclPassDeclarator(d->declarator);
2151 InstDeclPassInitializer(d->initializer);
2158 if(decl->__anon1.__anon1.specifiers)
2160 struct Specifier * spec;
2162 for(spec = (*decl->__anon1.__anon1.specifiers).first; spec; spec = spec->next)
2166 if((type = ReplaceClassSpec(decl->__anon1.__anon1.specifiers, spec, 0)))
2168 if(decl->__anon1.__anon1.declarators)
2170 struct Declarator * d;
2172 for(d = (*decl->__anon1.__anon1.declarators).first; d; d = d->next)
2173 ReplaceByInstancePtr(spec, &d, type);
2176 InstDeclPassSpecifier(spec, 0);
2179 if(decl->__anon1.__anon1.declarators)
2181 struct Declarator * d;
2183 for(d = (*decl->__anon1.__anon1.declarators).first; d; d = d->next)
2184 InstDeclPassDeclarator(d);
2193 static void InstDeclPassExpression(struct Expression * exp)
2199 if(exp->__anon1.__anon1.identifier)
2200 InstDeclPassIdentifier(exp->__anon1.__anon1.identifier);
2208 if(exp->__anon1.op.exp1)
2209 InstDeclPassExpression(exp->__anon1.op.exp1);
2210 if(exp->__anon1.op.exp2)
2212 InstDeclPassExpression(exp->__anon1.op.exp2);
2213 if(exp->__anon1.op.op != '=' && exp->__anon1.op.exp1 && exp->__anon1.op.exp1->expType && exp->__anon1.op.exp1->expType->kind == 13 && exp->__anon1.op.exp1->expType->__anon1.type && exp->__anon1.op.exp1->expType->__anon1.type->kind == 20 && exp->__anon1.op.exp2->expType && exp->__anon1.op.exp2->expType->kind == 13 && exp->__anon1.op.exp2->expType->__anon1.type && exp->__anon1.op.exp2->expType->__anon1.type->kind == 20)
2215 struct Expression * e = exp->__anon1.op.exp2;
2217 e->__anon1.cast.exp = MkExpBrackets(MkListOne(MoveExpContents(e)));
2219 e->__anon1.typeName = MkTypeName(MkListOne(MkSpecifier(VOID)), QMkPtrDecl((((void *)0))));
2220 e = exp->__anon1.op.exp1;
2221 e->__anon1.cast.exp = MkExpBrackets(MkListOne(MoveExpContents(e)));
2223 e->__anon1.typeName = MkTypeName(MkListOne(MkSpecifier(VOID)), QMkPtrDecl((((void *)0))));
2225 else if(exp->__anon1.op.exp1 && (exp->__anon1.op.op == '=' || exp->__anon1.op.op == EQ_OP || exp->__anon1.op.op == NE_OP))
2226 AddPointerCast(exp->__anon1.op.exp2);
2232 struct Expression * e;
2234 for(e = (*exp->__anon1.list).first; e; e = e->next)
2235 InstDeclPassExpression(e);
2240 struct Expression * e;
2242 InstDeclPassExpression(exp->__anon1.index.exp);
2243 for(e = (*exp->__anon1.index.index).first; e; e = e->next)
2244 InstDeclPassExpression(e);
2249 struct Expression * e;
2251 InstDeclPassExpression(exp->__anon1.call.exp);
2252 if(exp->__anon1.call.arguments)
2254 for(e = (*exp->__anon1.call.arguments).first; e; e = e->next)
2256 unsigned int addCast = 0;
2258 InstDeclPassExpression(e);
2260 if(e->expType && e->expType->kind == 13 && e->expType->__anon1.type && (e->expType->__anon1.type->kind == 8 || (e->expType->__anon1.type->kind == 13 && e->expType->__anon1.type->__anon1.type && e->expType->__anon1.type->__anon1.type->kind != 0)) && e->destType && e->destType->kind == 13 && e->destType->__anon1.type && e->destType->__anon1.type->kind == 13 && e->destType->__anon1.type->__anon1.type && e->destType->__anon1.type->__anon1.type->kind == 0)
2262 else if(e->expType && e->expType->kind == 8 && e->expType->__anon1._class && e->expType->__anon1._class->__anon1.registered && e->expType->__anon1._class->__anon1.registered->type == 1 && e->byReference && e->destType && e->destType->kind == 8 && e->destType->classObjectType && e->destType->byReference)
2264 if(addCast && (e->type != 11 || !IsVoidPtrCast(e->__anon1.cast.typeName)))
2266 e->__anon1.cast.exp = MkExpBrackets(MkListOne(MoveExpContents(e)));
2268 e->__anon1.typeName = MkTypeName(MkListOne(MkSpecifier(VOID)), QMkPtrDecl((((void *)0))));
2276 if(exp->__anon1.member.exp)
2277 InstDeclPassExpression(exp->__anon1.member.exp);
2282 if(exp->__anon1.member.exp)
2283 InstDeclPassExpression(exp->__anon1.member.exp);
2287 InstDeclPassTypeName(exp->__anon1.typeName, 0);
2291 struct Type * type = exp->expType;
2293 if(type && type->kind == 8 && type->__anon1._class->__anon1.registered && type->__anon1._class->__anon1.registered->type == 1 && !exp->needCast)
2295 if(exp->destType && exp->destType->classObjectType == 2 && exp->destType->byReference)
2297 FreeTypeName(exp->__anon1.cast.typeName);
2298 exp->__anon1.cast.typeName = MkTypeName(MkListOne(MkSpecifier(VOID)), MkDeclaratorPointer(MkPointer((((void *)0)), MkPointer((((void *)0)), (((void *)0)))), (((void *)0))));
2302 struct Expression * castExp = exp->__anon1.cast.exp;
2303 struct Expression * prev = exp->prev, * next = exp->next;
2305 exp->__anon1.cast.exp = (((void *)0));
2306 FreeExpContents(exp);
2307 FreeType(exp->expType);
2308 FreeType(exp->destType);
2310 ((castExp ? __extension__ ({
2311 void * __ecerePtrToDelete = (castExp);
2313 __ecereClass_Expression->Destructor ? __ecereClass_Expression->Destructor((void *)__ecerePtrToDelete) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(__ecerePtrToDelete);
2314 }) : 0), castExp = 0);
2317 InstDeclPassExpression(exp);
2322 if(exp->expType && exp->expType->kind == 13)
2324 if(exp->__anon1.cast.exp && exp->__anon1.cast.exp->expType && exp->__anon1.cast.exp->expType->kind == 20 && !__ecereProp_Type_Get_isPointerType(exp->__anon1.cast.exp->expType))
2325 exp->__anon1.cast.exp = MkExpCast(MkTypeName(MkListOne(MkSpecifierName("uintptr")), (((void *)0))), exp->__anon1.cast.exp);
2327 InstDeclPassTypeName(exp->__anon1.cast.typeName, ((unsigned int)((exp->usage & 0x4) >> 2)));
2328 if(exp->__anon1.cast.exp)
2330 if(exp->expType && exp->expType->kind == 20 && exp->destType && (exp->destType->passAsTemplate || (!exp->destType->__anon1.templateParameter || (!exp->destType->__anon1.templateParameter->__anon1.dataType && !exp->destType->__anon1.templateParameter->dataTypeString))) && exp->__anon1.cast.exp->expType && !exp->__anon1.cast.exp->expType->passAsTemplate && __ecereProp_Type_Get_isPointerType(exp->__anon1.cast.exp->expType))
2331 exp->__anon1.cast.exp = MkExpCast(MkTypeName(MkListOne(MkSpecifierName("uintptr")), (((void *)0))), exp->__anon1.cast.exp);
2332 InstDeclPassExpression(exp->__anon1.cast.exp);
2339 struct Expression * e;
2341 InstDeclPassExpression(exp->__anon1.cond.cond);
2342 for(e = (*exp->__anon1.cond.exp).first; e; e = e->next)
2343 InstDeclPassExpression(e);
2344 if(exp->__anon1.cond.elseExp)
2345 InstDeclPassExpression(exp->__anon1.cond.elseExp);
2350 InstDeclPassStatement(exp->__anon1.compound);
2355 InstDeclPassExpression(exp->__anon1.vaArg.exp);
2360 InstDeclPassTypeName(exp->__anon1.initializer.typeName, 0);
2361 InstDeclPassInitializer(exp->__anon1.initializer.initializer);
2367 void ProcessInstanceDeclarations()
2369 struct External * external;
2371 curContext = globalContext;
2372 for(external = (*ast).first; external; external = external->next)
2374 curExternal = external;
2375 if(external->type == 0)
2377 struct FunctionDefinition * func = external->__anon1.function;
2379 if(func->specifiers)
2381 struct Specifier * spec;
2383 for(spec = (*func->specifiers).first; spec; spec = spec->next)
2387 if((type = ReplaceClassSpec(func->specifiers, spec, 0)))
2388 ReplaceByInstancePtr(spec, &func->declarator, type);
2389 InstDeclPassSpecifier(spec, 0);
2392 InstDeclPassDeclarator(func->declarator);
2394 InstDeclPassStatement(func->body);
2396 else if(external->type == 1)
2398 if(external->__anon1.declaration)
2399 InstDeclPassDeclaration(external->__anon1.declaration);
2405 void __ecereRegisterModule_pass3(struct __ecereNameSpace__ecere__com__Instance * module)
2407 struct __ecereNameSpace__ecere__com__Class __attribute__((unused)) * class;
2409 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("InstDeclPassTypeName", "void InstDeclPassTypeName(TypeName type, bool param)", InstDeclPassTypeName, module, 2);
2410 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("IsVoidPtrCast", "bool IsVoidPtrCast(TypeName typeName)", IsVoidPtrCast, module, 2);
2411 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("TopoSort", "void TopoSort(ecere::sys::OldList * input)", TopoSort, module, 2);
2412 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ProcessInstanceDeclarations", "void ProcessInstanceDeclarations(void)", ProcessInstanceDeclarations, module, 1);