The Ecere SDK - sdk/blob - compiler/bootstrap/libec/bootstrap/freeAst.c

   1 #if defined(__GNUC__)
   2 typedef long long int64;
   3 typedef unsigned long long uint64;
   4 #elif defined(__TINYC__)
   5 #include <stdarg.h>
   6 #define __builtin_va_list va_list
   7 #define __builtin_va_start va_start
   8 #define __builtin_va_end va_end
   9 #ifdef _WIN32
  10 #define strcasecmp stricmp
  11 #define strncasecmp strnicmp
  12 #define __declspec(x) __attribute__((x))
  13 #endif
  14 typedef long long int64;
  15 typedef unsigned long long uint64;
  16 #else
  17 typedef __int64 int64;
  18 typedef unsigned __int64 uint64;
  19 #endif
  20 #ifdef __BIG_ENDIAN__
  21 #define __ENDIAN_PAD(x) (8 - (x))
  22 #else
  23 #define __ENDIAN_PAD(x) 0
  24 #endif
  25 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
  26
  27 struct __ecereNameSpace__ecere__sys__BTNode;
  28
  29 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
  30
  31 struct __ecereNameSpace__ecere__sys__BinaryTree
  32 {
  33 struct __ecereNameSpace__ecere__sys__BTNode * root;
  34 int count;
  35 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, unsigned int a, unsigned int b);
  36 void (*  FreeKey)(void *  key);
  37 };
  38
  39 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
  40
  41 struct __ecereNameSpace__ecere__sys__OldList
  42 {
  43 void *  first;
  44 void *  last;
  45 int count;
  46 unsigned int offset;
  47 unsigned int circ;
  48 };
  49
  50 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
  51
  52 struct __ecereNameSpace__ecere__com__Method
  53 {
  54 char *  name;
  55 struct __ecereNameSpace__ecere__com__Method * parent;
  56 struct __ecereNameSpace__ecere__com__Method * left;
  57 struct __ecereNameSpace__ecere__com__Method * right;
  58 int depth;
  59 int (*  function)();
  60 int vid;
  61 int type;
  62 struct __ecereNameSpace__ecere__com__Class * _class;
  63 void *  symbol;
  64 char *  dataTypeString;
  65 struct Type * dataType;
  66 int memberAccess;
  67 };
  68
  69 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
  70
  71 struct __ecereNameSpace__ecere__com__Property
  72 {
  73 struct __ecereNameSpace__ecere__com__Property * prev;
  74 struct __ecereNameSpace__ecere__com__Property * next;
  75 char *  name;
  76 unsigned int isProperty;
  77 int memberAccess;
  78 int id;
  79 struct __ecereNameSpace__ecere__com__Class * _class;
  80 char *  dataTypeString;
  81 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
  82 struct Type * dataType;
  83 void (*  Set)();
  84 int (*  Get)();
  85 unsigned int (*  IsSet)();
  86 void *  data;
  87 void *  symbol;
  88 int vid;
  89 unsigned int conversion;
  90 unsigned int watcherOffset;
  91 char *  category;
  92 unsigned int compiled;
  93 unsigned int selfWatchable;
  94 unsigned int isWatchable;
  95 };
  96
  97 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_CodePosition;
  98
  99 struct CodePosition
 100 {
 101 int line;
 102 int charPos;
 103 int pos;
 104 unsigned int included;
 105 };
 106
 107 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Location;
 108
 109 struct Location
 110 {
 111 struct CodePosition start;
 112 struct CodePosition end;
 113 };
 114
 115 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDefinition;
 116
 117 struct ClassDefinition
 118 {
 119 struct ClassDefinition * prev;
 120 struct ClassDefinition * next;
 121 struct Location loc;
 122 struct Specifier * _class;
 123 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
 124 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 125 struct Symbol * symbol;
 126 struct Location blockStart;
 127 struct Location nameLoc;
 128 int endid;
 129 int declMode;
 130 unsigned int deleteWatchable;
 131 };
 132
 133 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
 134
 135 struct Context
 136 {
 137 struct Context * parent;
 138 struct __ecereNameSpace__ecere__sys__BinaryTree types;
 139 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
 140 struct __ecereNameSpace__ecere__sys__BinaryTree symbols;
 141 struct __ecereNameSpace__ecere__sys__BinaryTree structSymbols;
 142 int nextID;
 143 int simpleID;
 144 struct __ecereNameSpace__ecere__sys__BinaryTree templateTypes;
 145 struct ClassDefinition * classDef;
 146 unsigned int templateTypesOnly;
 147 };
 148
 149 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
 150
 151 struct Instantiation
 152 {
 153 struct Instantiation * prev;
 154 struct Instantiation * next;
 155 struct Location loc;
 156 struct Specifier * _class;
 157 struct Expression * exp;
 158 struct __ecereNameSpace__ecere__sys__OldList *  members;
 159 struct Symbol * symbol;
 160 unsigned int fullSet;
 161 unsigned int isConstant;
 162 unsigned char *  data;
 163 struct Location nameLoc;
 164 struct Location insideLoc;
 165 unsigned int built;
 166 };
 167
 168 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
 169
 170 struct Declaration
 171 {
 172 struct Declaration * prev;
 173 struct Declaration * next;
 174 struct Location loc;
 175 int type;
 176 union
 177 {
 178 struct
 179 {
 180 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 181 struct __ecereNameSpace__ecere__sys__OldList *  declarators;
 182 };
 183 struct Instantiation * inst;
 184 struct
 185 {
 186 struct Identifier * id;
 187 struct Expression * exp;
 188 };
 189 };
 190 struct Specifier * extStorage;
 191 struct Symbol * symbol;
 192 int declMode;
 193 };
 194
 195 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
 196
 197 struct Statement
 198 {
 199 struct Statement * prev;
 200 struct Statement * next;
 201 struct Location loc;
 202 int type;
 203 union
 204 {
 205 struct __ecereNameSpace__ecere__sys__OldList *  expressions;
 206 struct
 207 {
 208 struct Identifier * id;
 209 struct Statement * stmt;
 210 } labeled;
 211 struct
 212 {
 213 struct Expression * exp;
 214 struct Statement * stmt;
 215 } caseStmt;
 216 struct
 217 {
 218 struct __ecereNameSpace__ecere__sys__OldList * declarations;
 219 struct __ecereNameSpace__ecere__sys__OldList * statements;
 220 struct Context * context;
 221 unsigned int isSwitch;
 222 } compound;
 223 struct
 224 {
 225 struct __ecereNameSpace__ecere__sys__OldList * exp;
 226 struct Statement * stmt;
 227 struct Statement * elseStmt;
 228 } ifStmt;
 229 struct
 230 {
 231 struct __ecereNameSpace__ecere__sys__OldList * exp;
 232 struct Statement * stmt;
 233 } switchStmt;
 234 struct
 235 {
 236 struct __ecereNameSpace__ecere__sys__OldList * exp;
 237 struct Statement * stmt;
 238 } whileStmt;
 239 struct
 240 {
 241 struct __ecereNameSpace__ecere__sys__OldList * exp;
 242 struct Statement * stmt;
 243 } doWhile;
 244 struct
 245 {
 246 struct Statement * init;
 247 struct Statement * check;
 248 struct __ecereNameSpace__ecere__sys__OldList * increment;
 249 struct Statement * stmt;
 250 } forStmt;
 251 struct
 252 {
 253 struct Identifier * id;
 254 } gotoStmt;
 255 struct
 256 {
 257 struct Specifier * spec;
 258 char * statements;
 259 struct __ecereNameSpace__ecere__sys__OldList * inputFields;
 260 struct __ecereNameSpace__ecere__sys__OldList * outputFields;
 261 struct __ecereNameSpace__ecere__sys__OldList * clobberedFields;
 262 } asmStmt;
 263 struct
 264 {
 265 struct Expression * watcher;
 266 struct Expression * object;
 267 struct __ecereNameSpace__ecere__sys__OldList * watches;
 268 } _watch;
 269 struct
 270 {
 271 struct Identifier * id;
 272 struct __ecereNameSpace__ecere__sys__OldList * exp;
 273 struct __ecereNameSpace__ecere__sys__OldList * filter;
 274 struct Statement * stmt;
 275 } forEachStmt;
 276 struct Declaration * decl;
 277 };
 278 };
 279
 280 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
 281
 282 struct TypeName
 283 {
 284 struct TypeName * prev;
 285 struct TypeName * next;
 286 struct Location loc;
 287 struct __ecereNameSpace__ecere__sys__OldList *  qualifiers;
 288 struct Declarator * declarator;
 289 int classObjectType;
 290 struct Expression * bitCount;
 291 };
 292
 293 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
 294
 295 struct Initializer
 296 {
 297 struct Initializer * prev;
 298 struct Initializer * next;
 299 struct Location loc;
 300 int type;
 301 union
 302 {
 303 struct Expression * exp;
 304 struct __ecereNameSpace__ecere__sys__OldList *  list;
 305 };
 306 unsigned int isConstant;
 307 };
 308
 309 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
 310
 311 struct __ecereNameSpace__ecere__com__DataValue
 312 {
 313 union
 314 {
 315 char c;
 316 unsigned char uc;
 317 short s;
 318 unsigned short us;
 319 int i;
 320 unsigned int ui;
 321 void *  p;
 322 float f;
 323 double d;
 324 long long i64;
 325 uint64 ui64;
 326 };
 327 };
 328
 329 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
 330
 331 struct Expression
 332 {
 333 struct Expression * prev;
 334 struct Expression * next;
 335 struct Location loc;
 336 int type;
 337 union
 338 {
 339 struct
 340 {
 341 char *  constant;
 342 struct Identifier * identifier;
 343 };
 344 struct Statement * compound;
 345 struct Instantiation * instance;
 346 char *  string;
 347 struct __ecereNameSpace__ecere__sys__OldList *  list;
 348 struct
 349 {
 350 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
 351 struct Declarator * decl;
 352 } _classExp;
 353 struct
 354 {
 355 struct Identifier * id;
 356 } classData;
 357 struct
 358 {
 359 struct Expression * exp;
 360 struct __ecereNameSpace__ecere__sys__OldList * arguments;
 361 struct Location argLoc;
 362 } call;
 363 struct
 364 {
 365 struct Expression * exp;
 366 struct __ecereNameSpace__ecere__sys__OldList * index;
 367 } index;
 368 struct
 369 {
 370 struct Expression * exp;
 371 struct Identifier * member;
 372 int memberType;
 373 unsigned int thisPtr;
 374 } member;
 375 struct
 376 {
 377 int op;
 378 struct Expression * exp1;
 379 struct Expression * exp2;
 380 } op;
 381 struct TypeName * typeName;
 382 struct Specifier * _class;
 383 struct
 384 {
 385 struct TypeName * typeName;
 386 struct Expression * exp;
 387 } cast;
 388 struct
 389 {
 390 struct Expression * cond;
 391 struct __ecereNameSpace__ecere__sys__OldList * exp;
 392 struct Expression * elseExp;
 393 } cond;
 394 struct
 395 {
 396 struct TypeName * typeName;
 397 struct Expression * size;
 398 } _new;
 399 struct
 400 {
 401 struct TypeName * typeName;
 402 struct Expression * size;
 403 struct Expression * exp;
 404 } _renew;
 405 struct
 406 {
 407 char * table;
 408 struct Identifier * id;
 409 } db;
 410 struct
 411 {
 412 struct Expression * ds;
 413 struct Expression * name;
 414 } dbopen;
 415 struct
 416 {
 417 struct TypeName * typeName;
 418 struct Initializer * initializer;
 419 } initializer;
 420 struct
 421 {
 422 struct Expression * exp;
 423 struct TypeName * typeName;
 424 } vaArg;
 425 };
 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;
 432 unsigned int usage;
 433 int tempCount;
 434 unsigned int byReference;
 435 unsigned int isConstant;
 436 unsigned int addedThis;
 437 unsigned int needCast;
 438 unsigned int thisPtr;
 439 };
 440
 441 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
 442
 443 struct TemplateDatatype
 444 {
 445 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 446 struct Declarator * decl;
 447 };
 448
 449 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
 450
 451 struct TemplateArgument
 452 {
 453 struct TemplateArgument * prev;
 454 struct TemplateArgument * next;
 455 struct Location loc;
 456 struct Identifier * name;
 457 int type;
 458 union
 459 {
 460 struct Expression * expression;
 461 struct Identifier * identifier;
 462 struct TemplateDatatype * templateDatatype;
 463 };
 464 };
 465
 466 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
 467
 468 struct TemplateParameter
 469 {
 470 struct TemplateParameter * prev;
 471 struct TemplateParameter * next;
 472 struct Location loc;
 473 int type;
 474 struct Identifier * identifier;
 475 union
 476 {
 477 struct TemplateDatatype * dataType;
 478 int memberType;
 479 };
 480 struct TemplateArgument * defaultArgument;
 481 char *  dataTypeString;
 482 struct Type * baseType;
 483 };
 484
 485 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
 486
 487 struct Specifier
 488 {
 489 struct Specifier * prev;
 490 struct Specifier * next;
 491 struct Location loc;
 492 int type;
 493 union
 494 {
 495 int specifier;
 496 struct
 497 {
 498 char *  name;
 499 struct Symbol * symbol;
 500 struct __ecereNameSpace__ecere__sys__OldList *  templateArgs;
 501 };
 502 struct
 503 {
 504 struct Identifier * id;
 505 struct __ecereNameSpace__ecere__sys__OldList *  list;
 506 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
 507 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 508 unsigned int addNameSpace;
 509 struct Context * ctx;
 510 };
 511 struct Expression * expression;
 512 struct Specifier * _class;
 513 struct TemplateParameter * templateParameter;
 514 };
 515 };
 516
 517 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
 518
 519 struct Identifier
 520 {
 521 struct Identifier * prev;
 522 struct Identifier * next;
 523 struct Location loc;
 524 struct Symbol * classSym;
 525 struct Specifier * _class;
 526 char *  string;
 527 struct Identifier * badID;
 528 };
 529
 530 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Pointer;
 531
 532 struct Pointer
 533 {
 534 struct Pointer * prev;
 535 struct Pointer * next;
 536 struct Location loc;
 537 struct __ecereNameSpace__ecere__sys__OldList *  qualifiers;
 538 struct Pointer * pointer;
 539 };
 540
 541 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
 542
 543 struct Declarator
 544 {
 545 struct Declarator * prev;
 546 struct Declarator * next;
 547 struct Location loc;
 548 int type;
 549 struct Symbol * symbol;
 550 struct Declarator * declarator;
 551 union
 552 {
 553 struct Identifier * identifier;
 554 struct
 555 {
 556 struct Expression * exp;
 557 struct Expression * posExp;
 558 char * attrib;
 559 } structDecl;
 560 struct
 561 {
 562 struct Expression * exp;
 563 struct Specifier * enumClass;
 564 } array;
 565 struct
 566 {
 567 struct __ecereNameSpace__ecere__sys__OldList * parameters;
 568 } function;
 569 struct
 570 {
 571 struct Pointer * pointer;
 572 } pointer;
 573 struct
 574 {
 575 char * extended;
 576 } extended;
 577 };
 578 };
 579
 580 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
 581
 582 struct FunctionDefinition
 583 {
 584 struct FunctionDefinition * prev;
 585 struct FunctionDefinition * next;
 586 struct Location loc;
 587 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 588 struct Declarator * declarator;
 589 struct __ecereNameSpace__ecere__sys__OldList *  declarations;
 590 struct Statement * body;
 591 struct __ecereNameSpace__ecere__com__Class * _class;
 592 struct __ecereNameSpace__ecere__sys__OldList attached;
 593 int declMode;
 594 struct Type * type;
 595 struct Symbol * propSet;
 596 int tempCount;
 597 unsigned int propertyNoThis;
 598 };
 599
 600 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
 601
 602 struct DBTableDef
 603 {
 604 char *  name;
 605 struct Symbol * symbol;
 606 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 607 int declMode;
 608 };
 609
 610 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
 611
 612 struct External
 613 {
 614 struct External * prev;
 615 struct External * next;
 616 struct Location loc;
 617 int type;
 618 struct Symbol * symbol;
 619 union
 620 {
 621 struct FunctionDefinition * function;
 622 struct ClassDefinition * _class;
 623 struct Declaration * declaration;
 624 char *  importString;
 625 struct Identifier * id;
 626 struct DBTableDef * table;
 627 };
 628 int importType;
 629 };
 630
 631 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
 632
 633 struct ModuleImport
 634 {
 635 struct ModuleImport * prev;
 636 struct ModuleImport * next;
 637 char *  name;
 638 struct __ecereNameSpace__ecere__sys__OldList classes;
 639 struct __ecereNameSpace__ecere__sys__OldList functions;
 640 int importType;
 641 int importAccess;
 642 };
 643
 644 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
 645
 646 struct ClassImport
 647 {
 648 struct ClassImport * prev;
 649 struct ClassImport * next;
 650 char *  name;
 651 struct __ecereNameSpace__ecere__sys__OldList methods;
 652 struct __ecereNameSpace__ecere__sys__OldList properties;
 653 unsigned int itself;
 654 unsigned int isRemote;
 655 };
 656
 657 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
 658
 659 struct Symbol
 660 {
 661 char *  string;
 662 struct Symbol * parent;
 663 struct Symbol * left;
 664 struct Symbol * right;
 665 int depth;
 666 struct Type * type;
 667 union
 668 {
 669 struct __ecereNameSpace__ecere__com__Method * method;
 670 struct __ecereNameSpace__ecere__com__Property * _property;
 671 struct __ecereNameSpace__ecere__com__Class * registered;
 672 };
 673 int id;
 674 int idCode;
 675 union
 676 {
 677 struct
 678 {
 679 struct External * pointerExternal;
 680 struct External * structExternal;
 681 };
 682 struct
 683 {
 684 struct External * externalGet;
 685 struct External * externalSet;
 686 struct External * externalPtr;
 687 struct External * externalIsSet;
 688 };
 689 struct
 690 {
 691 struct External * methodExternal;
 692 struct External * methodCodeExternal;
 693 };
 694 };
 695 unsigned int imported;
 696 unsigned int declaredStructSym;
 697 struct __ecereNameSpace__ecere__com__Class * _class;
 698 unsigned int declaredStruct;
 699 unsigned int needConstructor;
 700 unsigned int needDestructor;
 701 char *  constructorName;
 702 char *  structName;
 703 char *  className;
 704 char *  destructorName;
 705 struct ModuleImport * module;
 706 struct ClassImport * _import;
 707 struct Location nameLoc;
 708 unsigned int isParam;
 709 unsigned int isRemote;
 710 unsigned int isStruct;
 711 unsigned int fireWatchersDone;
 712 int declaring;
 713 unsigned int classData;
 714 unsigned int isStatic;
 715 char *  shortName;
 716 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
 717 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
 718 struct Context * ctx;
 719 int isIterator;
 720 };
 721
 722 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
 723
 724 struct Type
 725 {
 726 struct Type * prev;
 727 struct Type * next;
 728 int refCount;
 729 union
 730 {
 731 struct Symbol * _class;
 732 struct
 733 {
 734 struct __ecereNameSpace__ecere__sys__OldList members;
 735 char *  enumName;
 736 };
 737 struct
 738 {
 739 struct Type * returnType;
 740 struct __ecereNameSpace__ecere__sys__OldList params;
 741 struct Symbol * thisClass;
 742 unsigned int staticMethod;
 743 struct TemplateParameter * thisClassTemplate;
 744 };
 745 struct
 746 {
 747 struct __ecereNameSpace__ecere__com__Method * method;
 748 struct __ecereNameSpace__ecere__com__Class * methodClass;
 749 struct __ecereNameSpace__ecere__com__Class * usedClass;
 750 };
 751 struct
 752 {
 753 struct Type * arrayType;
 754 int arraySize;
 755 struct Expression * arraySizeExp;
 756 unsigned int freeExp;
 757 struct Symbol * enumClass;
 758 };
 759 struct Type * type;
 760 struct TemplateParameter * templateParameter;
 761 };
 762 unsigned int isSigned;
 763 int kind;
 764 unsigned int constant;
 765 unsigned int size;
 766 char *  name;
 767 char *  typeName;
 768 unsigned int count;
 769 unsigned int truth;
 770 int classObjectType;
 771 unsigned int byReference;
 772 unsigned int extraParam;
 773 int alignment;
 774 unsigned int directClassAccess;
 775 unsigned int computing;
 776 unsigned int dllExport;
 777 unsigned int offset;
 778 unsigned int keepCast;
 779 unsigned int passAsTemplate;
 780 int bitFieldCount;
 781 };
 782
 783 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
 784
 785 struct __ecereNameSpace__ecere__com__Class
 786 {
 787 struct __ecereNameSpace__ecere__com__Class * prev;
 788 struct __ecereNameSpace__ecere__com__Class * next;
 789 char *  name;
 790 int offset;
 791 int structSize;
 792 int (* *  _vTbl)();
 793 int vTblSize;
 794 int (*  Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
 795 void (*  Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
 796 int offsetClass;
 797 int sizeClass;
 798 struct __ecereNameSpace__ecere__com__Class * base;
 799 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
 800 struct __ecereNameSpace__ecere__sys__BinaryTree members;
 801 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
 802 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
 803 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
 804 struct __ecereNameSpace__ecere__sys__OldList derivatives;
 805 int memberID;
 806 int startMemberID;
 807 int type;
 808 struct __ecereNameSpace__ecere__com__Instance * module;
 809 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
 810 char *  dataTypeString;
 811 struct Type * dataType;
 812 int typeSize;
 813 int defaultAlignment;
 814 void (*  Initialize)();
 815 int memberOffset;
 816 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
 817 char *  designerClass;
 818 unsigned int noExpansion;
 819 char *  defaultProperty;
 820 unsigned int comRedefinition;
 821 int count;
 822 unsigned int isRemote;
 823 unsigned int internalDecl;
 824 void *  data;
 825 unsigned int computeSize;
 826 int structAlignment;
 827 int destructionWatchOffset;
 828 unsigned int fixed;
 829 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
 830 int inheritanceAccess;
 831 char *  fullName;
 832 void *  symbol;
 833 struct __ecereNameSpace__ecere__sys__OldList conversions;
 834 struct __ecereNameSpace__ecere__sys__OldList templateParams;
 835 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
 836 struct __ecereNameSpace__ecere__com__Class * templateClass;
 837 struct __ecereNameSpace__ecere__sys__OldList templatized;
 838 int numParams;
 839 };
 840
 841 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
 842
 843 struct __ecereNameSpace__ecere__com__Instance
 844 {
 845 int (* *  _vTbl)();
 846 struct __ecereNameSpace__ecere__com__Class * _class;
 847 int _refCount;
 848 };
 849
 850 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
 851
 852 struct __ecereNameSpace__ecere__com__DataMember
 853 {
 854 struct __ecereNameSpace__ecere__com__DataMember * prev;
 855 struct __ecereNameSpace__ecere__com__DataMember * next;
 856 char *  name;
 857 unsigned int isProperty;
 858 int memberAccess;
 859 int id;
 860 struct __ecereNameSpace__ecere__com__Class * _class;
 861 char *  dataTypeString;
 862 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 863 struct Type * dataType;
 864 int type;
 865 int offset;
 866 int memberID;
 867 struct __ecereNameSpace__ecere__sys__OldList members;
 868 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 869 int memberOffset;
 870 int structAlignment;
 871 };
 872
 873 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
 874
 875 struct __ecereNameSpace__ecere__com__SerialBuffer
 876 {
 877 unsigned char *  _buffer;
 878 unsigned int count;
 879 unsigned int _size;
 880 unsigned int pos;
 881 };
 882
 883 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
 884
 885 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 886 {
 887 union
 888 {
 889 struct
 890 {
 891 char *  dataTypeString;
 892 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 893 };
 894 struct __ecereNameSpace__ecere__com__DataValue expression;
 895 struct
 896 {
 897 char *  memberString;
 898 union
 899 {
 900 struct __ecereNameSpace__ecere__com__DataMember * member;
 901 struct __ecereNameSpace__ecere__com__Property * prop;
 902 struct __ecereNameSpace__ecere__com__Method * method;
 903 };
 904 };
 905 };
 906 };
 907
 908 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 909
 910 void FreeList(struct __ecereNameSpace__ecere__sys__OldList * list, void (* FreeFunction)(void *))
 911 {
 912 if(list != (((void *)0)))
 913 {
 914 struct __ecereNameSpace__ecere__sys__Item * item;
 915
 916 while(item = list->first)
 917 {
 918 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(list, item);
 919 FreeFunction(item);
 920 }
 921 (__ecereNameSpace__ecere__com__eSystem_Delete(list), list = 0);
 922 }
 923 }
 924
 925 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__NamedLink;
 926
 927 struct __ecereNameSpace__ecere__sys__NamedLink
 928 {
 929 struct __ecereNameSpace__ecere__sys__NamedLink * prev;
 930 struct __ecereNameSpace__ecere__sys__NamedLink * next;
 931 char *  name;
 932 void *  data;
 933 };
 934
 935 void FreeExpression(struct Expression * exp);
 936
 937 void FreeType(struct Type * type)
 938 {
 939 if(type)
 940 {
 941 type->refCount--;
 942 if(type->refCount <= 0)
 943 {
 944 switch(type->kind)
 945 {
 946 case 15:
 947 {
 948 struct __ecereNameSpace__ecere__sys__NamedLink * member, * next;
 949
 950 if(type->enumName)
 951 (__ecereNameSpace__ecere__com__eSystem_Delete(type->enumName), type->enumName = 0);
 952 for(member = type->members.first; member; member = next)
 953 {
 954 next = member->next;
 955 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(&type->members, member);
 956 (__ecereNameSpace__ecere__com__eSystem_Delete(member->name), member->name = 0);
 957 ((member ? (__ecereClass___ecereNameSpace__ecere__sys__NamedLink->Destructor ? __ecereClass___ecereNameSpace__ecere__sys__NamedLink->Destructor(member) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(member)) : 0), member = 0);
 958 }
 959 break;
 960 }
 961 case 9:
 962 case 10:
 963 {
 964 struct Type * member, * next;
 965
 966 (__ecereNameSpace__ecere__com__eSystem_Delete(type->enumName), type->enumName = 0);
 967 for(member = type->members.first; member; member = next)
 968 {
 969 next = member->next;
 970 if(member->refCount == 1)
 971 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(&type->members, member);
 972 FreeType(member);
 973 }
 974 break;
 975 }
 976 case 11:
 977 {
 978 struct Type * param, * next;
 979
 980 if(type->returnType)
 981 FreeType(type->returnType);
 982 for(param = type->params.first; param; param = next)
 983 {
 984 next = param->next;
 985 FreeType(param);
 986 }
 987 break;
 988 }
 989 case 12:
 990 if(type->freeExp && type->arraySizeExp)
 991 FreeExpression(type->arraySizeExp);
 992 case 13:
 993 if(type->type)
 994 FreeType(type->type);
 995 break;
 996 }
 997 (__ecereNameSpace__ecere__com__eSystem_Delete(type->name), type->name = 0);
 998 (__ecereNameSpace__ecere__com__eSystem_Delete(type->typeName), type->typeName = 0);
 999 ((type ? (__ecereClass_Type->Destructor ? __ecereClass_Type->Destructor(type) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(type)) : 0), type = 0);
1000 }
1001 }
1002 }
1003
1004 void FreeTemplateParameter(struct TemplateParameter * param);
1005
1006 void FreeContext(struct Context * context);
1007
1008 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Delete(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
1009
1010 void FreeSymbol(struct Symbol * symbol)
1011 {
1012 struct __ecereNameSpace__ecere__sys__OldLink * link;
1013
1014 FreeType(symbol->type);
1015 while(link = symbol->templatedClasses.first)
1016 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Delete(&symbol->templatedClasses, link);
1017 (__ecereNameSpace__ecere__com__eSystem_Delete(symbol->string), symbol->string = 0);
1018 if(symbol->templateParams)
1019 FreeList(symbol->templateParams, FreeTemplateParameter);
1020 (__ecereNameSpace__ecere__com__eSystem_Delete(symbol->constructorName), symbol->constructorName = 0);
1021 (__ecereNameSpace__ecere__com__eSystem_Delete(symbol->structName), symbol->structName = 0);
1022 (__ecereNameSpace__ecere__com__eSystem_Delete(symbol->className), symbol->className = 0);
1023 (__ecereNameSpace__ecere__com__eSystem_Delete(symbol->destructorName), symbol->destructorName = 0);
1024 (__ecereNameSpace__ecere__com__eSystem_Delete(symbol->shortName), symbol->shortName = 0);
1025 if(symbol->ctx)
1026 {
1027 FreeContext(symbol->ctx);
1028 ((symbol->ctx ? (__ecereClass_Context->Destructor ? __ecereClass_Context->Destructor(symbol->ctx) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(symbol->ctx)) : 0), symbol->ctx = 0);
1029 }
1030 ((symbol ? (__ecereClass_Symbol->Destructor ? __ecereClass_Symbol->Destructor(symbol) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(symbol)) : 0), symbol = 0);
1031 }
1032
1033 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MethodImport;
1034
1035 struct MethodImport
1036 {
1037 struct MethodImport * prev;
1038 struct MethodImport * next;
1039 char *  name;
1040 unsigned int isVirtual;
1041 };
1042
1043 void FreeMethodImport(struct MethodImport * imp)
1044 {
1045 (__ecereNameSpace__ecere__com__eSystem_Delete(imp->name), imp->name = 0);
1046 }
1047
1048 void FreePropertyImport(struct MethodImport * imp)
1049 {
1050 (__ecereNameSpace__ecere__com__eSystem_Delete(imp->name), imp->name = 0);
1051 }
1052
1053 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(struct __ecereNameSpace__ecere__sys__OldList * this, void (*  freeFn)(void * ));
1054
1055 void FreeClassImport(struct ClassImport * imp)
1056 {
1057 (__ecereNameSpace__ecere__com__eSystem_Delete(imp->name), imp->name = 0);
1058 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&imp->methods, FreeMethodImport);
1059 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&imp->properties, FreePropertyImport);
1060 }
1061
1062 void FreeFunctionImport(struct ClassImport * imp)
1063 {
1064 (__ecereNameSpace__ecere__com__eSystem_Delete(imp->name), imp->name = 0);
1065 }
1066
1067 void FreeModuleImport(struct ModuleImport * imp)
1068 {
1069 (__ecereNameSpace__ecere__com__eSystem_Delete(imp->name), imp->name = 0);
1070 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&imp->classes, FreeClassImport);
1071 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&imp->functions, FreeFunctionImport);
1072 }
1073
1074 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Definition;
1075
1076 struct Definition
1077 {
1078 struct Definition * prev;
1079 struct Definition * next;
1080 char *  name;
1081 int type;
1082 };
1083
1084 void FreeModuleDefine(struct Definition * def)
1085 {
1086 (__ecereNameSpace__ecere__com__eSystem_Delete(def->name), def->name = 0);
1087 }
1088
1089 void FreeExcludedSymbols(struct __ecereNameSpace__ecere__sys__OldList * excludedSymbols)
1090 {
1091 struct Symbol * symbol;
1092
1093 while(symbol = excludedSymbols->first)
1094 {
1095 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(excludedSymbols, symbol);
1096 FreeSymbol(symbol);
1097 }
1098 }
1099
1100 void FreeIdentifier(struct Identifier * id);
1101
1102 void FreeTemplateDataType(struct TemplateDatatype * type);
1103
1104 void FreeTemplateArgument(struct TemplateArgument * arg)
1105 {
1106 switch(arg->type)
1107 {
1108 case 2:
1109 if(arg->expression)
1110 FreeExpression(arg->expression);
1111 break;
1112 case 1:
1113 if(arg->identifier)
1114 FreeIdentifier(arg->identifier);
1115 break;
1116 case 0:
1117 if(arg->templateDatatype)
1118 FreeTemplateDataType(arg->templateDatatype);
1119 break;
1120 }
1121 if(arg->name)
1122 FreeIdentifier(arg->name);
1123 ((arg ? (__ecereClass_TemplateArgument->Destructor ? __ecereClass_TemplateArgument->Destructor(arg) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(arg)) : 0), arg = 0);
1124 }
1125
1126 void FreeDeclarator(struct Declarator * decl);
1127
1128 void FreeSpecifier(struct Specifier * spec);
1129
1130 void FreeTemplateDataType(struct TemplateDatatype * type)
1131 {
1132 if(type->decl)
1133 FreeDeclarator(type->decl);
1134 if(type->specifiers)
1135 FreeList(type->specifiers, FreeSpecifier);
1136 ((type ? (__ecereClass_TemplateDatatype->Destructor ? __ecereClass_TemplateDatatype->Destructor(type) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(type)) : 0), type = 0);
1137 }
1138
1139 void FreeTemplateParameter(struct TemplateParameter * param)
1140 {
1141 if(param->identifier)
1142 {
1143 FreeIdentifier(param->identifier);
1144 }
1145 if(param->type == 0 || param->type == 2)
1146 {
1147 if(param->dataType)
1148 FreeTemplateDataType(param->dataType);
1149 }
1150 if(param->defaultArgument)
1151 FreeTemplateArgument(param->defaultArgument);
1152 if(param->baseType)
1153 FreeType(param->baseType);
1154 ((param ? (__ecereClass_TemplateParameter->Destructor ? __ecereClass_TemplateParameter->Destructor(param) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(param)) : 0), param = 0);
1155 }
1156
1157 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplatedType;
1158
1159 void FreeTemplateType(struct TemplatedType * type)
1160 {
1161 ((type ? (__ecereClass_TemplatedType->Destructor ? __ecereClass_TemplatedType->Destructor(type) : 0, __ecereClass___ecereNameSpace__ecere__sys__BTNode->Destructor ? __ecereClass___ecereNameSpace__ecere__sys__BTNode->Destructor(type) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(type)) : 0), type = 0);
1162 }
1163
1164 void __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1165
1166 void FreeContext(struct Context * context)
1167 {
1168 struct Symbol * symbol;
1169
1170 while(symbol = (struct Symbol *)context->types.root)
1171 {
1172 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&context->types, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol);
1173 FreeSymbol(symbol);
1174 }
1175 while(symbol = (struct Symbol *)context->classes.root)
1176 {
1177 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&context->classes, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol);
1178 FreeSymbol(symbol);
1179 }
1180 while(symbol = (struct Symbol *)context->symbols.root)
1181 {
1182 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&context->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol);
1183 FreeSymbol(symbol);
1184 }
1185 while(symbol = (struct Symbol *)context->structSymbols.root)
1186 {
1187 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&context->structSymbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol);
1188 FreeSymbol(symbol);
1189 }
1190 while(symbol = (struct Symbol *)context->templateTypes.root)
1191 {
1192 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&context->templateTypes, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol);
1193 FreeTemplateType((struct TemplatedType *)symbol);
1194 }
1195 context->nextID = 0;
1196 context->simpleID = 0;
1197 context->parent = (((void *)0));
1198 }
1199
1200 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Enumerator;
1201
1202 struct Enumerator
1203 {
1204 struct Enumerator * prev;
1205 struct Enumerator * next;
1206 struct Location loc;
1207 struct Identifier * id;
1208 struct Expression * exp;
1209 };
1210
1211 void FreeEnumerator(struct Enumerator * enumerator)
1212 {
1213 if(enumerator->id)
1214 FreeIdentifier(enumerator->id);
1215 if(enumerator->exp)
1216 FreeExpression(enumerator->exp);
1217 ((enumerator ? (__ecereClass_Enumerator->Destructor ? __ecereClass_Enumerator->Destructor(enumerator) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(enumerator)) : 0), enumerator = 0);
1218 }
1219
1220 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassFunction;
1221
1222 struct ClassFunction
1223 {
1224 struct ClassFunction * prev;
1225 struct ClassFunction * next;
1226 struct Location loc;
1227 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
1228 struct Declarator * declarator;
1229 struct __ecereNameSpace__ecere__sys__OldList *  declarations;
1230 struct Statement * body;
1231 struct __ecereNameSpace__ecere__com__Class * _class;
1232 struct __ecereNameSpace__ecere__sys__OldList attached;
1233 int declMode;
1234 struct Type * type;
1235 struct Symbol * propSet;
1236 unsigned int isVirtual;
1237 unsigned int isConstructor;
1238 unsigned int isDestructor;
1239 unsigned int dontMangle;
1240 int id;
1241 int idCode;
1242 };
1243
1244 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyDef;
1245
1246 struct PropertyDef
1247 {
1248 struct PropertyDef * prev;
1249 struct PropertyDef * next;
1250 struct Location loc;
1251 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
1252 struct Declarator * declarator;
1253 struct Identifier * id;
1254 struct Statement * getStmt;
1255 struct Statement * setStmt;
1256 struct Statement * issetStmt;
1257 struct Symbol * symbol;
1258 unsigned int conversion;
1259 unsigned int isWatchable;
1260 char *  category;
1261 };
1262
1263 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyWatch;
1264
1265 struct PropertyWatch
1266 {
1267 struct PropertyWatch * prev;
1268 struct PropertyWatch * next;
1269 struct Location loc;
1270 struct Statement * compound;
1271 struct __ecereNameSpace__ecere__sys__OldList *  properties;
1272 unsigned int deleteWatch;
1273 };
1274
1275 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDef;
1276
1277 struct ClassDef
1278 {
1279 struct ClassDef * prev;
1280 struct ClassDef * next;
1281 struct Location loc;
1282 int type;
1283 union
1284 {
1285 struct Declaration * decl;
1286 struct ClassFunction * function;
1287 struct __ecereNameSpace__ecere__sys__OldList *  defProperties;
1288 struct PropertyDef * propertyDef;
1289 struct PropertyWatch * propertyWatch;
1290 char *  designer;
1291 struct Identifier * defaultProperty;
1292 struct
1293 {
1294 struct Identifier * id;
1295 struct Initializer * initializer;
1296 };
1297 };
1298 int memberAccess;
1299 void *  object;
1300 };
1301
1302 void FreeClassDef(struct ClassDef * def);
1303
1304 void FreeSpecifier(struct Specifier * spec)
1305 {
1306 if(spec)
1307 {
1308 switch(spec->type)
1309 {
1310 case 1:
1311 case 5:
1312 (__ecereNameSpace__ecere__com__eSystem_Delete(spec->name), spec->name = 0);
1313 if(spec->templateArgs)
1314 {
1315 FreeList(spec->templateArgs, FreeTemplateArgument);
1316 }
1317 break;
1318 case 2:
1319 if(spec->id)
1320 FreeIdentifier(spec->id);
1321 if(spec->list)
1322 FreeList(spec->list, FreeEnumerator);
1323 if(spec->definitions)
1324 FreeList(spec->definitions, FreeClassDef);
1325 break;
1326 case 3:
1327 case 4:
1328 if(spec->id)
1329 FreeIdentifier(spec->id);
1330 if(spec->definitions)
1331 FreeList(spec->definitions, FreeClassDef);
1332 if(spec->baseSpecs)
1333 FreeList(spec->baseSpecs, FreeSpecifier);
1334 if(spec->ctx)
1335 {
1336 FreeContext(spec->ctx);
1337 ((spec->ctx ? (__ecereClass_Context->Destructor ? __ecereClass_Context->Destructor(spec->ctx) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(spec->ctx)) : 0), spec->ctx = 0);
1338 }
1339 break;
1340 case 7:
1341 if(spec->_class)
1342 FreeSpecifier(spec->_class);
1343 break;
1344 }
1345 ((spec ? (__ecereClass_Specifier->Destructor ? __ecereClass_Specifier->Destructor(spec) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(spec)) : 0), spec = 0);
1346 }
1347 }
1348
1349 void FreeIdentifier(struct Identifier * id)
1350 {
1351 if(id->badID)
1352 FreeIdentifier(id->badID);
1353 (__ecereNameSpace__ecere__com__eSystem_Delete(id->string), id->string = 0);
1354 if(id->_class)
1355 FreeSpecifier(id->_class);
1356 ((id ? (__ecereClass_Identifier->Destructor ? __ecereClass_Identifier->Destructor(id) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(id)) : 0), id = 0);
1357 }
1358
1359 void FreeTypeName(struct TypeName * typeName)
1360 {
1361 if(typeName->qualifiers)
1362 FreeList(typeName->qualifiers, FreeSpecifier);
1363 if(typeName->declarator)
1364 FreeDeclarator(typeName->declarator);
1365 if(typeName->bitCount)
1366 FreeExpression(typeName->bitCount);
1367 ((typeName ? (__ecereClass_TypeName->Destructor ? __ecereClass_TypeName->Destructor(typeName) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(typeName)) : 0), typeName = 0);
1368 }
1369
1370 static void _FreeExpression(struct Expression * exp, unsigned int freePointer);
1371
1372 void FreeExpContents(struct Expression * exp)
1373 {
1374 _FreeExpression(exp, 0x0);
1375 }
1376
1377 void FreeExpression(struct Expression * exp)
1378 {
1379 _FreeExpression(exp, 0x1);
1380 }
1381
1382 void FreeInstance(struct Instantiation * inst);
1383
1384 void FreeStatement(struct Statement * stmt);
1385
1386 void FreeInitializer(struct Initializer * initializer);
1387
1388 static void _FreeExpression(struct Expression * exp, unsigned int freePointer)
1389 {
1390 switch(exp->type)
1391 {
1392 case 13:
1393 case 28:
1394 FreeExpression(exp->_new.size);
1395 FreeTypeName(exp->_new.typeName);
1396 break;
1397 case 14:
1398 case 29:
1399 FreeExpression(exp->_renew.exp);
1400 FreeExpression(exp->_renew.size);
1401 FreeTypeName(exp->_renew.typeName);
1402 break;
1403 case 2:
1404 (__ecereNameSpace__ecere__com__eSystem_Delete(exp->constant), exp->constant = 0);
1405 break;
1406 case 0:
1407 if(exp->identifier)
1408 FreeIdentifier(exp->identifier);
1409 break;
1410 case 1:
1411 if(exp->instance)
1412 FreeInstance(exp->instance);
1413 break;
1414 case 3:
1415 (__ecereNameSpace__ecere__com__eSystem_Delete(exp->string), exp->string = 0);
1416 break;
1417 case 4:
1418 if(exp->op.exp1)
1419 FreeExpression(exp->op.exp1);
1420 if(exp->op.exp2)
1421 FreeExpression(exp->op.exp2);
1422 break;
1423 case 5:
1424 {
1425 FreeList(exp->list, FreeExpression);
1426 break;
1427 }
1428 case 6:
1429 {
1430 if(exp->index.exp)
1431 FreeExpression(exp->index.exp);
1432 if(exp->index.index)
1433 FreeList(exp->index.index, FreeExpression);
1434 break;
1435 }
1436 case 7:
1437 {
1438 FreeExpression(exp->call.exp);
1439 if(exp->call.arguments)
1440 FreeList(exp->call.arguments, FreeExpression);
1441 break;
1442 }
1443 case 8:
1444 case 9:
1445 if(exp->member.exp)
1446 FreeExpression(exp->member.exp);
1447 if(exp->member.member)
1448 FreeIdentifier(exp->member.member);
1449 break;
1450 case 10:
1451 FreeTypeName(exp->_new.typeName);
1452 break;
1453 case 11:
1454 if(exp->cast.exp)
1455 FreeExpression(exp->cast.exp);
1456 FreeTypeName(exp->cast.typeName);
1457 break;
1458 case 12:
1459 {
1460 if(exp->cond.cond)
1461 FreeExpression(exp->cond.cond);
1462 if(exp->cond.exp)
1463 FreeList(exp->cond.exp, FreeExpression);
1464 if(exp->cond.elseExp)
1465 FreeExpression(exp->cond.elseExp);
1466 break;
1467 }
1468 case 25:
1469 {
1470 if(exp->compound)
1471 FreeStatement(exp->compound);
1472 break;
1473 }
1474 case 34:
1475 {
1476 if(exp->list)
1477 FreeList(exp->list, FreeExpression);
1478 break;
1479 }
1480 case 35:
1481 {
1482 if(exp->initializer.typeName)
1483 FreeTypeName(exp->initializer.typeName);
1484 if(exp->initializer.initializer)
1485 FreeInitializer(exp->initializer.initializer);
1486 break;
1487 }
1488 case 16:
1489 break;
1490 case 26:
1491 if(exp->_classExp.specifiers)
1492 FreeList(exp->_classExp.specifiers, FreeSpecifier);
1493 if(exp->_classExp.decl)
1494 FreeDeclarator(exp->_classExp.decl);
1495 break;
1496 case 31:
1497 case 33:
1498 case 32:
1499 if(exp->db.id)
1500 FreeIdentifier(exp->db.id);
1501 (__ecereNameSpace__ecere__com__eSystem_Delete(exp->db.table), exp->db.table = 0);
1502 break;
1503 case 30:
1504 if(exp->dbopen.ds)
1505 FreeExpression(exp->dbopen.ds);
1506 if(exp->dbopen.name)
1507 FreeExpression(exp->dbopen.name);
1508 break;
1509 case 36:
1510 if(exp->vaArg.exp)
1511 FreeExpression(exp->vaArg.exp);
1512 if(exp->vaArg.typeName)
1513 FreeTypeName(exp->vaArg.typeName);
1514 break;
1515 case 37:
1516 if(exp->list)
1517 FreeList(exp->list, FreeExpression);
1518 break;
1519 case 15:
1520 if(exp->_class)
1521 FreeSpecifier(exp->_class);
1522 break;
1523 }
1524 if(freePointer)
1525 {
1526 if(exp->expType)
1527 FreeType(exp->expType);
1528 if(exp->destType)
1529 FreeType(exp->destType);
1530 ((exp ? (__ecereClass_Expression->Destructor ? __ecereClass_Expression->Destructor(exp) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(exp)) : 0), exp = 0);
1531 }
1532 }
1533
1534 void FreePointer(struct Pointer * pointer)
1535 {
1536 if(pointer->pointer)
1537 FreePointer(pointer->pointer);
1538 if(pointer->qualifiers)
1539 FreeList(pointer->qualifiers, FreeSpecifier);
1540 ((pointer ? (__ecereClass_Pointer->Destructor ? __ecereClass_Pointer->Destructor(pointer) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(pointer)) : 0), pointer = 0);
1541 }
1542
1543 void FreeDeclarator(struct Declarator * decl)
1544 {
1545 if(decl->declarator)
1546 FreeDeclarator(decl->declarator);
1547 switch(decl->type)
1548 {
1549 case 0:
1550 if(decl->structDecl.exp)
1551 FreeExpression(decl->structDecl.exp);
1552 if(decl->structDecl.posExp)
1553 FreeExpression(decl->structDecl.posExp);
1554 (__ecereNameSpace__ecere__com__eSystem_Delete(decl->structDecl.attrib), decl->structDecl.attrib = 0);
1555 break;
1556 case 1:
1557 FreeIdentifier(decl->identifier);
1558 break;
1559 case 2:
1560 break;
1561 case 3:
1562 if(decl->array.exp)
1563 FreeExpression(decl->array.exp);
1564 if(decl->array.enumClass)
1565 FreeSpecifier(decl->array.enumClass);
1566 break;
1567 case 4:
1568 FreeList(decl->function.parameters, FreeTypeName);
1569 break;
1570 case 5:
1571 if(decl->pointer.pointer)
1572 FreePointer(decl->pointer.pointer);
1573 break;
1574 case 6:
1575 case 7:
1576 (__ecereNameSpace__ecere__com__eSystem_Delete(decl->extended.extended), decl->extended.extended = 0);
1577 break;
1578 }
1579 ((decl ? (__ecereClass_Declarator->Destructor ? __ecereClass_Declarator->Destructor(decl) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(decl)) : 0), decl = 0);
1580 }
1581
1582 void FreePropertyWatch(struct PropertyWatch * watcher)
1583 {
1584 if(watcher->properties)
1585 FreeList(watcher->properties, FreeIdentifier);
1586 if(watcher->compound)
1587 FreeStatement(watcher->compound);
1588 ((watcher ? (__ecereClass_PropertyWatch->Destructor ? __ecereClass_PropertyWatch->Destructor(watcher) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(watcher)) : 0), watcher = 0);
1589 }
1590
1591 void FreeDeclaration(struct Declaration * decl);
1592
1593 void FreeStatement(struct Statement * stmt)
1594 {
1595 switch(stmt->type)
1596 {
1597 case 0:
1598 if(stmt->labeled.stmt)
1599 FreeStatement(stmt->labeled.stmt);
1600 break;
1601 case 1:
1602 if(stmt->caseStmt.exp)
1603 FreeExpression(stmt->caseStmt.exp);
1604 if(stmt->caseStmt.stmt)
1605 FreeStatement(stmt->caseStmt.stmt);
1606 break;
1607 case 14:
1608 FreeDeclaration(stmt->decl);
1609 break;
1610 case 2:
1611 {
1612 if(stmt->compound.declarations)
1613 FreeList(stmt->compound.declarations, FreeDeclaration);
1614 if(stmt->compound.statements)
1615 FreeList(stmt->compound.statements, FreeStatement);
1616 if(stmt->compound.context)
1617 {
1618 FreeContext(stmt->compound.context);
1619 ((stmt->compound.context ? (__ecereClass_Context->Destructor ? __ecereClass_Context->Destructor(stmt->compound.context) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(stmt->compound.context)) : 0), stmt->compound.context = 0);
1620 }
1621 break;
1622 }
1623 case 3:
1624 {
1625 if(stmt->expressions)
1626 FreeList(stmt->expressions, FreeExpression);
1627 break;
1628 }
1629 case 4:
1630 {
1631 if(stmt->ifStmt.exp)
1632 FreeList(stmt->ifStmt.exp, FreeExpression);
1633 if(stmt->ifStmt.stmt)
1634 FreeStatement(stmt->ifStmt.stmt);
1635 if(stmt->ifStmt.elseStmt)
1636 FreeStatement(stmt->ifStmt.elseStmt);
1637 break;
1638 }
1639 case 5:
1640 {
1641 if(stmt->switchStmt.exp)
1642 FreeList(stmt->switchStmt.exp, FreeExpression);
1643 if(stmt->switchStmt.stmt)
1644 FreeStatement(stmt->switchStmt.stmt);
1645 break;
1646 }
1647 case 6:
1648 {
1649 if(stmt->whileStmt.exp)
1650 FreeList(stmt->whileStmt.exp, FreeExpression);
1651 if(stmt->whileStmt.stmt)
1652 FreeStatement(stmt->whileStmt.stmt);
1653 break;
1654 }
1655 case 7:
1656 {
1657 if(stmt->doWhile.stmt)
1658 FreeStatement(stmt->doWhile.stmt);
1659 if(stmt->doWhile.exp)
1660 FreeList(stmt->doWhile.exp, FreeExpression);
1661 break;
1662 }
1663 case 8:
1664 {
1665 if(stmt->forStmt.init)
1666 FreeStatement(stmt->forStmt.init);
1667 if(stmt->forStmt.check)
1668 FreeStatement(stmt->forStmt.check);
1669 if(stmt->forStmt.increment)
1670 FreeList(stmt->forStmt.increment, FreeExpression);
1671 if(stmt->forStmt.stmt)
1672 FreeStatement(stmt->forStmt.stmt);
1673 break;
1674 }
1675 case 18:
1676 {
1677 if(stmt->forEachStmt.id)
1678 FreeIdentifier(stmt->forEachStmt.id);
1679 if(stmt->forEachStmt.exp)
1680 FreeList(stmt->forEachStmt.exp, FreeExpression);
1681 if(stmt->forEachStmt.filter)
1682 FreeList(stmt->forEachStmt.filter, FreeExpression);
1683 if(stmt->forEachStmt.stmt)
1684 FreeStatement(stmt->forEachStmt.stmt);
1685 break;
1686 }
1687 case 9:
1688 break;
1689 case 10:
1690 break;
1691 case 11:
1692 break;
1693 case 12:
1694 if(stmt->expressions)
1695 FreeList(stmt->expressions, FreeExpression);
1696 break;
1697 case 17:
1698 case 15:
1699 case 16:
1700 {
1701 if(stmt->_watch.watcher)
1702 FreeExpression(stmt->_watch.watcher);
1703 if(stmt->_watch.object)
1704 FreeExpression(stmt->_watch.object);
1705 if(stmt->_watch.watches)
1706 FreeList(stmt->_watch.watches, (stmt->type == 17) ? FreePropertyWatch : FreeIdentifier);
1707 break;
1708 }
1709 }
1710 ((stmt ? (__ecereClass_Statement->Destructor ? __ecereClass_Statement->Destructor(stmt) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(stmt)) : 0), stmt = 0);
1711 }
1712
1713 void FreeInitializer(struct Initializer * initializer)
1714 {
1715 switch(initializer->type)
1716 {
1717 case 1:
1718 {
1719 FreeList(initializer->list, FreeInitializer);
1720 break;
1721 }
1722 case 0:
1723 if(initializer->exp)
1724 FreeExpression(initializer->exp);
1725 break;
1726 }
1727 ((initializer ? (__ecereClass_Initializer->Destructor ? __ecereClass_Initializer->Destructor(initializer) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(initializer)) : 0), initializer = 0);
1728 }
1729
1730 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_InitDeclarator;
1731
1732 struct InitDeclarator
1733 {
1734 struct InitDeclarator * prev;
1735 struct InitDeclarator * next;
1736 struct Location loc;
1737 struct Declarator * declarator;
1738 struct Initializer * initializer;
1739 };
1740
1741 void FreeInitDeclarator(struct InitDeclarator * decl)
1742 {
1743 if(decl->declarator)
1744 FreeDeclarator(decl->declarator);
1745 if(decl->initializer)
1746 FreeInitializer(decl->initializer);
1747 ((decl ? (__ecereClass_InitDeclarator->Destructor ? __ecereClass_InitDeclarator->Destructor(decl) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(decl)) : 0), decl = 0);
1748 }
1749
1750 void FreeDeclaration(struct Declaration * decl)
1751 {
1752 if(decl->symbol && !decl->symbol->type)
1753 {
1754 }
1755 switch(decl->type)
1756 {
1757 case 0:
1758 {
1759 if(decl->specifiers)
1760 FreeList(decl->specifiers, FreeSpecifier);
1761 if(decl->declarators)
1762 FreeList(decl->declarators, FreeDeclarator);
1763 if(decl->extStorage)
1764 FreeSpecifier(decl->extStorage);
1765 break;
1766 }
1767 case 1:
1768 {
1769 if(decl->specifiers)
1770 FreeList(decl->specifiers, FreeSpecifier);
1771 if(decl->declarators)
1772 FreeList(decl->declarators, FreeInitDeclarator);
1773 break;
1774 }
1775 case 2:
1776 if(decl->inst)
1777 FreeInstance(decl->inst);
1778 break;
1779 case 3:
1780 {
1781 if(decl->exp)
1782 FreeExpression(decl->exp);
1783 if(decl->id)
1784 FreeIdentifier(decl->id);
1785 break;
1786 }
1787 }
1788 ((decl ? (__ecereClass_Declaration->Destructor ? __ecereClass_Declaration->Destructor(decl) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(decl)) : 0), decl = 0);
1789 }
1790
1791 void FreeFunction(struct FunctionDefinition * func)
1792 {
1793 if(func->body)
1794 FreeStatement(func->body);
1795 if(func->declarator)
1796 FreeDeclarator(func->declarator);
1797 if(func->specifiers)
1798 FreeList(func->specifiers, FreeSpecifier);
1799 if(func->declarations)
1800 FreeList(func->declarations, FreeDeclaration);
1801 if(func->type)
1802 FreeType(func->type);
1803 ((func ? (__ecereClass_FunctionDefinition->Destructor ? __ecereClass_FunctionDefinition->Destructor(func) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(func)) : 0), func = 0);
1804 }
1805
1806 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MemberInit;
1807
1808 struct MemberInit
1809 {
1810 struct MemberInit * prev;
1811 struct MemberInit * next;
1812 struct Location loc;
1813 struct Location realLoc;
1814 struct __ecereNameSpace__ecere__sys__OldList *  identifiers;
1815 struct Initializer * initializer;
1816 unsigned int used;
1817 unsigned int variable;
1818 unsigned int takeOutExp;
1819 };
1820
1821 void FreeMemberInit(struct MemberInit * init)
1822 {
1823 if(init->initializer)
1824 FreeInitializer(init->initializer);
1825 if(init->identifiers)
1826 FreeList(init->identifiers, FreeIdentifier);
1827 ((init ? (__ecereClass_MemberInit->Destructor ? __ecereClass_MemberInit->Destructor(init) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(init)) : 0), init = 0);
1828 }
1829
1830 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MembersInit;
1831
1832 struct MembersInit
1833 {
1834 struct MembersInit * prev;
1835 struct MembersInit * next;
1836 struct Location loc;
1837 int type;
1838 union
1839 {
1840 struct __ecereNameSpace__ecere__sys__OldList *  dataMembers;
1841 struct ClassFunction * function;
1842 };
1843 };
1844
1845 void FreeClassFunction(struct ClassFunction * func);
1846
1847 void FreeMembersInit(struct MembersInit * init)
1848 {
1849 if(init->type == 0 && init->dataMembers)
1850 FreeList(init->dataMembers, FreeMemberInit);
1851 if(init->type == 1 && init->function)
1852 {
1853 FreeClassFunction(init->function);
1854 }
1855 ((init ? (__ecereClass_MembersInit->Destructor ? __ecereClass_MembersInit->Destructor(init) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(init)) : 0), init = 0);
1856 }
1857
1858 extern struct Symbol * FindClass(char *  name);
1859
1860 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
1861
1862 void FreeInstance(struct Instantiation * inst)
1863 {
1864 if(inst->members)
1865 {
1866 FreeList(inst->members, FreeMembersInit);
1867 }
1868 if(inst->exp)
1869 FreeExpression(inst->exp);
1870 if(inst->data)
1871 {
1872 struct Symbol * classSym = FindClass(inst->_class->name);
1873 struct __ecereNameSpace__ecere__com__Class * _class = classSym ? classSym->registered : (((void *)0));
1874
1875 if(_class)
1876 {
1877 if(_class->type == 0)
1878 {
1879 struct __ecereNameSpace__ecere__com__Instance * instance = (struct __ecereNameSpace__ecere__com__Instance *)inst->data;
1880
1881 (__ecereNameSpace__ecere__com__eInstance_DecRef(instance), instance = 0);
1882 }
1883 else if(_class->type == 5)
1884 {
1885 if(_class->Destructor)
1886 _class->Destructor((struct __ecereNameSpace__ecere__com__Instance *)inst->data);
1887 (__ecereNameSpace__ecere__com__eSystem_Delete(inst->data), inst->data = 0);
1888 }
1889 else if(_class->type == 1)
1890 {
1891 (__ecereNameSpace__ecere__com__eSystem_Delete(inst->data), inst->data = 0);
1892 }
1893 }
1894 else
1895 {
1896 struct __ecereNameSpace__ecere__com__Instance * instance = (struct __ecereNameSpace__ecere__com__Instance *)inst->data;
1897
1898 (__ecereNameSpace__ecere__com__eInstance_DecRef(instance), instance = 0);
1899 }
1900 }
1901 if(inst->_class)
1902 FreeSpecifier(inst->_class);
1903 ((inst ? (__ecereClass_Instantiation->Destructor ? __ecereClass_Instantiation->Destructor(inst) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(inst)) : 0), inst = 0);
1904 }
1905
1906 void FreeClassFunction(struct ClassFunction * func)
1907 {
1908 if(func->declarator && func->declarator->symbol)
1909 {
1910 }
1911 if(func->type)
1912 FreeType(func->type);
1913 if(func->body)
1914 FreeStatement(func->body);
1915 if(func->declarator)
1916 FreeDeclarator(func->declarator);
1917 if(func->specifiers)
1918 FreeList(func->specifiers, FreeSpecifier);
1919 if(func->declarations)
1920 FreeList(func->declarations, FreeDeclaration);
1921 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&func->attached, (((void *)0)));
1922 ((func ? (__ecereClass_ClassFunction->Destructor ? __ecereClass_ClassFunction->Destructor(func) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(func)) : 0), func = 0);
1923 }
1924
1925 void FreeProperty(struct PropertyDef * def)
1926 {
1927 if(def->specifiers)
1928 FreeList(def->specifiers, FreeSpecifier);
1929 if(def->declarator)
1930 FreeDeclarator(def->declarator);
1931 if(def->id)
1932 FreeIdentifier(def->id);
1933 if(def->getStmt)
1934 FreeStatement(def->getStmt);
1935 if(def->setStmt)
1936 FreeStatement(def->setStmt);
1937 if(def->issetStmt)
1938 FreeStatement(def->issetStmt);
1939 if(def->symbol)
1940 {
1941 }
1942 ((def ? (__ecereClass_PropertyDef->Destructor ? __ecereClass_PropertyDef->Destructor(def) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(def)) : 0), def = 0);
1943 }
1944
1945 void FreeClassDef(struct ClassDef * def)
1946 {
1947 switch(def->type)
1948 {
1949 case 2:
1950 if(def->decl)
1951 FreeDeclaration(def->decl);
1952 break;
1953 case 1:
1954 {
1955 FreeList(def->defProperties, FreeMemberInit);
1956 break;
1957 }
1958 case 0:
1959 if(def->function)
1960 FreeClassFunction(def->function);
1961 break;
1962 case 3:
1963 if(def->propertyDef)
1964 FreeProperty(def->propertyDef);
1965 break;
1966 case 10:
1967 if(def->propertyDef)
1968 FreeProperty(def->propertyDef);
1969 break;
1970 case 13:
1971 break;
1972 case 9:
1973 break;
1974 case 5:
1975 break;
1976 case 7:
1977 break;
1978 case 6:
1979 break;
1980 case 11:
1981 if(def->id)
1982 FreeIdentifier(def->id);
1983 if(def->initializer)
1984 FreeInitializer(def->initializer);
1985 break;
1986 case 8:
1987 break;
1988 case 12:
1989 break;
1990 case 4:
1991 break;
1992 }
1993 ((def ? (__ecereClass_ClassDef->Destructor ? __ecereClass_ClassDef->Destructor(def) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(def)) : 0), def = 0);
1994 }
1995
1996 void FreeClass(struct ClassDefinition * _class)
1997 {
1998 if(_class->definitions)
1999 FreeList(_class->definitions, FreeClassDef);
2000 if(_class->_class)
2001 FreeSpecifier(_class->_class);
2002 if(_class->baseSpecs)
2003 FreeList(_class->baseSpecs, FreeSpecifier);
2004 ((_class ? (__ecereClass_ClassDefinition->Destructor ? __ecereClass_ClassDefinition->Destructor(_class) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(_class)) : 0), _class = 0);
2005 }
2006
2007 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBIndexItem;
2008
2009 struct DBIndexItem
2010 {
2011 struct DBIndexItem * prev;
2012 struct DBIndexItem * next;
2013 struct Identifier * id;
2014 int order;
2015 };
2016
2017 void FreeDBIndexItem(struct DBIndexItem * item)
2018 {
2019 if(item->id)
2020 FreeIdentifier(item->id);
2021 ((item ? (__ecereClass_DBIndexItem->Destructor ? __ecereClass_DBIndexItem->Destructor(item) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(item)) : 0), item = 0);
2022 }
2023
2024 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableEntry;
2025
2026 struct DBTableEntry
2027 {
2028 struct DBTableEntry * prev;
2029 struct DBTableEntry * next;
2030 int type;
2031 struct Identifier * id;
2032 union
2033 {
2034 struct
2035 {
2036 struct TypeName * dataType;
2037 char *  name;
2038 };
2039 struct __ecereNameSpace__ecere__sys__OldList *  items;
2040 };
2041 };
2042
2043 void FreeDBTableEntry(struct DBTableEntry * entry)
2044 {
2045 if(entry->id)
2046 FreeIdentifier(entry->id);
2047 switch(entry->type)
2048 {
2049 case 0:
2050 if(entry->dataType)
2051 FreeTypeName(entry->dataType);
2052 if(entry->name)
2053 (__ecereNameSpace__ecere__com__eSystem_Delete(entry->name), entry->name = 0);
2054 break;
2055 case 1:
2056 if(entry->items)
2057 FreeList(entry->items, FreeDBIndexItem);
2058 break;
2059 }
2060 ((entry ? (__ecereClass_DBTableEntry->Destructor ? __ecereClass_DBTableEntry->Destructor(entry) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(entry)) : 0), entry = 0);
2061 }
2062
2063 void FreeDBTable(struct DBTableDef * table)
2064 {
2065 if(table->definitions)
2066 FreeList(table->definitions, FreeDBTableEntry);
2067 if(table->name)
2068 (__ecereNameSpace__ecere__com__eSystem_Delete(table->name), table->name = 0);
2069 ((table ? (__ecereClass_DBTableDef->Destructor ? __ecereClass_DBTableDef->Destructor(table) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(table)) : 0), table = 0);
2070 }
2071
2072 void FreeExternal(struct External * external)
2073 {
2074 switch(external->type)
2075 {
2076 case 0:
2077 if(external->function)
2078 FreeFunction(external->function);
2079 break;
2080 case 1:
2081 if(external->declaration)
2082 FreeDeclaration(external->declaration);
2083 break;
2084 case 2:
2085 if(external->_class)
2086 FreeClass(external->_class);
2087 break;
2088 case 3:
2089 (__ecereNameSpace__ecere__com__eSystem_Delete(external->importString), external->importString = 0);
2090 break;
2091 case 4:
2092 FreeIdentifier(external->id);
2093 break;
2094 case 5:
2095 if(external->table)
2096 FreeDBTable(external->table);
2097 break;
2098 }
2099 ((external ? (__ecereClass_External->Destructor ? __ecereClass_External->Destructor(external) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(external)) : 0), external = 0);
2100 }
2101
2102 void FreeASTTree(struct __ecereNameSpace__ecere__sys__OldList * ast)
2103 {
2104 if(ast != (((void *)0)))
2105 {
2106 struct External * external;
2107
2108 while(external = ast->first)
2109 {
2110 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(ast, external);
2111 FreeExternal(external);
2112 }
2113 (__ecereNameSpace__ecere__com__eSystem_Delete(ast), ast = 0);
2114 }
2115 }
2116
2117 static void FreeDataMember(struct __ecereNameSpace__ecere__com__DataMember * parentMember)
2118 {
2119 struct __ecereNameSpace__ecere__com__DataMember * dataMember;
2120
2121 for(dataMember = parentMember->members.first; dataMember; dataMember = dataMember->next)
2122 {
2123 if(dataMember->type == 2 || dataMember->type == 1)
2124 FreeDataMember(dataMember);
2125 if(dataMember->dataType)
2126 {
2127 FreeType(dataMember->dataType);
2128 dataMember->dataType = (((void *)0));
2129 }
2130 }
2131 }
2132
2133 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__NameSpace;
2134
2135 struct __ecereNameSpace__ecere__com__NameSpace
2136 {
2137 char *  name;
2138 struct __ecereNameSpace__ecere__com__NameSpace *  btParent;
2139 struct __ecereNameSpace__ecere__com__NameSpace *  left;
2140 struct __ecereNameSpace__ecere__com__NameSpace *  right;
2141 int depth;
2142 struct __ecereNameSpace__ecere__com__NameSpace *  parent;
2143 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
2144 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
2145 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
2146 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
2147 };
2148
2149 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
2150
2151 struct __ecereNameSpace__ecere__com__Module
2152 {
2153 struct __ecereNameSpace__ecere__com__Instance * application;
2154 struct __ecereNameSpace__ecere__sys__OldList classes;
2155 struct __ecereNameSpace__ecere__sys__OldList defines;
2156 struct __ecereNameSpace__ecere__sys__OldList functions;
2157 struct __ecereNameSpace__ecere__sys__OldList modules;
2158 struct __ecereNameSpace__ecere__com__Instance * prev;
2159 struct __ecereNameSpace__ecere__com__Instance * next;
2160 char *  name;
2161 void *  library;
2162 void *  Unload;
2163 int importType;
2164 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
2165 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
2166 };
2167
2168 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateParameter;
2169
2170 struct __ecereNameSpace__ecere__com__ClassTemplateParameter
2171 {
2172 struct __ecereNameSpace__ecere__com__ClassTemplateParameter * prev;
2173 struct __ecereNameSpace__ecere__com__ClassTemplateParameter * next;
2174 char *  name;
2175 int type;
2176 union
2177 {
2178 char *  dataTypeString;
2179 int memberType;
2180 };
2181 struct __ecereNameSpace__ecere__com__ClassTemplateArgument defaultArg;
2182 void *  param;
2183 char __ecere_padding[4];
2184 };
2185
2186 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
2187
2188 struct __ecereNameSpace__ecere__com__GlobalFunction
2189 {
2190 struct __ecereNameSpace__ecere__com__GlobalFunction * prev;
2191 struct __ecereNameSpace__ecere__com__GlobalFunction * next;
2192 char *  name;
2193 int (*  function)();
2194 struct __ecereNameSpace__ecere__com__Instance * module;
2195 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
2196 char *  dataTypeString;
2197 struct Type * dataType;
2198 void *  symbol;
2199 };
2200
2201 struct __ecereNameSpace__ecere__sys__BTNode * __ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(struct __ecereNameSpace__ecere__sys__BinaryTree * this);
2202
2203 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__sys__BinaryTree_first;
2204
2205 struct __ecereNameSpace__ecere__sys__BTNode * __ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(struct __ecereNameSpace__ecere__sys__BTNode * this);
2206
2207 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__sys__BTNode_next;
2208
2209 void FreeModuleData(struct __ecereNameSpace__ecere__com__Instance * module)
2210 {
2211 struct __ecereNameSpace__ecere__com__Class * _class;
2212 struct __ecereNameSpace__ecere__com__GlobalFunction * function;
2213
2214 for(_class = ((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + 12)))->classes.first; _class; _class = _class->next)
2215 {
2216 struct __ecereNameSpace__ecere__com__DataMember * dataMember;
2217 struct __ecereNameSpace__ecere__com__Method * method;
2218 struct __ecereNameSpace__ecere__com__ClassTemplateParameter * param;
2219
2220 if(_class->dataType)
2221 {
2222 FreeType(_class->dataType);
2223 _class->dataType = (((void *)0));
2224 }
2225 for(dataMember = _class->membersAndProperties.first; dataMember; dataMember = dataMember->next)
2226 {
2227 if(dataMember->isProperty)
2228 {
2229 struct __ecereNameSpace__ecere__com__Property * prop = (struct __ecereNameSpace__ecere__com__Property *)dataMember;
2230
2231 if(prop->symbol)
2232 {
2233 FreeSymbol(prop->symbol);
2234 }
2235 }
2236 else
2237 {
2238 if(dataMember->type == 2 || dataMember->type == 1)
2239 FreeDataMember(dataMember);
2240 }
2241 if(dataMember->dataType)
2242 {
2243 FreeType(dataMember->dataType);
2244 dataMember->dataType = (((void *)0));
2245 }
2246 }
2247 for(dataMember = _class->conversions.first; dataMember; dataMember = dataMember->next)
2248 {
2249 struct __ecereNameSpace__ecere__com__Property * prop = (struct __ecereNameSpace__ecere__com__Property *)dataMember;
2250
2251 if(prop->symbol)
2252 {
2253 FreeSymbol(prop->symbol);
2254 }
2255 if(prop->dataType)
2256 {
2257 FreeType(prop->dataType);
2258 prop->dataType = (((void *)0));
2259 }
2260 }
2261 for(method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods); method; method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)method)))
2262 {
2263 if(method->dataType)
2264 {
2265 FreeType(method->dataType);
2266 method->dataType = (((void *)0));
2267 }
2268 if(method->symbol)
2269 {
2270 FreeSymbol(method->symbol);
2271 }
2272 }
2273 for(param = _class->templateParams.first; param; param = param->next)
2274 {
2275 if(param->param)
2276 {
2277 FreeTemplateParameter(param->param);
2278 param->param = (((void *)0));
2279 }
2280 }
2281 }
2282 for(function = ((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + 12)))->functions.first; function; function = function->next)
2283 {
2284 if(function->dataType)
2285 FreeType(function->dataType);
2286 if(function->symbol)
2287 FreeSymbol(function->symbol);
2288 }
2289 }
2290
2291 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Application;
2292
2293 struct __ecereNameSpace__ecere__com__Application
2294 {
2295 int argc;
2296 char * *  argv;
2297 int exitCode;
2298 unsigned int isGUIApp;
2299 struct __ecereNameSpace__ecere__sys__OldList allModules;
2300 char *  parsedCommand;
2301 struct __ecereNameSpace__ecere__com__NameSpace systemNameSpace;
2302 };
2303
2304 void FreeTypeData(struct __ecereNameSpace__ecere__com__Instance * privateModule)
2305 {
2306 struct __ecereNameSpace__ecere__com__Instance * m;
2307
2308 for(m = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)((struct __ecereNameSpace__ecere__com__Module *)(((char *)privateModule + 12)))->application + 296)))->allModules.first; m; m = ((struct __ecereNameSpace__ecere__com__Module *)(((char *)m + 12)))->next)
2309 {
2310 FreeModuleData(m);
2311 }
2312 FreeModuleData(privateModule);
2313 }
2314
2315 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);
2316
2317 void __ecereRegisterModule_freeAst(struct __ecereNameSpace__ecere__com__Instance * module)
2318 {
2319 struct __ecereNameSpace__ecere__com__Class * class;
2320
2321 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeList", "void FreeList(ecere::sys::OldList list, void( *)(void *))", FreeList, module, 2);
2322 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeType", "void FreeType(Type type)", FreeType, module, 1);
2323 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeSymbol", "void FreeSymbol(Symbol symbol)", FreeSymbol, module, 2);
2324 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeMethodImport", "void FreeMethodImport(MethodImport imp)", FreeMethodImport, module, 2);
2325 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreePropertyImport", "void FreePropertyImport(MethodImport imp)", FreePropertyImport, module, 2);
2326 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeClassImport", "void FreeClassImport(ClassImport imp)", FreeClassImport, module, 2);
2327 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeFunctionImport", "void FreeFunctionImport(ClassImport imp)", FreeFunctionImport, module, 2);
2328 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeModuleImport", "void FreeModuleImport(ModuleImport imp)", FreeModuleImport, module, 1);
2329 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeModuleDefine", "void FreeModuleDefine(Definition def)", FreeModuleDefine, module, 1);
2330 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeExcludedSymbols", "void FreeExcludedSymbols(ecere::sys::OldList excludedSymbols)", FreeExcludedSymbols, module, 1);
2331 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeTemplateArgument", "void FreeTemplateArgument(TemplateArgument arg)", FreeTemplateArgument, module, 1);
2332 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeTemplateDataType", "void FreeTemplateDataType(TemplateDatatype type)", FreeTemplateDataType, module, 1);
2333 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeTemplateParameter", "void FreeTemplateParameter(TemplateParameter param)", FreeTemplateParameter, module, 1);
2334 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeTemplateType", "void FreeTemplateType(TemplatedType type)", FreeTemplateType, module, 1);
2335 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeContext", "void FreeContext(Context context)", FreeContext, module, 1);
2336 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeEnumerator", "void FreeEnumerator(Enumerator enumerator)", FreeEnumerator, module, 2);
2337 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeSpecifier", "void FreeSpecifier(Specifier spec)", FreeSpecifier, module, 2);
2338 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeIdentifier", "void FreeIdentifier(Identifier id)", FreeIdentifier, module, 1);
2339 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeTypeName", "void FreeTypeName(TypeName typeName)", FreeTypeName, module, 2);
2340 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeExpContents", "void FreeExpContents(Expression exp)", FreeExpContents, module, 1);
2341 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeExpression", "void FreeExpression(Expression exp)", FreeExpression, module, 1);
2342 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreePointer", "void FreePointer(Pointer pointer)", FreePointer, module, 2);
2343 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeDeclarator", "void FreeDeclarator(Declarator decl)", FreeDeclarator, module, 2);
2344 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreePropertyWatch", "void FreePropertyWatch(PropertyWatch watcher)", FreePropertyWatch, module, 2);
2345 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeStatement", "void FreeStatement(Statement stmt)", FreeStatement, module, 2);
2346 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeInitializer", "void FreeInitializer(Initializer initializer)", FreeInitializer, module, 2);
2347 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeInitDeclarator", "void FreeInitDeclarator(InitDeclarator decl)", FreeInitDeclarator, module, 2);
2348 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeDeclaration", "void FreeDeclaration(Declaration decl)", FreeDeclaration, module, 2);
2349 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeFunction", "void FreeFunction(FunctionDefinition func)", FreeFunction, module, 2);
2350 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeMemberInit", "void FreeMemberInit(MemberInit init)", FreeMemberInit, module, 2);
2351 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeMembersInit", "void FreeMembersInit(MembersInit init)", FreeMembersInit, module, 2);
2352 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeInstance", "void FreeInstance(Instantiation inst)", FreeInstance, module, 2);
2353 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeClassFunction", "void FreeClassFunction(ClassFunction func)", FreeClassFunction, module, 1);
2354 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeProperty", "void FreeProperty(PropertyDef def)", FreeProperty, module, 2);
2355 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeClassDef", "void FreeClassDef(ClassDef def)", FreeClassDef, module, 2);
2356 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeClass", "void FreeClass(ClassDefinition _class)", FreeClass, module, 2);
2357 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeDBIndexItem", "void FreeDBIndexItem(DBIndexItem item)", FreeDBIndexItem, module, 2);
2358 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeDBTableEntry", "void FreeDBTableEntry(DBTableEntry entry)", FreeDBTableEntry, module, 2);
2359 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeDBTable", "void FreeDBTable(DBTableDef table)", FreeDBTable, module, 2);
2360 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeExternal", "void FreeExternal(External external)", FreeExternal, module, 2);
2361 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeASTTree", "void FreeASTTree(ecere::sys::OldList ast)", FreeASTTree, module, 1);
2362 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeModuleData", "void FreeModuleData(ecere::com::Module module)", FreeModuleData, module, 2);
2363 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeTypeData", "void FreeTypeData(ecere::com::Module privateModule)", FreeTypeData, module, 1);
2364 }
2365
2366 void __ecereUnregisterModule_freeAst(struct __ecereNameSpace__ecere__com__Instance * module)
2367 {
2368
2369 }
2370