The Ecere SDK - sdk/blob - compiler/bootstrap/libec/bootstrap/ast.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 unsigned int hasNameSpace;
 148 };
 149
 150 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
 151
 152 struct Instantiation
 153 {
 154 struct Instantiation * prev;
 155 struct Instantiation * next;
 156 struct Location loc;
 157 struct Specifier * _class;
 158 struct Expression * exp;
 159 struct __ecereNameSpace__ecere__sys__OldList *  members;
 160 struct Symbol * symbol;
 161 unsigned int fullSet;
 162 unsigned int isConstant;
 163 unsigned char *  data;
 164 struct Location nameLoc;
 165 struct Location insideLoc;
 166 unsigned int built;
 167 };
 168
 169 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
 170
 171 struct Declaration
 172 {
 173 struct Declaration * prev;
 174 struct Declaration * next;
 175 struct Location loc;
 176 int type;
 177 union
 178 {
 179 struct
 180 {
 181 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 182 struct __ecereNameSpace__ecere__sys__OldList *  declarators;
 183 };
 184 struct Instantiation * inst;
 185 struct
 186 {
 187 struct Identifier * id;
 188 struct Expression * exp;
 189 };
 190 };
 191 struct Specifier * extStorage;
 192 struct Symbol * symbol;
 193 int declMode;
 194 };
 195
 196 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
 197
 198 struct Statement
 199 {
 200 struct Statement * prev;
 201 struct Statement * next;
 202 struct Location loc;
 203 int type;
 204 union
 205 {
 206 struct __ecereNameSpace__ecere__sys__OldList *  expressions;
 207 struct
 208 {
 209 struct Identifier * id;
 210 struct Statement * stmt;
 211 } labeled;
 212 struct
 213 {
 214 struct Expression * exp;
 215 struct Statement * stmt;
 216 } caseStmt;
 217 struct
 218 {
 219 struct __ecereNameSpace__ecere__sys__OldList * declarations;
 220 struct __ecereNameSpace__ecere__sys__OldList * statements;
 221 struct Context * context;
 222 unsigned int isSwitch;
 223 } compound;
 224 struct
 225 {
 226 struct __ecereNameSpace__ecere__sys__OldList * exp;
 227 struct Statement * stmt;
 228 struct Statement * elseStmt;
 229 } ifStmt;
 230 struct
 231 {
 232 struct __ecereNameSpace__ecere__sys__OldList * exp;
 233 struct Statement * stmt;
 234 } switchStmt;
 235 struct
 236 {
 237 struct __ecereNameSpace__ecere__sys__OldList * exp;
 238 struct Statement * stmt;
 239 } whileStmt;
 240 struct
 241 {
 242 struct __ecereNameSpace__ecere__sys__OldList * exp;
 243 struct Statement * stmt;
 244 } doWhile;
 245 struct
 246 {
 247 struct Statement * init;
 248 struct Statement * check;
 249 struct __ecereNameSpace__ecere__sys__OldList * increment;
 250 struct Statement * stmt;
 251 } forStmt;
 252 struct
 253 {
 254 struct Identifier * id;
 255 } gotoStmt;
 256 struct
 257 {
 258 struct Specifier * spec;
 259 char * statements;
 260 struct __ecereNameSpace__ecere__sys__OldList * inputFields;
 261 struct __ecereNameSpace__ecere__sys__OldList * outputFields;
 262 struct __ecereNameSpace__ecere__sys__OldList * clobberedFields;
 263 } asmStmt;
 264 struct
 265 {
 266 struct Expression * watcher;
 267 struct Expression * object;
 268 struct __ecereNameSpace__ecere__sys__OldList * watches;
 269 } _watch;
 270 struct
 271 {
 272 struct Identifier * id;
 273 struct __ecereNameSpace__ecere__sys__OldList * exp;
 274 struct __ecereNameSpace__ecere__sys__OldList * filter;
 275 struct Statement * stmt;
 276 } forEachStmt;
 277 struct Declaration * decl;
 278 };
 279 };
 280
 281 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
 282
 283 struct TypeName
 284 {
 285 struct TypeName * prev;
 286 struct TypeName * next;
 287 struct Location loc;
 288 struct __ecereNameSpace__ecere__sys__OldList *  qualifiers;
 289 struct Declarator * declarator;
 290 int classObjectType;
 291 struct Expression * bitCount;
 292 };
 293
 294 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
 295
 296 struct Initializer
 297 {
 298 struct Initializer * prev;
 299 struct Initializer * next;
 300 struct Location loc;
 301 int type;
 302 union
 303 {
 304 struct Expression * exp;
 305 struct __ecereNameSpace__ecere__sys__OldList *  list;
 306 };
 307 unsigned int isConstant;
 308 };
 309
 310 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
 311
 312 struct __ecereNameSpace__ecere__com__DataValue
 313 {
 314 union
 315 {
 316 char c;
 317 unsigned char uc;
 318 short s;
 319 unsigned short us;
 320 int i;
 321 unsigned int ui;
 322 void *  p;
 323 float f;
 324 double d;
 325 long long i64;
 326 uint64 ui64;
 327 };
 328 };
 329
 330 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
 331
 332 struct Expression
 333 {
 334 struct Expression * prev;
 335 struct Expression * next;
 336 struct Location loc;
 337 int type;
 338 union
 339 {
 340 struct
 341 {
 342 char *  constant;
 343 struct Identifier * identifier;
 344 };
 345 struct Statement * compound;
 346 struct Instantiation * instance;
 347 char *  string;
 348 struct __ecereNameSpace__ecere__sys__OldList *  list;
 349 struct
 350 {
 351 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
 352 struct Declarator * decl;
 353 } _classExp;
 354 struct
 355 {
 356 struct Identifier * id;
 357 } classData;
 358 struct
 359 {
 360 struct Expression * exp;
 361 struct __ecereNameSpace__ecere__sys__OldList * arguments;
 362 struct Location argLoc;
 363 } call;
 364 struct
 365 {
 366 struct Expression * exp;
 367 struct __ecereNameSpace__ecere__sys__OldList * index;
 368 } index;
 369 struct
 370 {
 371 struct Expression * exp;
 372 struct Identifier * member;
 373 int memberType;
 374 unsigned int thisPtr;
 375 } member;
 376 struct
 377 {
 378 int op;
 379 struct Expression * exp1;
 380 struct Expression * exp2;
 381 } op;
 382 struct TypeName * typeName;
 383 struct Specifier * _class;
 384 struct
 385 {
 386 struct TypeName * typeName;
 387 struct Expression * exp;
 388 } cast;
 389 struct
 390 {
 391 struct Expression * cond;
 392 struct __ecereNameSpace__ecere__sys__OldList * exp;
 393 struct Expression * elseExp;
 394 } cond;
 395 struct
 396 {
 397 struct TypeName * typeName;
 398 struct Expression * size;
 399 } _new;
 400 struct
 401 {
 402 struct TypeName * typeName;
 403 struct Expression * size;
 404 struct Expression * exp;
 405 } _renew;
 406 struct
 407 {
 408 char * table;
 409 struct Identifier * id;
 410 } db;
 411 struct
 412 {
 413 struct Expression * ds;
 414 struct Expression * name;
 415 } dbopen;
 416 struct
 417 {
 418 struct TypeName * typeName;
 419 struct Initializer * initializer;
 420 } initializer;
 421 struct
 422 {
 423 struct Expression * exp;
 424 struct TypeName * typeName;
 425 } vaArg;
 426 };
 427 unsigned int debugValue;
 428 struct __ecereNameSpace__ecere__com__DataValue val;
 429 unsigned int address;
 430 unsigned int hasAddress;
 431 struct Type * expType;
 432 struct Type * destType;
 433 unsigned int usage;
 434 int tempCount;
 435 unsigned int byReference;
 436 unsigned int isConstant;
 437 unsigned int addedThis;
 438 unsigned int needCast;
 439 unsigned int thisPtr;
 440 };
 441
 442 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
 443
 444 struct TemplateDatatype
 445 {
 446 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 447 struct Declarator * decl;
 448 };
 449
 450 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
 451
 452 struct TemplateArgument
 453 {
 454 struct TemplateArgument * prev;
 455 struct TemplateArgument * next;
 456 struct Location loc;
 457 struct Identifier * name;
 458 int type;
 459 union
 460 {
 461 struct Expression * expression;
 462 struct Identifier * identifier;
 463 struct TemplateDatatype * templateDatatype;
 464 };
 465 };
 466
 467 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
 468
 469 struct TemplateParameter
 470 {
 471 struct TemplateParameter * prev;
 472 struct TemplateParameter * next;
 473 struct Location loc;
 474 int type;
 475 struct Identifier * identifier;
 476 union
 477 {
 478 struct TemplateDatatype * dataType;
 479 int memberType;
 480 };
 481 struct TemplateArgument * defaultArgument;
 482 char *  dataTypeString;
 483 struct Type * baseType;
 484 };
 485
 486 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
 487
 488 struct Specifier
 489 {
 490 struct Specifier * prev;
 491 struct Specifier * next;
 492 struct Location loc;
 493 int type;
 494 union
 495 {
 496 int specifier;
 497 struct
 498 {
 499 char *  name;
 500 struct Symbol * symbol;
 501 struct __ecereNameSpace__ecere__sys__OldList *  templateArgs;
 502 };
 503 struct
 504 {
 505 struct Identifier * id;
 506 struct __ecereNameSpace__ecere__sys__OldList *  list;
 507 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
 508 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 509 unsigned int addNameSpace;
 510 struct Context * ctx;
 511 };
 512 struct Expression * expression;
 513 struct Specifier * _class;
 514 struct TemplateParameter * templateParameter;
 515 };
 516 };
 517
 518 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
 519
 520 struct Identifier
 521 {
 522 struct Identifier * prev;
 523 struct Identifier * next;
 524 struct Location loc;
 525 struct Symbol * classSym;
 526 struct Specifier * _class;
 527 char *  string;
 528 struct Identifier * badID;
 529 };
 530
 531 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Pointer;
 532
 533 struct Pointer
 534 {
 535 struct Pointer * prev;
 536 struct Pointer * next;
 537 struct Location loc;
 538 struct __ecereNameSpace__ecere__sys__OldList *  qualifiers;
 539 struct Pointer * pointer;
 540 };
 541
 542 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
 543
 544 struct Declarator
 545 {
 546 struct Declarator * prev;
 547 struct Declarator * next;
 548 struct Location loc;
 549 int type;
 550 struct Symbol * symbol;
 551 struct Declarator * declarator;
 552 union
 553 {
 554 struct Identifier * identifier;
 555 struct
 556 {
 557 struct Expression * exp;
 558 struct Expression * posExp;
 559 char * attrib;
 560 } structDecl;
 561 struct
 562 {
 563 struct Expression * exp;
 564 struct Specifier * enumClass;
 565 } array;
 566 struct
 567 {
 568 struct __ecereNameSpace__ecere__sys__OldList * parameters;
 569 } function;
 570 struct
 571 {
 572 struct Pointer * pointer;
 573 } pointer;
 574 struct
 575 {
 576 char * extended;
 577 } extended;
 578 };
 579 };
 580
 581 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
 582
 583 struct FunctionDefinition
 584 {
 585 struct FunctionDefinition * prev;
 586 struct FunctionDefinition * next;
 587 struct Location loc;
 588 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 589 struct Declarator * declarator;
 590 struct __ecereNameSpace__ecere__sys__OldList *  declarations;
 591 struct Statement * body;
 592 struct __ecereNameSpace__ecere__com__Class * _class;
 593 struct __ecereNameSpace__ecere__sys__OldList attached;
 594 int declMode;
 595 struct Type * type;
 596 struct Symbol * propSet;
 597 int tempCount;
 598 unsigned int propertyNoThis;
 599 };
 600
 601 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
 602
 603 struct DBTableDef
 604 {
 605 char *  name;
 606 struct Symbol * symbol;
 607 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 608 int declMode;
 609 };
 610
 611 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
 612
 613 struct External
 614 {
 615 struct External * prev;
 616 struct External * next;
 617 struct Location loc;
 618 int type;
 619 struct Symbol * symbol;
 620 union
 621 {
 622 struct FunctionDefinition * function;
 623 struct ClassDefinition * _class;
 624 struct Declaration * declaration;
 625 char *  importString;
 626 struct Identifier * id;
 627 struct DBTableDef * table;
 628 };
 629 int importType;
 630 };
 631
 632 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
 633
 634 struct ModuleImport
 635 {
 636 struct ModuleImport * prev;
 637 struct ModuleImport * next;
 638 char *  name;
 639 struct __ecereNameSpace__ecere__sys__OldList classes;
 640 struct __ecereNameSpace__ecere__sys__OldList functions;
 641 int importType;
 642 int importAccess;
 643 };
 644
 645 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
 646
 647 struct ClassImport;
 648
 649 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
 650
 651 struct Symbol
 652 {
 653 char *  string;
 654 struct Symbol * parent;
 655 struct Symbol * left;
 656 struct Symbol * right;
 657 int depth;
 658 struct Type * type;
 659 union
 660 {
 661 struct __ecereNameSpace__ecere__com__Method * method;
 662 struct __ecereNameSpace__ecere__com__Property * _property;
 663 struct __ecereNameSpace__ecere__com__Class * registered;
 664 };
 665 int id;
 666 int idCode;
 667 union
 668 {
 669 struct
 670 {
 671 struct External * pointerExternal;
 672 struct External * structExternal;
 673 };
 674 struct
 675 {
 676 struct External * externalGet;
 677 struct External * externalSet;
 678 struct External * externalPtr;
 679 struct External * externalIsSet;
 680 };
 681 struct
 682 {
 683 struct External * methodExternal;
 684 struct External * methodCodeExternal;
 685 };
 686 };
 687 unsigned int imported;
 688 unsigned int declaredStructSym;
 689 struct __ecereNameSpace__ecere__com__Class * _class;
 690 unsigned int declaredStruct;
 691 unsigned int needConstructor;
 692 unsigned int needDestructor;
 693 char *  constructorName;
 694 char *  structName;
 695 char *  className;
 696 char *  destructorName;
 697 struct ModuleImport * module;
 698 struct ClassImport * _import;
 699 struct Location nameLoc;
 700 unsigned int isParam;
 701 unsigned int isRemote;
 702 unsigned int isStruct;
 703 unsigned int fireWatchersDone;
 704 int declaring;
 705 unsigned int classData;
 706 unsigned int isStatic;
 707 char *  shortName;
 708 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
 709 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
 710 struct Context * ctx;
 711 int isIterator;
 712 struct Expression * propCategory;
 713 };
 714
 715 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
 716
 717 struct Type
 718 {
 719 struct Type * prev;
 720 struct Type * next;
 721 int refCount;
 722 union
 723 {
 724 struct Symbol * _class;
 725 struct
 726 {
 727 struct __ecereNameSpace__ecere__sys__OldList members;
 728 char *  enumName;
 729 };
 730 struct
 731 {
 732 struct Type * returnType;
 733 struct __ecereNameSpace__ecere__sys__OldList params;
 734 struct Symbol * thisClass;
 735 unsigned int staticMethod;
 736 struct TemplateParameter * thisClassTemplate;
 737 };
 738 struct
 739 {
 740 struct __ecereNameSpace__ecere__com__Method * method;
 741 struct __ecereNameSpace__ecere__com__Class * methodClass;
 742 struct __ecereNameSpace__ecere__com__Class * usedClass;
 743 };
 744 struct
 745 {
 746 struct Type * arrayType;
 747 int arraySize;
 748 struct Expression * arraySizeExp;
 749 unsigned int freeExp;
 750 struct Symbol * enumClass;
 751 };
 752 struct Type * type;
 753 struct TemplateParameter * templateParameter;
 754 };
 755 unsigned int isSigned;
 756 int kind;
 757 unsigned int constant;
 758 unsigned int size;
 759 char *  name;
 760 char *  typeName;
 761 unsigned int count;
 762 unsigned int truth;
 763 int classObjectType;
 764 unsigned int byReference;
 765 unsigned int extraParam;
 766 int alignment;
 767 unsigned int directClassAccess;
 768 unsigned int computing;
 769 unsigned int dllExport;
 770 unsigned int offset;
 771 unsigned int keepCast;
 772 unsigned int passAsTemplate;
 773 int bitFieldCount;
 774 };
 775
 776 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
 777
 778 struct __ecereNameSpace__ecere__com__Class
 779 {
 780 struct __ecereNameSpace__ecere__com__Class * prev;
 781 struct __ecereNameSpace__ecere__com__Class * next;
 782 char *  name;
 783 int offset;
 784 int structSize;
 785 int (* *  _vTbl)();
 786 int vTblSize;
 787 int (*  Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
 788 void (*  Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
 789 int offsetClass;
 790 int sizeClass;
 791 struct __ecereNameSpace__ecere__com__Class * base;
 792 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
 793 struct __ecereNameSpace__ecere__sys__BinaryTree members;
 794 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
 795 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
 796 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
 797 struct __ecereNameSpace__ecere__sys__OldList derivatives;
 798 int memberID;
 799 int startMemberID;
 800 int type;
 801 struct __ecereNameSpace__ecere__com__Instance * module;
 802 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
 803 char *  dataTypeString;
 804 struct Type * dataType;
 805 int typeSize;
 806 int defaultAlignment;
 807 void (*  Initialize)();
 808 int memberOffset;
 809 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
 810 char *  designerClass;
 811 unsigned int noExpansion;
 812 char *  defaultProperty;
 813 unsigned int comRedefinition;
 814 int count;
 815 unsigned int isRemote;
 816 unsigned int internalDecl;
 817 void *  data;
 818 unsigned int computeSize;
 819 int structAlignment;
 820 int destructionWatchOffset;
 821 unsigned int fixed;
 822 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
 823 int inheritanceAccess;
 824 char *  fullName;
 825 void *  symbol;
 826 struct __ecereNameSpace__ecere__sys__OldList conversions;
 827 struct __ecereNameSpace__ecere__sys__OldList templateParams;
 828 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
 829 struct __ecereNameSpace__ecere__com__Class * templateClass;
 830 struct __ecereNameSpace__ecere__sys__OldList templatized;
 831 int numParams;
 832 };
 833
 834 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
 835
 836 struct __ecereNameSpace__ecere__com__Instance
 837 {
 838 int (* *  _vTbl)();
 839 struct __ecereNameSpace__ecere__com__Class * _class;
 840 int _refCount;
 841 };
 842
 843 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
 844
 845 struct __ecereNameSpace__ecere__com__DataMember
 846 {
 847 struct __ecereNameSpace__ecere__com__DataMember * prev;
 848 struct __ecereNameSpace__ecere__com__DataMember * next;
 849 char *  name;
 850 unsigned int isProperty;
 851 int memberAccess;
 852 int id;
 853 struct __ecereNameSpace__ecere__com__Class * _class;
 854 char *  dataTypeString;
 855 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 856 struct Type * dataType;
 857 int type;
 858 int offset;
 859 int memberID;
 860 struct __ecereNameSpace__ecere__sys__OldList members;
 861 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 862 int memberOffset;
 863 int structAlignment;
 864 };
 865
 866 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
 867
 868 struct __ecereNameSpace__ecere__com__SerialBuffer
 869 {
 870 unsigned char *  _buffer;
 871 unsigned int count;
 872 unsigned int _size;
 873 unsigned int pos;
 874 };
 875
 876 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
 877
 878 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 879 {
 880 union
 881 {
 882 struct
 883 {
 884 char *  dataTypeString;
 885 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 886 };
 887 struct __ecereNameSpace__ecere__com__DataValue expression;
 888 struct
 889 {
 890 char *  memberString;
 891 union
 892 {
 893 struct __ecereNameSpace__ecere__com__DataMember * member;
 894 struct __ecereNameSpace__ecere__com__Property * prop;
 895 struct __ecereNameSpace__ecere__com__Method * method;
 896 };
 897 };
 898 };
 899 };
 900
 901 enum yytokentype
 902 {
 903 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, EXT_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
 904 };
 905
 906 typedef union YYSTYPE
 907 {
 908 int specifierType;
 909 int i;
 910 int declMode;
 911 struct Identifier * id;
 912 struct Expression * exp;
 913 struct Specifier * specifier;
 914 struct __ecereNameSpace__ecere__sys__OldList * list;
 915 struct Enumerator * enumerator;
 916 struct Declarator * declarator;
 917 struct Pointer * pointer;
 918 struct Initializer * initializer;
 919 struct InitDeclarator * initDeclarator;
 920 struct TypeName * typeName;
 921 struct Declaration * declaration;
 922 struct Statement * stmt;
 923 struct FunctionDefinition * function;
 924 struct External * external;
 925 struct Context * context;
 926 struct AsmField * asmField;
 927 struct Instantiation * instance;
 928 struct MembersInit * membersInit;
 929 struct MemberInit * memberInit;
 930 struct ClassFunction * classFunction;
 931 struct ClassDefinition * _class;
 932 struct ClassDef * classDef;
 933 struct PropertyDef * prop;
 934 char * string;
 935 struct Symbol * symbol;
 936 struct PropertyWatch * propertyWatch;
 937 struct TemplateParameter * templateParameter;
 938 struct TemplateArgument * templateArgument;
 939 struct TemplateDatatype * templateDatatype;
 940 struct DBTableEntry * dbtableEntry;
 941 struct DBIndexItem * dbindexItem;
 942 struct DBTableDef * dbtableDef;
 943 } YYSTYPE;
 944
 945 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Enumerator;
 946
 947 struct Enumerator
 948 {
 949 struct Enumerator * prev;
 950 struct Enumerator * next;
 951 struct Location loc;
 952 struct Identifier * id;
 953 struct Expression * exp;
 954 };
 955
 956 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_InitDeclarator;
 957
 958 struct InitDeclarator
 959 {
 960 struct InitDeclarator * prev;
 961 struct InitDeclarator * next;
 962 struct Location loc;
 963 struct Declarator * declarator;
 964 struct Initializer * initializer;
 965 };
 966
 967 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_AsmField;
 968
 969 struct AsmField
 970 {
 971 struct AsmField * prev;
 972 struct AsmField * next;
 973 struct Location loc;
 974 char *  command;
 975 struct Expression * expression;
 976 };
 977
 978 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassFunction;
 979
 980 struct ClassFunction
 981 {
 982 struct ClassFunction * prev;
 983 struct ClassFunction * next;
 984 struct Location loc;
 985 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 986 struct Declarator * declarator;
 987 struct __ecereNameSpace__ecere__sys__OldList *  declarations;
 988 struct Statement * body;
 989 struct __ecereNameSpace__ecere__com__Class * _class;
 990 struct __ecereNameSpace__ecere__sys__OldList attached;
 991 int declMode;
 992 struct Type * type;
 993 struct Symbol * propSet;
 994 unsigned int isVirtual;
 995 unsigned int isConstructor;
 996 unsigned int isDestructor;
 997 unsigned int dontMangle;
 998 int id;
 999 int idCode;
1000 };
1001
1002 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MembersInit;
1003
1004 struct MembersInit
1005 {
1006 struct MembersInit * prev;
1007 struct MembersInit * next;
1008 struct Location loc;
1009 int type;
1010 union
1011 {
1012 struct __ecereNameSpace__ecere__sys__OldList *  dataMembers;
1013 struct ClassFunction * function;
1014 };
1015 };
1016
1017 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MemberInit;
1018
1019 struct MemberInit
1020 {
1021 struct MemberInit * prev;
1022 struct MemberInit * next;
1023 struct Location loc;
1024 struct Location realLoc;
1025 struct __ecereNameSpace__ecere__sys__OldList *  identifiers;
1026 struct Initializer * initializer;
1027 unsigned int used;
1028 unsigned int variable;
1029 unsigned int takeOutExp;
1030 };
1031
1032 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyDef;
1033
1034 struct PropertyDef
1035 {
1036 struct PropertyDef * prev;
1037 struct PropertyDef * next;
1038 struct Location loc;
1039 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
1040 struct Declarator * declarator;
1041 struct Identifier * id;
1042 struct Statement * getStmt;
1043 struct Statement * setStmt;
1044 struct Statement * issetStmt;
1045 struct Symbol * symbol;
1046 unsigned int conversion;
1047 unsigned int isWatchable;
1048 struct Expression * category;
1049 };
1050
1051 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyWatch;
1052
1053 struct PropertyWatch
1054 {
1055 struct PropertyWatch * prev;
1056 struct PropertyWatch * next;
1057 struct Location loc;
1058 struct Statement * compound;
1059 struct __ecereNameSpace__ecere__sys__OldList *  properties;
1060 unsigned int deleteWatch;
1061 };
1062
1063 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDef;
1064
1065 struct ClassDef
1066 {
1067 struct ClassDef * prev;
1068 struct ClassDef * next;
1069 struct Location loc;
1070 int type;
1071 union
1072 {
1073 struct Declaration * decl;
1074 struct ClassFunction * function;
1075 struct __ecereNameSpace__ecere__sys__OldList *  defProperties;
1076 struct PropertyDef * propertyDef;
1077 struct PropertyWatch * propertyWatch;
1078 char *  designer;
1079 struct Identifier * defaultProperty;
1080 struct
1081 {
1082 struct Identifier * id;
1083 struct Initializer * initializer;
1084 };
1085 };
1086 int memberAccess;
1087 void *  object;
1088 };
1089
1090 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableEntry;
1091
1092 struct DBTableEntry
1093 {
1094 struct DBTableEntry * prev;
1095 struct DBTableEntry * next;
1096 int type;
1097 struct Identifier * id;
1098 union
1099 {
1100 struct
1101 {
1102 struct TypeName * dataType;
1103 char *  name;
1104 };
1105 struct __ecereNameSpace__ecere__sys__OldList *  items;
1106 };
1107 };
1108
1109 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBIndexItem;
1110
1111 struct DBIndexItem
1112 {
1113 struct DBIndexItem * prev;
1114 struct DBIndexItem * next;
1115 struct Identifier * id;
1116 int order;
1117 };
1118
1119 extern YYSTYPE yylval;
1120
1121 extern struct Location yylloc;
1122
1123 extern char * yytext;
1124
1125 char * defaultNameSpace;
1126
1127 int defaultNameSpaceLen;
1128
1129 extern int strlen(const char * );
1130
1131 void SetDefaultNameSpace(char * s)
1132 {
1133 defaultNameSpace = s;
1134 defaultNameSpaceLen = s ? strlen(s) : 0;
1135 }
1136
1137 unsigned int strictNameSpaces;
1138
1139 void SetStrictNameSpaces(unsigned int b)
1140 {
1141 strictNameSpaces = b;
1142 }
1143
1144 int declMode = 2;
1145
1146 void SetDeclMode(int accessMode)
1147 {
1148 declMode = accessMode;
1149 }
1150
1151 int defaultDeclMode = 2;
1152
1153 void SetDefaultDeclMode(int accessMode)
1154 {
1155 defaultDeclMode = accessMode;
1156 }
1157
1158 char * currentNameSpace;
1159
1160 int currentNameSpaceLen;
1161
1162 void SetCurrentNameSpace(char * s)
1163 {
1164 currentNameSpace = s;
1165 currentNameSpaceLen = s ? strlen(s) : 0;
1166 }
1167
1168 struct __ecereNameSpace__ecere__sys__OldList * MkList()
1169 {
1170 return __ecereNameSpace__ecere__com__eSystem_New0(sizeof(struct __ecereNameSpace__ecere__sys__OldList) * (1));
1171 }
1172
1173 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
1174
1175 struct __ecereNameSpace__ecere__sys__OldList * MkListOne(void * item)
1176 {
1177 struct __ecereNameSpace__ecere__sys__OldList * list = __ecereNameSpace__ecere__com__eSystem_New0(sizeof(struct __ecereNameSpace__ecere__sys__OldList) * (1));
1178
1179 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*list), item);
1180 return list;
1181 }
1182
1183 void ListAdd(struct __ecereNameSpace__ecere__sys__OldList * list, void * item)
1184 {
1185 if(item)
1186 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(list, item);
1187 }
1188
1189 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert(struct __ecereNameSpace__ecere__sys__OldList * this, void *  prevItem, void *  item);
1190
1191 void ListAddFront(struct __ecereNameSpace__ecere__sys__OldList * list, void * item)
1192 {
1193 if(item)
1194 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert(list, (((void *)0)), item);
1195 }
1196
1197 extern void *  memcpy(void * , const void * , unsigned int size);
1198
1199 extern int strcmp(const char * , const char * );
1200
1201 struct Specifier * MkSpecifierName(char *  name);
1202
1203 extern char *  __ecereNameSpace__ecere__sys__CopyString(char *  string);
1204
1205 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplatedType;
1206
1207 struct TemplatedType
1208 {
1209 unsigned int key;
1210 struct __ecereNameSpace__ecere__sys__BTNode * parent;
1211 struct __ecereNameSpace__ecere__sys__BTNode * left;
1212 struct __ecereNameSpace__ecere__sys__BTNode * right;
1213 int depth;
1214 struct TemplateParameter * param;
1215 };
1216
1217 struct TemplatedType * FindTemplateTypeParameter(struct Context * ctx, char *  name);
1218
1219 extern struct Context * curContext;
1220
1221 struct Symbol * FindClass(char *  name);
1222
1223 struct Specifier * _MkSpecifierName(char *  name, struct Symbol * symbol, struct __ecereNameSpace__ecere__sys__OldList * templateArgs);
1224
1225 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
1226
1227 struct Identifier * MkIdentifier(char * string)
1228 {
1229 void * __ecereTemp1;
1230 struct Identifier * id = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Identifier);
1231 int c;
1232
1233 id->_class = (((void *)0));
1234 if(string)
1235 {
1236 char * namePart;
1237 unsigned int gotColon = 0x0;
1238
1239 for(c = strlen(string) - 1; c >= 0; c--)
1240 if(string[c] == ':')
1241 {
1242 gotColon = 0x1;
1243 break;
1244 }
1245 namePart = string + c + 1;
1246 while(c >= 0 && string[c] == ':')
1247 c--;
1248 if(c >= 0)
1249 {
1250 char name[1024];
1251 struct Symbol * symbol;
1252
1253 memcpy(name, string, c + 1);
1254 name[c + 1] = '\0';
1255 if(!strcmp(name, "typed_object"))
1256 {
1257 id->_class = MkSpecifierName("class");
1258 id->string = __ecereNameSpace__ecere__sys__CopyString(namePart);
1259 }
1260 else if(!strcmp(name, "property"))
1261 {
1262 id->_class = MkSpecifierName("property");
1263 id->string = __ecereNameSpace__ecere__sys__CopyString(namePart);
1264 }
1265 else if(!strcmp(name, "typed_object&"))
1266 {
1267 id->_class = MkSpecifierName("typed_object&");
1268 id->string = __ecereNameSpace__ecere__sys__CopyString(namePart);
1269 }
1270 else if(!strcmp(name, "any_object"))
1271 {
1272 id->_class = MkSpecifierName("any_object");
1273 id->string = __ecereNameSpace__ecere__sys__CopyString(namePart);
1274 }
1275 else
1276 {
1277 struct TemplatedType * templatedType = FindTemplateTypeParameter(curContext, name);
1278
1279 if(templatedType)
1280 {
1281 id->_class = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Specifier), ((struct Specifier *)__ecereTemp1)->type = 8, ((struct Specifier *)__ecereTemp1)->templateParameter = templatedType->param, ((struct Specifier *)__ecereTemp1));
1282 id->string = __ecereNameSpace__ecere__sys__CopyString(namePart);
1283 }
1284 else
1285 {
1286 symbol = FindClass(name);
1287 if(symbol)
1288 {
1289 id->_class = _MkSpecifierName(symbol->string, symbol, (((void *)0)));
1290 id->string = __ecereNameSpace__ecere__sys__CopyString(namePart);
1291 }
1292 else
1293 id->string = __ecereNameSpace__ecere__sys__CopyString(string);
1294 }
1295 }
1296 }
1297 else if(gotColon)
1298 {
1299 id->_class = MkSpecifierName((((void *)0)));
1300 id->string = __ecereNameSpace__ecere__sys__CopyString(namePart);
1301 }
1302 else
1303 id->string = __ecereNameSpace__ecere__sys__CopyString(string);
1304 }
1305 else
1306 id->string = __ecereNameSpace__ecere__sys__CopyString("");
1307 return id;
1308 }
1309
1310 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1311
1312 struct TemplateParameter * MkTypeTemplateParameter(struct Identifier * identifier, struct TemplateDatatype * baseTplDatatype, struct TemplateArgument * defaultArgument)
1313 {
1314 if(identifier->string)
1315 {
1316 struct TemplateParameter * param = (param = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TemplateParameter), param->type = 0, param->identifier = identifier, param->dataType = baseTplDatatype, param->defaultArgument = defaultArgument, param);
1317 struct TemplatedType * type = (type = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TemplatedType), type->key = (unsigned int)identifier->string, type->param = param, type);
1318
1319 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&curContext->templateTypes, (struct __ecereNameSpace__ecere__sys__BTNode *)type))
1320 ((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);
1321 return param;
1322 }
1323 return (((void *)0));
1324 }
1325
1326 struct TemplateParameter * MkIdentifierTemplateParameter(struct Identifier * identifier, int memberType, struct TemplateArgument * defaultArgument)
1327 {
1328 if(identifier->string)
1329 {
1330 struct TemplateParameter * param = (param = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TemplateParameter), param->type = 1, param->identifier = identifier, param->memberType = memberType, param->defaultArgument = defaultArgument, param);
1331
1332 return param;
1333 }
1334 return (((void *)0));
1335 }
1336
1337 struct TemplateParameter * MkExpressionTemplateParameter(struct Identifier * identifier, struct TemplateDatatype * dataType, struct TemplateArgument * defaultArgument)
1338 {
1339 if(identifier->string)
1340 {
1341 struct TemplateParameter * param = (param = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TemplateParameter), param->type = 2, param->identifier = identifier, param->dataType = dataType, param->defaultArgument = defaultArgument, param);
1342
1343 return param;
1344 }
1345 return (((void *)0));
1346 }
1347
1348 struct TemplateDatatype * MkTemplateDatatype(struct __ecereNameSpace__ecere__sys__OldList * specifiers, struct Declarator * decl)
1349 {
1350 struct TemplateDatatype * datatype = (datatype = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TemplateDatatype), datatype->specifiers = specifiers, datatype->decl = decl, datatype);
1351
1352 return datatype;
1353 }
1354
1355 struct TemplateArgument * MkTemplateTypeArgument(struct TemplateDatatype * tplDatatype)
1356 {
1357 struct TemplateArgument * argument = (argument = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TemplateArgument), argument->type = 0, argument->templateDatatype = tplDatatype, argument);
1358
1359 return argument;
1360 }
1361
1362 struct TemplateArgument * MkTemplateExpressionArgument(struct Expression * expr)
1363 {
1364 struct TemplateArgument * argument = (argument = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TemplateArgument), argument->type = 2, argument->expression = expr, argument);
1365
1366 return argument;
1367 }
1368
1369 struct TemplateArgument * MkTemplateIdentifierArgument(struct Identifier * ident)
1370 {
1371 struct TemplateArgument * argument = (argument = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TemplateArgument), argument->type = 1, argument->identifier = ident, argument);
1372
1373 return argument;
1374 }
1375
1376 struct Expression * MkExpExtensionCompound(struct Statement * compound)
1377 {
1378 void * __ecereTemp1;
1379
1380 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 25, ((struct Expression *)__ecereTemp1)->compound = compound, ((struct Expression *)__ecereTemp1));
1381 }
1382
1383 struct Expression * MkExpExtensionExpression(struct __ecereNameSpace__ecere__sys__OldList * expressions)
1384 {
1385 void * __ecereTemp1;
1386
1387 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 34, ((struct Expression *)__ecereTemp1)->list = expressions, ((struct Expression *)__ecereTemp1)->loc = yylloc, ((struct Expression *)__ecereTemp1));
1388 }
1389
1390 struct Expression * MkExpExtensionInitializer(struct TypeName * typeName, struct Initializer * initializer)
1391 {
1392 void * __ecereTemp1;
1393
1394 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 35, ((struct Expression *)__ecereTemp1)->initializer.typeName = typeName, ((struct Expression *)__ecereTemp1)->initializer.initializer = initializer, ((struct Expression *)__ecereTemp1)->loc = yylloc, ((struct Expression *)__ecereTemp1));
1395 }
1396
1397 struct Expression * MkExpIdentifier(struct Identifier * id)
1398 {
1399 void * __ecereTemp1;
1400
1401 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 0, ((struct Expression *)__ecereTemp1)->identifier = id, ((struct Expression *)__ecereTemp1));
1402 }
1403
1404 struct Expression * MkExpDummy()
1405 {
1406 struct Expression * exp = (exp = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), exp->type = 16, exp);
1407
1408 return exp;
1409 }
1410
1411 struct Expression * MkExpConstant(char * string)
1412 {
1413 void * __ecereTemp1;
1414
1415 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 2, ((struct Expression *)__ecereTemp1)->constant = __ecereNameSpace__ecere__sys__CopyString(string), ((struct Expression *)__ecereTemp1));
1416 }
1417
1418 struct Expression * MkExpString(char * string)
1419 {
1420 void * __ecereTemp1;
1421
1422 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 3, ((struct Expression *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(string), ((struct Expression *)__ecereTemp1));
1423 }
1424
1425 struct ContextStringPair
1426 {
1427 char * string, * context;
1428 };
1429
1430 static struct __ecereNameSpace__ecere__com__Class * __ecereClass_ContextStringPair;
1431
1432 void __ecereMethod_ContextStringPair_OnFree(struct __ecereNameSpace__ecere__com__Class * class, struct ContextStringPair * this)
1433 {
1434 (__ecereNameSpace__ecere__com__eSystem_Delete(this->string), this->string = 0);
1435 (__ecereNameSpace__ecere__com__eSystem_Delete(this->context), this->context = 0);
1436 }
1437
1438 int __ecereMethod_ContextStringPair_OnCompare(struct __ecereNameSpace__ecere__com__Class * class, struct ContextStringPair * this, struct ContextStringPair * b)
1439 {
1440 int result;
1441
1442 result = (this->string && b->string) ? strcmp(this->string, b->string) : (!this->string && b->string) ? 1 : (this->string && !b->string) ? -1 : 0;
1443 if(result)
1444 return result;
1445 result = (this->context && b->context) ? strcmp(this->context, b->context) : (!this->context && b->context) ? 1 : (this->context && !b->context) ? -1 : 0;
1446 return result;
1447 }
1448
1449 struct __ecereNameSpace__ecere__com__Instance * intlStrings;
1450
1451 extern unsigned int inCompiler;
1452
1453 extern struct Expression * QMkExpId(char *  id);
1454
1455 struct Expression * MkExpCall(struct Expression * expression, struct __ecereNameSpace__ecere__sys__OldList * arguments);
1456
1457 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List_TPL_Location_;
1458
1459 struct __ecereNameSpace__ecere__com__IteratorPointer;
1460
1461 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__IteratorPointer;
1462
1463 struct __ecereNameSpace__ecere__com__Iterator
1464 {
1465 struct __ecereNameSpace__ecere__com__Instance * container;
1466 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
1467 };
1468
1469 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(struct __ecereNameSpace__ecere__com__Iterator * this, uint64 index, unsigned int create);
1470
1471 uint64 __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(struct __ecereNameSpace__ecere__com__Iterator * this);
1472
1473 void __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(struct __ecereNameSpace__ecere__com__Iterator * this, uint64 value);
1474
1475 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__Iterator_data;
1476
1477 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Add;
1478
1479 struct Expression * MkExpIntlString(char * string, char * context)
1480 {
1481 struct __ecereNameSpace__ecere__sys__OldList * list = MkList();
1482
1483 if(inCompiler)
1484 {
1485 struct ContextStringPair pair =
1486 {
1487 0, 0
1488 };
1489 struct __ecereNameSpace__ecere__com__Instance * list;
1490 int len = strlen(string);
1491
1492 pair.string = __ecereNameSpace__ecere__com__eSystem_New(sizeof(unsigned char) * (len - 2 + 1));
1493 memcpy(pair.string, string + 1, len - 2);
1494 pair.string[len - 2] = '\0';
1495 if(context)
1496 {
1497 len = strlen(context);
1498 pair.context = __ecereNameSpace__ecere__com__eSystem_New(sizeof(unsigned char) * (len - 2 + 1));
1499 memcpy(pair.context, context + 1, len - 2);
1500 pair.context[len - 2] = '\0';
1501 }
1502 list = (__extension__ ({
1503 struct __ecereNameSpace__ecere__com__Iterator __internalIterator =
1504 {
1505 intlStrings, 0
1506 };
1507
1508 __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&__internalIterator, (((&pair))), 0x0);
1509 ((struct __ecereNameSpace__ecere__com__Instance *)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&__internalIterator));
1510 }));
1511 if(!list)
1512 {
1513 list = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__List_TPL_Location_);
1514 __extension__ ({
1515 struct __ecereNameSpace__ecere__com__Iterator __internalIterator =
1516 {
1517 intlStrings, 0
1518 };
1519
1520 __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&__internalIterator, (((&pair))), 0x1);
1521 __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(&__internalIterator, list);
1522 });
1523 }
1524 else
1525 {
1526 (__ecereNameSpace__ecere__com__eSystem_Delete(pair.string), pair.string = 0);
1527 (__ecereNameSpace__ecere__com__eSystem_Delete(pair.context), pair.context = 0);
1528 }
1529 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))list->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(list, (&yylloc));
1530 }
1531 ListAdd(list, QMkExpId("__thisModule"));
1532 ListAdd(list, MkExpString(string));
1533 if(context)
1534 {
1535 int lenString = strlen(string), lenContext = strlen(context);
1536 char * msgid = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (lenString - 2 + lenContext - 2 + 4));
1537
1538 msgid[0] = '\"';
1539 memcpy(msgid + 1, context + 1, lenContext - 2);
1540 msgid[1 + lenContext - 2] = (char)4;
1541 memcpy(msgid + 1 + lenContext - 2 + 1, string + 1, lenString - 2);
1542 memcpy(msgid + 1 + lenContext - 2 + 1 + lenString - 2, "\"", 2);
1543 ListAdd(list, MkExpString(msgid));
1544 (__ecereNameSpace__ecere__com__eSystem_Delete(msgid), msgid = 0);
1545 }
1546 else
1547 ListAdd(list, QMkExpId("null"));
1548 return MkExpCall(QMkExpId("GetTranslatedString"), list);
1549 }
1550
1551 struct Expression * MkExpOp(struct Expression * exp1, int op, struct Expression * exp2)
1552 {
1553 struct Expression * exp = (exp = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), exp->type = 4, exp->op.op = op, exp->op.exp1 = exp1, exp->op.exp2 = exp2, exp);
1554
1555 if(exp1 || exp2)
1556 {
1557 exp->loc.start = exp1 ? exp1->loc.start : exp2->loc.start;
1558 exp->loc.end = exp2 ? exp2->loc.end : exp1->loc.end;
1559 }
1560 return exp;
1561 }
1562
1563 struct Expression * MkExpBrackets(struct __ecereNameSpace__ecere__sys__OldList * expressions)
1564 {
1565 struct Expression * exp = (exp = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), exp->type = 5, exp->list = expressions, exp);
1566
1567 if(expressions && expressions->first)
1568 {
1569 exp->loc.start = ((struct Expression *)expressions->first)->loc.start;
1570 exp->loc.end = ((struct Expression *)expressions->last)->loc.end;
1571 }
1572 return exp;
1573 }
1574
1575 struct Expression * MkExpIndex(struct Expression * expression, struct __ecereNameSpace__ecere__sys__OldList * index)
1576 {
1577 void * __ecereTemp1;
1578
1579 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 6, ((struct Expression *)__ecereTemp1)->index.exp = expression, ((struct Expression *)__ecereTemp1)->index.index = index, ((struct Expression *)__ecereTemp1));
1580 }
1581
1582 struct Expression * MkExpCall(struct Expression * expression, struct __ecereNameSpace__ecere__sys__OldList * arguments)
1583 {
1584 void * __ecereTemp1;
1585
1586 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 7, ((struct Expression *)__ecereTemp1)->call.exp = expression, ((struct Expression *)__ecereTemp1)->call.arguments = arguments, ((struct Expression *)__ecereTemp1));
1587 }
1588
1589 struct Expression * MkExpMember(struct Expression * expression, struct Identifier * member)
1590 {
1591 void * __ecereTemp1;
1592
1593 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 8, ((struct Expression *)__ecereTemp1)->member.exp = expression, ((struct Expression *)__ecereTemp1)->member.member = member, ((struct Expression *)__ecereTemp1));
1594 }
1595
1596 struct Expression * MkExpPointer(struct Expression * expression, struct Identifier * member)
1597 {
1598 void * __ecereTemp1;
1599
1600 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 9, ((struct Expression *)__ecereTemp1)->member.exp = expression, ((struct Expression *)__ecereTemp1)->member.member = member, ((struct Expression *)__ecereTemp1));
1601 }
1602
1603 struct Expression * MkExpTypeSize(struct TypeName * typeName)
1604 {
1605 void * __ecereTemp1;
1606
1607 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 10, ((struct Expression *)__ecereTemp1)->typeName = typeName, ((struct Expression *)__ecereTemp1));
1608 }
1609
1610 struct Expression * MkExpClassSize(struct Specifier * _class)
1611 {
1612 void * __ecereTemp1;
1613
1614 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 15, ((struct Expression *)__ecereTemp1)->_class = _class, ((struct Expression *)__ecereTemp1));
1615 }
1616
1617 struct Expression * MkExpCast(struct TypeName * typeName, struct Expression * expression)
1618 {
1619 void * __ecereTemp1;
1620
1621 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 11, ((struct Expression *)__ecereTemp1)->cast.typeName = typeName, ((struct Expression *)__ecereTemp1)->cast.exp = expression, ((struct Expression *)__ecereTemp1));
1622 }
1623
1624 struct Expression * MkExpCondition(struct Expression * cond, struct __ecereNameSpace__ecere__sys__OldList * expressions, struct Expression * elseExp)
1625 {
1626 void * __ecereTemp1;
1627
1628 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 12, ((struct Expression *)__ecereTemp1)->cond.cond = cond, ((struct Expression *)__ecereTemp1)->cond.exp = expressions, ((struct Expression *)__ecereTemp1)->cond.elseExp = elseExp, ((struct Expression *)__ecereTemp1));
1629 }
1630
1631 struct Expression * MkExpRenew(struct Expression * memExp, struct TypeName * type, struct Expression * size)
1632 {
1633 void * __ecereTemp1;
1634
1635 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 14, ((struct Expression *)__ecereTemp1)->_renew.exp = memExp, ((struct Expression *)__ecereTemp1)->_renew.typeName = type, ((struct Expression *)__ecereTemp1)->_renew.size = size, ((struct Expression *)__ecereTemp1));
1636 }
1637
1638 struct Expression * MkExpRenew0(struct Expression * memExp, struct TypeName * type, struct Expression * size)
1639 {
1640 void * __ecereTemp1;
1641
1642 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 29, ((struct Expression *)__ecereTemp1)->_renew.exp = memExp, ((struct Expression *)__ecereTemp1)->_renew.typeName = type, ((struct Expression *)__ecereTemp1)->_renew.size = size, ((struct Expression *)__ecereTemp1));
1643 }
1644
1645 struct Expression * MkExpNew(struct TypeName * type, struct Expression * size)
1646 {
1647 void * __ecereTemp1;
1648
1649 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 13, ((struct Expression *)__ecereTemp1)->_new.typeName = type, ((struct Expression *)__ecereTemp1)->_new.size = size, ((struct Expression *)__ecereTemp1));
1650 }
1651
1652 struct Expression * MkExpNew0(struct TypeName * type, struct Expression * size)
1653 {
1654 void * __ecereTemp1;
1655
1656 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 28, ((struct Expression *)__ecereTemp1)->_new.typeName = type, ((struct Expression *)__ecereTemp1)->_new.size = size, ((struct Expression *)__ecereTemp1));
1657 }
1658
1659 struct Expression * MkExpVaArg(struct Expression * exp, struct TypeName * type)
1660 {
1661 void * __ecereTemp1;
1662
1663 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 36, ((struct Expression *)__ecereTemp1)->vaArg.exp = exp, ((struct Expression *)__ecereTemp1)->vaArg.typeName = type, ((struct Expression *)__ecereTemp1));
1664 }
1665
1666 struct Specifier * MkSpecifier(int specifier)
1667 {
1668 void * __ecereTemp1;
1669
1670 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Specifier), ((struct Specifier *)__ecereTemp1)->type = 0, ((struct Specifier *)__ecereTemp1)->specifier = specifier, ((struct Specifier *)__ecereTemp1));
1671 }
1672
1673 struct Specifier * MkSpecifierTypeOf(struct Expression * expression)
1674 {
1675 void * __ecereTemp1;
1676
1677 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Specifier), ((struct Specifier *)__ecereTemp1)->type = 6, ((struct Specifier *)__ecereTemp1)->expression = expression, ((struct Specifier *)__ecereTemp1));
1678 }
1679
1680 struct Specifier * MkSpecifierSubClass(struct Specifier * _class)
1681 {
1682 void * __ecereTemp1;
1683
1684 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Specifier), ((struct Specifier *)__ecereTemp1)->type = 7, ((struct Specifier *)__ecereTemp1)->_class = _class, ((struct Specifier *)__ecereTemp1));
1685 }
1686
1687 struct Specifier * MkSpecifierExtended(char * name)
1688 {
1689 void * __ecereTemp1;
1690
1691 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Specifier), ((struct Specifier *)__ecereTemp1)->type = 5, ((struct Specifier *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(name), ((struct Specifier *)__ecereTemp1));
1692 }
1693
1694 struct Type * ProcessType(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl);
1695
1696 extern char *  strstr(char * , const char * );
1697
1698 extern void FreeSymbol(struct Symbol * symbol);
1699
1700 extern void FreeType(struct Type * type);
1701
1702 struct Specifier * MkEnum(struct Identifier * id, struct __ecereNameSpace__ecere__sys__OldList * list)
1703 {
1704 struct Specifier * spec = (spec = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Specifier), spec->type = 2, spec->id = id, spec->list = list, spec);
1705
1706 if(list && (!declMode || !id))
1707 {
1708 struct Type * type;
1709 struct Enumerator * e;
1710 struct __ecereNameSpace__ecere__sys__OldList specs =
1711 {
1712 0, 0, 0, 0, 0
1713 };
1714
1715 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&specs, spec);
1716 type = ProcessType(&specs, (((void *)0)));
1717 if(id)
1718 {
1719 struct Symbol * symbol = (symbol = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), symbol->string = __ecereNameSpace__ecere__sys__CopyString(id->string), symbol->isStruct = 0x1, symbol->type = type, symbol);
1720
1721 type->refCount++;
1722 if(strstr(symbol->string, "::"))
1723 curContext->hasNameSpace = 0x1;
1724 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&curContext->structSymbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol))
1725 FreeSymbol(symbol);
1726 }
1727 for(e = list->first; e; e = e->next)
1728 {
1729 struct Symbol * symbol = (symbol = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), symbol->string = __ecereNameSpace__ecere__sys__CopyString(e->id->string), symbol->type = type, symbol);
1730
1731 type->refCount++;
1732 if(strstr(symbol->string, "::"))
1733 curContext->hasNameSpace = 0x1;
1734 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(curContext->templateTypesOnly ? curContext->parent : curContext)->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol))
1735 FreeSymbol(symbol);
1736 }
1737 FreeType(type);
1738 }
1739 return spec;
1740 }
1741
1742 struct Symbol * FindType(struct Context * ctx, char *  name);
1743
1744 struct Specifier * MkStructOrUnion(int type, struct Identifier * id, struct __ecereNameSpace__ecere__sys__OldList * definitions)
1745 {
1746 void * __ecereTemp1;
1747 struct Specifier * spec = (spec = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Specifier), spec->type = type, spec->id = id, spec);
1748
1749 if(id && FindType(curContext, id->string))
1750 declMode = 0;
1751 spec->definitions = definitions;
1752 if(definitions && id && !declMode)
1753 {
1754 struct __ecereNameSpace__ecere__sys__OldList specs =
1755 {
1756 0, 0, 0, 0, 0
1757 };
1758 struct Symbol * symbol;
1759
1760 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&specs, spec);
1761 symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(id->string), ((struct Symbol *)__ecereTemp1)->type = ProcessType(&specs, (((void *)0))), ((struct Symbol *)__ecereTemp1)->isStruct = 0x1, ((struct Symbol *)__ecereTemp1));
1762 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&curContext->structSymbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol))
1763 FreeSymbol(symbol);
1764 }
1765 return spec;
1766 }
1767
1768 void AddStructDefinitions(struct Specifier * spec, struct __ecereNameSpace__ecere__sys__OldList * definitions)
1769 {
1770 void * __ecereTemp1;
1771
1772 spec->definitions = definitions;
1773 if(definitions && spec->id && !declMode)
1774 {
1775 struct Symbol * symbol;
1776 struct __ecereNameSpace__ecere__sys__OldList specs =
1777 {
1778 0, 0, 0, 0, 0
1779 };
1780
1781 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&specs, spec);
1782 symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(spec->id->string), ((struct Symbol *)__ecereTemp1)->type = ProcessType(&specs, (((void *)0))), ((struct Symbol *)__ecereTemp1)->isStruct = 0x1, ((struct Symbol *)__ecereTemp1));
1783 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&curContext->parent->structSymbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol))
1784 FreeSymbol(symbol);
1785 }
1786 }
1787
1788 struct Declarator * MkDeclaratorIdentifier(struct Identifier * id)
1789 {
1790 void * __ecereTemp1;
1791
1792 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declarator), ((struct Declarator *)__ecereTemp1)->type = 1, ((struct Declarator *)__ecereTemp1)->identifier = id, ((struct Declarator *)__ecereTemp1));
1793 }
1794
1795 struct Declarator * MkDeclaratorFunction(struct Declarator * declarator, struct __ecereNameSpace__ecere__sys__OldList * parameters)
1796 {
1797 void * __ecereTemp1;
1798
1799 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declarator), ((struct Declarator *)__ecereTemp1)->type = 4, ((struct Declarator *)__ecereTemp1)->declarator = declarator, ((struct Declarator *)__ecereTemp1)->function.parameters = parameters, ((struct Declarator *)__ecereTemp1));
1800 }
1801
1802 struct Declarator * MkDeclaratorExtended(char * extended, struct Declarator * declarator)
1803 {
1804 void * __ecereTemp1;
1805
1806 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declarator), ((struct Declarator *)__ecereTemp1)->type = 6, ((struct Declarator *)__ecereTemp1)->declarator = declarator, ((struct Declarator *)__ecereTemp1)->extended.extended = extended, ((struct Declarator *)__ecereTemp1));
1807 }
1808
1809 struct Declarator * MkDeclaratorExtendedEnd(char * extended, struct Declarator * declarator)
1810 {
1811 void * __ecereTemp1;
1812
1813 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declarator), ((struct Declarator *)__ecereTemp1)->type = 7, ((struct Declarator *)__ecereTemp1)->declarator = declarator, ((struct Declarator *)__ecereTemp1)->extended.extended = extended, ((struct Declarator *)__ecereTemp1));
1814 }
1815
1816 struct Declarator * MkStructDeclarator(struct Declarator * declarator, struct Expression * exp)
1817 {
1818 void * __ecereTemp1;
1819
1820 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declarator), ((struct Declarator *)__ecereTemp1)->type = 0, ((struct Declarator *)__ecereTemp1)->declarator = declarator, ((struct Declarator *)__ecereTemp1)->structDecl.exp = exp, ((struct Declarator *)__ecereTemp1));
1821 }
1822
1823 struct Declarator * MkDeclaratorBrackets(struct Declarator * declarator)
1824 {
1825 void * __ecereTemp1;
1826
1827 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declarator), ((struct Declarator *)__ecereTemp1)->type = 2, ((struct Declarator *)__ecereTemp1)->declarator = declarator, ((struct Declarator *)__ecereTemp1));
1828 }
1829
1830 struct Declarator * MkDeclaratorArray(struct Declarator * declarator, struct Expression * exp)
1831 {
1832 void * __ecereTemp1;
1833
1834 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declarator), ((struct Declarator *)__ecereTemp1)->type = 3, ((struct Declarator *)__ecereTemp1)->declarator = declarator, ((struct Declarator *)__ecereTemp1)->array.exp = exp, ((struct Declarator *)__ecereTemp1));
1835 }
1836
1837 struct Declarator * MkDeclaratorEnumArray(struct Declarator * declarator, struct Specifier * _class)
1838 {
1839 void * __ecereTemp1;
1840
1841 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declarator), ((struct Declarator *)__ecereTemp1)->type = 3, ((struct Declarator *)__ecereTemp1)->declarator = declarator, ((struct Declarator *)__ecereTemp1)->array.enumClass = _class, ((struct Declarator *)__ecereTemp1));
1842 }
1843
1844 struct Declarator * MkDeclaratorPointer(struct Pointer * pointer, struct Declarator * declarator)
1845 {
1846 void * __ecereTemp1;
1847
1848 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declarator), ((struct Declarator *)__ecereTemp1)->type = 5, ((struct Declarator *)__ecereTemp1)->declarator = declarator, ((struct Declarator *)__ecereTemp1)->pointer.pointer = pointer, ((struct Declarator *)__ecereTemp1));
1849 }
1850
1851 struct Enumerator * MkEnumerator(struct Identifier * id, struct Expression * exp)
1852 {
1853 void * __ecereTemp1;
1854
1855 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Enumerator), ((struct Enumerator *)__ecereTemp1)->id = id, ((struct Enumerator *)__ecereTemp1)->exp = exp, ((struct Enumerator *)__ecereTemp1));
1856 }
1857
1858 struct Pointer * MkPointer(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Pointer * pointer)
1859 {
1860 void * __ecereTemp1;
1861
1862 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Pointer), ((struct Pointer *)__ecereTemp1)->qualifiers = qualifiers, ((struct Pointer *)__ecereTemp1)->pointer = pointer, ((struct Pointer *)__ecereTemp1));
1863 }
1864
1865 struct Initializer * MkInitializerAssignment(struct Expression * exp)
1866 {
1867 void * __ecereTemp1;
1868
1869 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Initializer), ((struct Initializer *)__ecereTemp1)->type = 0, ((struct Initializer *)__ecereTemp1)->exp = exp, ((struct Initializer *)__ecereTemp1)->loc = yylloc, ((struct Initializer *)__ecereTemp1));
1870 }
1871
1872 struct Initializer * MkInitializerList(struct __ecereNameSpace__ecere__sys__OldList * list)
1873 {
1874 void * __ecereTemp1;
1875
1876 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Initializer), ((struct Initializer *)__ecereTemp1)->type = 1, ((struct Initializer *)__ecereTemp1)->list = list, ((struct Initializer *)__ecereTemp1)->loc = yylloc, ((struct Initializer *)__ecereTemp1));
1877 }
1878
1879 struct InitDeclarator * MkInitDeclarator(struct Declarator * declarator, struct Initializer * initializer)
1880 {
1881 void * __ecereTemp1;
1882
1883 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_InitDeclarator), ((struct InitDeclarator *)__ecereTemp1)->declarator = declarator, ((struct InitDeclarator *)__ecereTemp1)->initializer = initializer, ((struct InitDeclarator *)__ecereTemp1));
1884 }
1885
1886 struct TypeName * MkTypeName(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Declarator * declarator)
1887 {
1888 void * __ecereTemp1;
1889
1890 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TypeName), ((struct TypeName *)__ecereTemp1)->qualifiers = qualifiers, ((struct TypeName *)__ecereTemp1)->declarator = declarator, ((struct TypeName *)__ecereTemp1));
1891 }
1892
1893 struct Identifier * GetDeclId(struct Declarator * decl)
1894 {
1895 while(decl && decl->type != 1)
1896 decl = decl->declarator;
1897 return decl ? decl->identifier : (((void *)0));
1898 }
1899
1900 struct Declaration * MkDeclarationClassInst(struct Instantiation * inst)
1901 {
1902 void * __ecereTemp1;
1903
1904 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declaration), ((struct Declaration *)__ecereTemp1)->type = 2, ((struct Declaration *)__ecereTemp1)->inst = inst, ((struct Declaration *)__ecereTemp1)->loc = yylloc, ((struct Declaration *)__ecereTemp1));
1905 }
1906
1907 extern struct Context * globalContext;
1908
1909 struct Type * MkClassTypeSymbol(struct Symbol * symbol);
1910
1911 extern struct __ecereNameSpace__ecere__sys__OldList *  excludedSymbols;
1912
1913 struct Declaration * MkDeclarationInst(struct Instantiation * inst)
1914 {
1915 void * __ecereTemp1;
1916 struct Declaration * decl = (decl = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declaration), decl->type = 2, decl->inst = inst, decl->loc = yylloc, decl);
1917 struct Symbol * symbol;
1918
1919 if(curContext == globalContext && (currentNameSpace || defaultNameSpace) && declMode != 0 && defaultDeclMode != 0)
1920 {
1921 char name[1024];
1922 int len = 0, stringLen;
1923
1924 if(defaultNameSpace)
1925 {
1926 memcpy(name, defaultNameSpace, defaultNameSpaceLen);
1927 len += defaultNameSpaceLen;
1928 name[len++] = ':';
1929 name[len++] = ':';
1930 }
1931 if(currentNameSpace)
1932 {
1933 memcpy(name + len, currentNameSpace, currentNameSpaceLen);
1934 len += currentNameSpaceLen;
1935 name[len++] = ':';
1936 name[len++] = ':';
1937 }
1938 stringLen = strlen(inst->exp->identifier->string);
1939 memcpy(name + len, inst->exp->identifier->string, stringLen);
1940 len += stringLen;
1941 name[len] = (char)0;
1942 (__ecereNameSpace__ecere__com__eSystem_Delete(inst->exp->identifier->string), inst->exp->identifier->string = 0);
1943 inst->exp->identifier->string = __ecereNameSpace__ecere__sys__CopyString(name);
1944 }
1945 symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = (inst->exp->type == 0) ? __ecereNameSpace__ecere__sys__CopyString(inst->exp->identifier->string) : (((void *)0)), ((struct Symbol *)__ecereTemp1)->type = MkClassTypeSymbol(inst->_class->symbol), ((struct Symbol *)__ecereTemp1));
1946 symbol->idCode = symbol->id = curContext->nextID++;
1947 if(strstr(symbol->string, "::"))
1948 curContext->hasNameSpace = 0x1;
1949 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(curContext->templateTypesOnly ? curContext->parent : curContext)->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol))
1950 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
1951 decl->symbol = inst->symbol = symbol;
1952 return decl;
1953 }
1954
1955 extern void PrintExpression(struct Expression * exp, char *  string);
1956
1957 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DefinedExpression;
1958
1959 struct __ecereNameSpace__ecere__com__DefinedExpression;
1960
1961 extern struct __ecereNameSpace__ecere__com__DefinedExpression * __ecereNameSpace__ecere__com__eSystem_FindDefine(struct __ecereNameSpace__ecere__com__Instance * module, char *  name);
1962
1963 extern struct __ecereNameSpace__ecere__com__Instance * privateModule;
1964
1965 extern struct __ecereNameSpace__ecere__com__DefinedExpression * __ecereNameSpace__ecere__com__eSystem_RegisterDefine(char *  name, char *  value, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
1966
1967 extern unsigned int buildingECERECOMModule;
1968
1969 extern void Compiler_Warning(char *  format, ...);
1970
1971 extern char *  __ecereNameSpace__ecere__GetTranslatedString(struct __ecereNameSpace__ecere__com__Instance * module, char *  string, char *  stringAndContext);
1972
1973 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
1974
1975 struct Declaration * MkDeclarationDefine(struct Identifier * id, struct Expression * exp)
1976 {
1977 struct Declaration * decl = (decl = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declaration), decl->type = 3, decl->id = id, decl->exp = exp, decl->loc = yylloc, decl);
1978 char expString[1024];
1979
1980 expString[0] = '\0';
1981 PrintExpression(exp, expString);
1982 if(curContext == globalContext && (currentNameSpace || defaultNameSpace) && declMode != 0 && defaultDeclMode != 0)
1983 {
1984 char name[1024];
1985 int len = 0, stringLen;
1986
1987 if(defaultNameSpace)
1988 {
1989 memcpy(name, defaultNameSpace, defaultNameSpaceLen);
1990 len += defaultNameSpaceLen;
1991 name[len++] = ':';
1992 name[len++] = ':';
1993 }
1994 if(currentNameSpace)
1995 {
1996 memcpy(name + len, currentNameSpace, currentNameSpaceLen);
1997 len += currentNameSpaceLen;
1998 name[len++] = ':';
1999 name[len++] = ':';
2000 }
2001 stringLen = strlen(id->string);
2002 memcpy(name + len, id->string, stringLen);
2003 len += stringLen;
2004 name[len] = (char)0;
2005 (__ecereNameSpace__ecere__com__eSystem_Delete(id->string), id->string = 0);
2006 id->string = __ecereNameSpace__ecere__sys__CopyString(name);
2007 }
2008 if(!__ecereNameSpace__ecere__com__eSystem_FindDefine(privateModule, id->string))
2009 __ecereNameSpace__ecere__com__eSystem_RegisterDefine(id->string, expString, privateModule, buildingECERECOMModule ? 4 : 1);
2010 else
2011 Compiler_Warning(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Redefinition of %s ignored\n", (((void *)0))), id->string);
2012 return decl;
2013 }
2014
2015 extern int sprintf(char * , char * , ...);
2016
2017 struct __ecereNameSpace__ecere__sys__BTNode * __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, char *  key);
2018
2019 struct Declaration * MkDeclaration(struct __ecereNameSpace__ecere__sys__OldList * specifiers, struct __ecereNameSpace__ecere__sys__OldList * initDeclarators)
2020 {
2021 void * __ecereTemp1;
2022 struct Declaration * decl = (decl = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declaration), decl->type = 1, decl->declarators = initDeclarators, decl->specifiers = specifiers, decl->loc = yylloc, decl);
2023 unsigned int variable = 0x1;
2024
2025 if(specifiers != (((void *)0)))
2026 {
2027 struct Specifier * spec;
2028
2029 for(spec = specifiers->first; spec; spec = spec->next)
2030 {
2031 if(spec->type == 0 && spec->specifier == TYPEDEF)
2032 {
2033 if(initDeclarators != (((void *)0)))
2034 {
2035 struct InitDeclarator * d;
2036
2037 for(d = initDeclarators->first; d; d = d->next)
2038 {
2039 if(GetDeclId(d->declarator)->string)
2040 {
2041 struct Symbol * type = (type = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), type->string = __ecereNameSpace__ecere__sys__CopyString(GetDeclId(d->declarator)->string), type->type = ProcessType(specifiers, d->declarator), type);
2042
2043 type->id = type->idCode = curContext->nextID++;
2044 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(curContext->templateTypesOnly ? curContext->parent : curContext)->types, (struct __ecereNameSpace__ecere__sys__BTNode *)type))
2045 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), type);
2046 decl->symbol = d->declarator->symbol = type;
2047 }
2048 }
2049 }
2050 else if(spec->next)
2051 {
2052 for(; spec; spec = spec->next)
2053 {
2054 if(spec->type == 1 && spec->name)
2055 {
2056 struct Symbol * type = (type = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), type->string = __ecereNameSpace__ecere__sys__CopyString(spec->name), type->type = ProcessType(specifiers, (((void *)0))), type);
2057
2058 type->id = type->idCode = curContext->nextID++;
2059 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(curContext->templateTypesOnly ? curContext->parent : curContext)->types, (struct __ecereNameSpace__ecere__sys__BTNode *)type))
2060 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), type);
2061 decl->symbol = type;
2062 }
2063 }
2064 }
2065 variable = 0x0;
2066 break;
2067 }
2068 else if(spec->type == 0 && (spec->specifier == STRUCT || spec->specifier == UNION))
2069 variable = 0x0;
2070 }
2071 }
2072 if(variable && initDeclarators)
2073 {
2074 struct InitDeclarator * d;
2075
2076 for(d = initDeclarators->first; d; d = d->next)
2077 {
2078 struct Identifier * id = GetDeclId(d->declarator);
2079
2080 if(id && id->string && id->string[0])
2081 {
2082 if(curContext)
2083 {
2084 struct Symbol * symbol;
2085
2086 if(curContext == globalContext && (currentNameSpace || defaultNameSpace) && declMode != 0 && defaultDeclMode != 0)
2087 {
2088 char name[1024];
2089 int len = 0, stringLen;
2090
2091 if(defaultNameSpace)
2092 {
2093 memcpy(name, defaultNameSpace, defaultNameSpaceLen);
2094 len += defaultNameSpaceLen;
2095 name[len++] = ':';
2096 name[len++] = ':';
2097 }
2098 if(currentNameSpace)
2099 {
2100 memcpy(name + len, currentNameSpace, currentNameSpaceLen);
2101 len += currentNameSpaceLen;
2102 name[len++] = ':';
2103 name[len++] = ':';
2104 }
2105 stringLen = strlen(id->string);
2106 memcpy(name + len, id->string, stringLen);
2107 len += stringLen;
2108 name[len] = (char)0;
2109 (__ecereNameSpace__ecere__com__eSystem_Delete(id->string), id->string = 0);
2110 id->string = __ecereNameSpace__ecere__sys__CopyString(name);
2111 }
2112 symbol = (struct Symbol *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(curContext->templateTypesOnly ? curContext->parent : curContext)->symbols, id->string);
2113 if(!symbol)
2114 {
2115 symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(id->string), ((struct Symbol *)__ecereTemp1)->type = ProcessType(specifiers, d->declarator), ((struct Symbol *)__ecereTemp1));
2116 if(strstr(symbol->string, "::"))
2117 curContext->hasNameSpace = 0x1;
2118 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(curContext->templateTypesOnly ? curContext->parent : curContext)->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol))
2119 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
2120 if(symbol->type && symbol->type->kind == 12 && !symbol->type->arraySizeExp && d->initializer)
2121 {
2122 if(d->initializer->type == 1)
2123 {
2124 char string[256];
2125
2126 sprintf(string, "%d", (*d->initializer->list).count);
2127 symbol->type->arraySizeExp = MkExpConstant(string);
2128 symbol->type->freeExp = 0x1;
2129 }
2130 else if(d->initializer->type == 0 && d->initializer->exp->type == 3 && d->initializer->exp->string)
2131 {
2132 char string[256];
2133 int c, count = 0;
2134 char ch;
2135 unsigned int escaped = 0x0;
2136 char * s = d->initializer->exp->string;
2137
2138 for(c = 1; (ch = s[c]); c++)
2139 {
2140 if(ch == '\\' && !escaped)
2141 escaped = 0x1;
2142 else
2143 {
2144 count++;
2145 escaped = 0x0;
2146 }
2147 }
2148 sprintf(string, "%d", count);
2149 symbol->type->arraySizeExp = MkExpConstant(string);
2150 symbol->type->freeExp = 0x1;
2151 }
2152 }
2153 symbol->id = symbol->idCode = curContext->nextID++;
2154 }
2155 decl->symbol = d->declarator->symbol = symbol;
2156 }
2157 }
2158 }
2159 }
2160 else
2161 {
2162 decl->symbol = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol);
2163 decl->symbol->id = decl->symbol->idCode = curContext->nextID++;
2164 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), decl->symbol);
2165 }
2166 return decl;
2167 }
2168
2169 struct Declaration * MkStructDeclaration(struct __ecereNameSpace__ecere__sys__OldList * specifiers, struct __ecereNameSpace__ecere__sys__OldList * declarators, struct Specifier * extStorage)
2170 {
2171 void * __ecereTemp1;
2172
2173 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declaration), ((struct Declaration *)__ecereTemp1)->type = 0, ((struct Declaration *)__ecereTemp1)->declarators = declarators, ((struct Declaration *)__ecereTemp1)->specifiers = specifiers, ((struct Declaration *)__ecereTemp1)->extStorage = extStorage, ((struct Declaration *)__ecereTemp1)->loc = yylloc, ((struct Declaration *)__ecereTemp1));
2174 }
2175
2176 struct Statement * MkLabeledStmt(struct Identifier * id, struct Statement * statement)
2177 {
2178 void * __ecereTemp1;
2179
2180 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 0, ((struct Statement *)__ecereTemp1)->labeled.id = id, ((struct Statement *)__ecereTemp1)->labeled.stmt = statement, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2181 }
2182
2183 struct Statement * MkCaseStmt(struct Expression * exp, struct Statement * statement)
2184 {
2185 void * __ecereTemp1;
2186
2187 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 1, ((struct Statement *)__ecereTemp1)->caseStmt.exp = exp, ((struct Statement *)__ecereTemp1)->caseStmt.stmt = statement, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2188 }
2189
2190 struct Statement * MkCompoundStmt(struct __ecereNameSpace__ecere__sys__OldList * declarations, struct __ecereNameSpace__ecere__sys__OldList * statements)
2191 {
2192 void * __ecereTemp1;
2193
2194 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 2, ((struct Statement *)__ecereTemp1)->compound.declarations = declarations, ((struct Statement *)__ecereTemp1)->compound.statements = statements, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2195 }
2196
2197 struct Statement * MkExpressionStmt(struct __ecereNameSpace__ecere__sys__OldList * expressions)
2198 {
2199 void * __ecereTemp1;
2200
2201 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 3, ((struct Statement *)__ecereTemp1)->expressions = expressions, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2202 }
2203
2204 struct Statement * MkBadDeclStmt(struct Declaration * decl)
2205 {
2206 void * __ecereTemp1;
2207
2208 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 14, ((struct Statement *)__ecereTemp1)->decl = decl, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2209 }
2210
2211 struct Statement * MkIfStmt(struct __ecereNameSpace__ecere__sys__OldList * exp, struct Statement * statement, struct Statement * elseStmt)
2212 {
2213 void * __ecereTemp1;
2214
2215 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 4, ((struct Statement *)__ecereTemp1)->ifStmt.exp = exp, ((struct Statement *)__ecereTemp1)->ifStmt.stmt = statement, ((struct Statement *)__ecereTemp1)->ifStmt.elseStmt = elseStmt, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2216 }
2217
2218 struct Statement * MkSwitchStmt(struct __ecereNameSpace__ecere__sys__OldList * exp, struct Statement * statement)
2219 {
2220 void * __ecereTemp1;
2221
2222 if(statement)
2223 statement->compound.isSwitch = 0x1;
2224 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 5, ((struct Statement *)__ecereTemp1)->switchStmt.exp = exp, ((struct Statement *)__ecereTemp1)->switchStmt.stmt = statement, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2225 }
2226
2227 struct Statement * MkWhileStmt(struct __ecereNameSpace__ecere__sys__OldList * exp, struct Statement * statement)
2228 {
2229 void * __ecereTemp1;
2230
2231 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 6, ((struct Statement *)__ecereTemp1)->whileStmt.exp = exp, ((struct Statement *)__ecereTemp1)->whileStmt.stmt = statement, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2232 }
2233
2234 struct Statement * MkDoWhileStmt(struct Statement * statement, struct __ecereNameSpace__ecere__sys__OldList * exp)
2235 {
2236 void * __ecereTemp1;
2237
2238 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 7, ((struct Statement *)__ecereTemp1)->doWhile.exp = exp, ((struct Statement *)__ecereTemp1)->doWhile.stmt = statement, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2239 }
2240
2241 struct Statement * MkForStmt(struct Statement * init, struct Statement * check, struct __ecereNameSpace__ecere__sys__OldList * inc, struct Statement * statement)
2242 {
2243 void * __ecereTemp1;
2244
2245 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 8, ((struct Statement *)__ecereTemp1)->forStmt.init = init, ((struct Statement *)__ecereTemp1)->forStmt.check = check, ((struct Statement *)__ecereTemp1)->forStmt.increment = inc, ((struct Statement *)__ecereTemp1)->forStmt.stmt = statement, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2246 }
2247
2248 struct Statement * MkForEachStmt(struct Identifier * id, struct __ecereNameSpace__ecere__sys__OldList * exp, struct __ecereNameSpace__ecere__sys__OldList * filter, struct Statement * statement)
2249 {
2250 void * __ecereTemp1;
2251
2252 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 18, ((struct Statement *)__ecereTemp1)->forEachStmt.id = id, ((struct Statement *)__ecereTemp1)->forEachStmt.exp = exp, ((struct Statement *)__ecereTemp1)->forEachStmt.filter = filter, ((struct Statement *)__ecereTemp1)->forEachStmt.stmt = statement, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2253 }
2254
2255 struct Statement * MkGotoStmt(struct Identifier * id)
2256 {
2257 void * __ecereTemp1;
2258
2259 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 9, ((struct Statement *)__ecereTemp1)->gotoStmt.id = id, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2260 }
2261
2262 struct Statement * MkContinueStmt()
2263 {
2264 void * __ecereTemp1;
2265
2266 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 10, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2267 }
2268
2269 struct Statement * MkBreakStmt()
2270 {
2271 void * __ecereTemp1;
2272
2273 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 11, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2274 }
2275
2276 struct Statement * MkReturnStmt(struct __ecereNameSpace__ecere__sys__OldList * exp)
2277 {
2278 void * __ecereTemp1;
2279
2280 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 12, ((struct Statement *)__ecereTemp1)->expressions = exp, ((struct Statement *)__ecereTemp1)->loc = yylloc, ((struct Statement *)__ecereTemp1));
2281 }
2282
2283 struct FunctionDefinition * MkFunction(struct __ecereNameSpace__ecere__sys__OldList * specifiers, struct Declarator * declarator, struct __ecereNameSpace__ecere__sys__OldList * declarationList)
2284 {
2285 void * __ecereTemp1;
2286
2287 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_FunctionDefinition), ((struct FunctionDefinition *)__ecereTemp1)->specifiers = specifiers, ((struct FunctionDefinition *)__ecereTemp1)->declarator = declarator, ((struct FunctionDefinition *)__ecereTemp1)->declarations = declarationList, ((struct FunctionDefinition *)__ecereTemp1));
2288 }
2289
2290 extern struct Declarator * GetFuncDecl(struct Declarator * decl);
2291
2292 struct __ecereNameSpace__ecere__sys__BTNode * __ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(struct __ecereNameSpace__ecere__sys__BinaryTree * this);
2293
2294 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__sys__BinaryTree_first;
2295
2296 struct __ecereNameSpace__ecere__sys__BTNode * __ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(struct __ecereNameSpace__ecere__sys__BTNode * this);
2297
2298 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__sys__BTNode_next;
2299
2300 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
2301
2302 void ProcessFunctionBody(struct FunctionDefinition * func, struct Statement * body)
2303 {
2304 void * __ecereTemp1;
2305 struct Declarator * declarator = func->declarator;
2306 struct Declarator * funcDecl = GetFuncDecl(declarator);
2307 struct Symbol * symbol;
2308
2309 func->body = body;
2310 if(funcDecl && funcDecl->function.parameters && body)
2311 {
2312 struct Context * context = body->compound.context;
2313 struct TypeName * param;
2314
2315 for(param = (*funcDecl->function.parameters).first; param; param = param->next)
2316 {
2317 if(param->declarator)
2318 {
2319 struct Symbol * symbol = (((void *)0));
2320 struct Identifier * id = GetDeclId(param->declarator);
2321 char * string = id ? id->string : (((void *)0));
2322
2323 if(string)
2324 {
2325 for(symbol = (struct Symbol *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&context->symbols); symbol; symbol = (struct Symbol *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)symbol)))
2326 if(!strcmp(symbol->string, string))
2327 break;
2328 if(!symbol && id)
2329 {
2330 symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(id->string), ((struct Symbol *)__ecereTemp1)->type = ProcessType(param->qualifiers, param->declarator), ((struct Symbol *)__ecereTemp1)->isParam = 0x1, ((struct Symbol *)__ecereTemp1));
2331 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&context->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol))
2332 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
2333 symbol->id = context->nextID++;
2334 param->declarator->symbol = symbol;
2335 }
2336 }
2337 }
2338 }
2339 }
2340 if(!declarator->symbol)
2341 {
2342 struct Identifier * id = GetDeclId(declarator);
2343
2344 if((currentNameSpace || defaultNameSpace) && declMode != 0 && defaultDeclMode != 0 && strcmp(id->string, "__on_register_module"))
2345 {
2346 char name[1024];
2347 int len = 0, stringLen;
2348
2349 if(defaultNameSpace)
2350 {
2351 memcpy(name, defaultNameSpace, defaultNameSpaceLen);
2352 len += defaultNameSpaceLen;
2353 name[len++] = ':';
2354 name[len++] = ':';
2355 }
2356 if(currentNameSpace)
2357 {
2358 memcpy(name + len, currentNameSpace, currentNameSpaceLen);
2359 len += currentNameSpaceLen;
2360 name[len++] = ':';
2361 name[len++] = ':';
2362 }
2363 stringLen = strlen(id->string);
2364 memcpy(name + len, id->string, stringLen);
2365 len += stringLen;
2366 name[len] = (char)0;
2367 (__ecereNameSpace__ecere__com__eSystem_Delete(id->string), id->string = 0);
2368 id->string = __ecereNameSpace__ecere__sys__CopyString(name);
2369 }
2370 symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(id->string), ((struct Symbol *)__ecereTemp1)->type = ProcessType(func->specifiers, declarator), ((struct Symbol *)__ecereTemp1));
2371 symbol->idCode = symbol->id = globalContext->nextID++;
2372 if(strstr(symbol->string, "::"))
2373 globalContext->hasNameSpace = 0x1;
2374 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol))
2375 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
2376 declarator->symbol = symbol;
2377 }
2378 else
2379 {
2380 symbol = declarator->symbol;
2381 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove((&*excludedSymbols), declarator->symbol);
2382 (__ecereNameSpace__ecere__com__eSystem_Delete(symbol->string), symbol->string = 0);
2383 symbol->string = __ecereNameSpace__ecere__sys__CopyString(GetDeclId(declarator)->string);
2384 if(strstr(symbol->string, "::"))
2385 globalContext->hasNameSpace = 0x1;
2386 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol))
2387 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
2388 if(!symbol->type)
2389 symbol->type = ProcessType(func->specifiers, declarator);
2390 }
2391 if(symbol->type && (symbol->type->kind == 11 || symbol->type->kind == 16))
2392 {
2393 if(!symbol->type->params.count)
2394 {
2395 struct Type * type = (type = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), type->refCount = 1, type);
2396
2397 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&symbol->type->params, type);
2398 }
2399 }
2400 else
2401 {
2402 }
2403 }
2404
2405 struct External * MkExternalFunction(struct FunctionDefinition * function)
2406 {
2407 struct External * external = (external = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_External), external->type = 0, external->function = function, external->symbol = function->declarator->symbol, external);
2408
2409 if(function->specifiers)
2410 {
2411 struct Specifier * spec;
2412
2413 for(spec = (*function->specifiers).first; spec; spec = spec->next)
2414 if(spec->type == 0 && spec->specifier == STATIC)
2415 {
2416 declMode = 3;
2417 break;
2418 }
2419 }
2420 if(external->symbol && !external->symbol->methodExternal)
2421 external->symbol->methodExternal = external;
2422 return external;
2423 }
2424
2425 extern char *  strncpy(char * , const char * , int n);
2426
2427 extern void ImportModule(char *  name, int importType, int importAccess, unsigned int loadDllOnly);
2428
2429 struct External * MkExternalImport(char * name, int importType, int importAccess)
2430 {
2431 struct External * external = (external = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_External), external->type = 3, external);
2432 int len = strlen(name) - 2;
2433
2434 external->importString = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (len + 1));
2435 strncpy(external->importString, name + 1, len);
2436 external->importString[len] = '\0';
2437 (__ecereNameSpace__ecere__com__eSystem_Delete(name), name = 0);
2438 {
2439 ImportModule(external->importString, importType, importAccess, 0x1);
2440 ImportModule(external->importString, importType, importAccess, 0x0);
2441 }
2442 return external;
2443 }
2444
2445 struct External * MkExternalDeclaration(struct Declaration * declaration)
2446 {
2447 struct External * external = (external = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_External), external->type = 1, external->declaration = declaration, external->symbol = declaration ? declaration->symbol : (((void *)0)), external);
2448 struct InitDeclarator * d = (declaration && declaration->declarators) ? (*declaration->declarators).last : (((void *)0));
2449
2450 if(declaration && declaration->type == 1 && declaration->specifiers)
2451 {
2452 struct Specifier * spec;
2453
2454 for(spec = (*declaration->specifiers).first; spec; spec = spec->next)
2455 if(spec->type == 0 && spec->specifier == TYPEDEF)
2456 {
2457 declMode = 0;
2458 break;
2459 }
2460 else if(spec->type == 0 && spec->specifier == STATIC)
2461 {
2462 declMode = 3;
2463 break;
2464 }
2465 }
2466 if(declaration && declaration->symbol && !declaration->symbol->methodExternal)
2467 declaration->symbol->methodExternal = external;
2468 return external;
2469 }
2470
2471 struct External * MkExternalNameSpace(struct Identifier * identifier)
2472 {
2473 struct External * external = (external = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_External), external->type = 4, external->id = identifier, external);
2474
2475 currentNameSpace = identifier ? identifier->string : (((void *)0));
2476 currentNameSpaceLen = currentNameSpace ? strlen(currentNameSpace) : 0;
2477 return external;
2478 }
2479
2480 extern char *  strcpy(char * , const char * );
2481
2482 extern char *  strcat(char * , const char * );
2483
2484 extern struct __ecereNameSpace__ecere__com__Class * thisClass;
2485
2486 extern char *  StringFromSpecDecl(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl);
2487
2488 struct Symbol * _DeclClass(int symbolID, char *  name);
2489
2490 extern void FreeList(struct __ecereNameSpace__ecere__sys__OldList * list, void (* )(void * ));
2491
2492 extern void FreeTemplateArgument(struct TemplateArgument * arg);
2493
2494 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldLink;
2495
2496 struct __ecereNameSpace__ecere__sys__OldLink
2497 {
2498 struct __ecereNameSpace__ecere__sys__OldLink * prev;
2499 struct __ecereNameSpace__ecere__sys__OldLink * next;
2500 void *  data;
2501 };
2502
2503 void SetClassTemplateArgs(struct Specifier * spec, struct __ecereNameSpace__ecere__sys__OldList * templateArgs)
2504 {
2505 void * __ecereTemp1;
2506
2507 if(spec->type == 1)
2508 {
2509 struct Symbol * symbol = spec->symbol;
2510
2511 spec->templateArgs = templateArgs;
2512 if(templateArgs && templateArgs->first)
2513 {
2514 char templateString[1024];
2515 struct TemplateArgument * arg;
2516
2517 strcpy(templateString, symbol ? symbol->string : spec->name);
2518 strcat(templateString, "<");
2519 for(arg = templateArgs->first; arg; arg = arg->next)
2520 {
2521 char argument[256];
2522
2523 argument[0] = '\0';
2524 switch(arg->type)
2525 {
2526 case 2:
2527 {
2528 char expString[1024];
2529 struct __ecereNameSpace__ecere__com__Class * backupThisClass = thisClass;
2530
2531 thisClass = (((void *)0));
2532 expString[0] = '\0';
2533 PrintExpression(arg->expression, expString);
2534 strcat(argument, expString);
2535 thisClass = backupThisClass;
2536 break;
2537 }
2538 case 1:
2539 {
2540 strcat(argument, arg->identifier->string);
2541 break;
2542 }
2543 case 0:
2544 {
2545 char * typeString = StringFromSpecDecl(arg->templateDatatype->specifiers, arg->templateDatatype->decl);
2546
2547 strcat(argument, typeString);
2548 (__ecereNameSpace__ecere__com__eSystem_Delete(typeString), typeString = 0);
2549 break;
2550 }
2551 }
2552 if(argument[0])
2553 {
2554 if(arg->prev)
2555 strcat(templateString, ", ");
2556 if(arg->name)
2557 {
2558 strcat(templateString, arg->name->string);
2559 strcat(templateString, " = ");
2560 }
2561 strcat(templateString, argument);
2562 }
2563 }
2564 {
2565 int len = strlen(templateString);
2566
2567 if(templateString[len - 1] == '>')
2568 templateString[len++] = ' ';
2569 templateString[len++] = '>';
2570 templateString[len++] = '\0';
2571 }
2572 symbol = FindClass(templateString);
2573 if(!symbol && spec->symbol)
2574 {
2575 symbol = _DeclClass((((int)0x7fffffff)), templateString);
2576 }
2577 if(spec->symbol)
2578 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&spec->symbol->templatedClasses, (__ecereTemp1 = __ecereNameSpace__ecere__com__eSystem_New0(12), ((struct __ecereNameSpace__ecere__sys__OldLink *)__ecereTemp1)->data = symbol, ((struct __ecereNameSpace__ecere__sys__OldLink *)__ecereTemp1)));
2579 (__ecereNameSpace__ecere__com__eSystem_Delete(spec->name), spec->name = 0);
2580 spec->symbol = symbol;
2581 spec->name = __ecereNameSpace__ecere__sys__CopyString(symbol ? symbol->string : templateString);
2582 }
2583 }
2584 else
2585 FreeList(templateArgs, FreeTemplateArgument);
2586 }
2587
2588 extern int strncmp(const char * , const char * , int n);
2589
2590 struct Specifier * _MkSpecifierName(char * name, struct Symbol * symbol, struct __ecereNameSpace__ecere__sys__OldList * templateArgs)
2591 {
2592 struct Specifier * spec = (spec = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Specifier), spec->type = 1, spec);
2593
2594 if(name)
2595 {
2596 if(!symbol)
2597 {
2598 struct TemplatedType * templatedType = FindTemplateTypeParameter(curContext, name);
2599
2600 if(templatedType)
2601 {
2602 spec->templateParameter = templatedType->param;
2603 spec->type = 8;
2604 return spec;
2605 }
2606 else
2607 symbol = FindClass(name);
2608 }
2609 if(symbol && symbol->registered && symbol->registered->isRemote == (unsigned int)1)
2610 {
2611 char className[1024];
2612
2613 strcpy(className, "DCOMClient_");
2614 if(!strncmp(name, className, strlen(className)))
2615 spec->name = __ecereNameSpace__ecere__sys__CopyString(name);
2616 else
2617 {
2618 strcat(className, name);
2619 spec->name = __ecereNameSpace__ecere__sys__CopyString(className);
2620 }
2621 }
2622 else if(symbol)
2623 spec->name = __ecereNameSpace__ecere__sys__CopyString(symbol->string);
2624 else
2625 spec->name = __ecereNameSpace__ecere__sys__CopyString(name);
2626 spec->symbol = symbol;
2627 if(templateArgs != (((void *)0)))
2628 SetClassTemplateArgs(spec, templateArgs);
2629 }
2630 return spec;
2631 }
2632
2633 struct Specifier * MkSpecifierName(char * name)
2634 {
2635 return _MkSpecifierName(name, (((void *)0)), (((void *)0)));
2636 }
2637
2638 struct Specifier * MkSpecifierNameArgs(char * name, struct __ecereNameSpace__ecere__sys__OldList * templateArgs)
2639 {
2640 return _MkSpecifierName(name, (((void *)0)), templateArgs);
2641 }
2642
2643 struct ClassFunction * MkClassFunction(struct __ecereNameSpace__ecere__sys__OldList * specifiers, struct Specifier * _class, struct Declarator * decl, struct __ecereNameSpace__ecere__sys__OldList * declList)
2644 {
2645 void * __ecereTemp1;
2646
2647 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassFunction), ((struct ClassFunction *)__ecereTemp1)->specifiers = specifiers, ((struct ClassFunction *)__ecereTemp1)->declarator = decl, ((struct ClassFunction *)__ecereTemp1)->declarations = declList, ((struct ClassFunction *)__ecereTemp1));
2648 }
2649
2650 extern struct Specifier * CopySpecifier(struct Specifier * spec);
2651
2652 extern void FreeSpecifier(struct Specifier * spec);
2653
2654 void ProcessClassFunctionBody(struct ClassFunction * func, struct Statement * body)
2655 {
2656 void * __ecereTemp1;
2657 struct Symbol * symbol;
2658 struct Declarator * decl = func->declarator;
2659 struct Declarator * funcDecl = GetFuncDecl(func->declarator);
2660
2661 func->body = body;
2662 if(decl && !decl->symbol)
2663 {
2664 struct __ecereNameSpace__ecere__sys__OldList * symbolSpecs = MkList();
2665
2666 if(funcDecl && funcDecl->function.parameters && body)
2667 {
2668 struct Context * context = body->compound.context;
2669 struct TypeName * param;
2670
2671 for(param = (*funcDecl->function.parameters).first; param; param = param->next)
2672 {
2673 if(param->declarator)
2674 {
2675 struct Symbol * symbol = (((void *)0));
2676 struct Identifier * id = GetDeclId(param->declarator);
2677 char * string = id ? id->string : (((void *)0));
2678
2679 if(string)
2680 {
2681 symbol = (struct Symbol *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&context->symbols, string);
2682 }
2683 if(!symbol && id)
2684 {
2685 symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(id->string), ((struct Symbol *)__ecereTemp1)->type = ProcessType(param->qualifiers, param->declarator), ((struct Symbol *)__ecereTemp1)->isParam = 0x1, ((struct Symbol *)__ecereTemp1));
2686 symbol->idCode = symbol->id = context->nextID++;
2687 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&context->symbols, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol))
2688 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
2689 param->declarator->symbol = symbol;
2690 }
2691 }
2692 }
2693 }
2694 symbol = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol);
2695 {
2696 struct Identifier * id = GetDeclId(funcDecl);
2697
2698 if(id)
2699 {
2700 int c;
2701
2702 for(c = strlen(id->string) - 1; c >= 0; c--)
2703 {
2704 if(id->string[c] == ':')
2705 {
2706 char * string = __ecereNameSpace__ecere__sys__CopyString(id->string + c + 1);
2707
2708 id->string[c - 1] = (char)0;
2709 id->_class = MkSpecifierName(id->string);
2710 (__ecereNameSpace__ecere__com__eSystem_Delete(id->string), id->string = 0);
2711 id->string = string;
2712 break;
2713 }
2714 }
2715 symbol->string = __ecereNameSpace__ecere__sys__CopyString(id->string);
2716 }
2717 }
2718 if(func->specifiers)
2719 {
2720 struct Specifier * spec;
2721
2722 for(spec = (*func->specifiers).first; spec; spec = spec->next)
2723 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*symbolSpecs), CopySpecifier(spec));
2724 }
2725 symbol->type = ProcessType(symbolSpecs, decl);
2726 symbol->idCode = symbol->id = globalContext->nextID++;
2727 decl->symbol = symbol;
2728 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
2729 FreeList(symbolSpecs, FreeSpecifier);
2730 }
2731 }
2732
2733 struct __ecereNameSpace__ecere__sys__OldList * MkSpecsClass(struct Specifier * _class)
2734 {
2735 struct __ecereNameSpace__ecere__sys__OldList * list = MkList();
2736
2737 ListAdd(list, _class);
2738 return list;
2739 }
2740
2741 struct MemberInit * MkMemberInit(struct __ecereNameSpace__ecere__sys__OldList * ids, struct Initializer * initializer)
2742 {
2743 void * __ecereTemp1;
2744
2745 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_MemberInit), ((struct MemberInit *)__ecereTemp1)->identifiers = ids, ((struct MemberInit *)__ecereTemp1)->initializer = initializer, ((struct MemberInit *)__ecereTemp1));
2746 }
2747
2748 extern void FreeExpression(struct Expression * exp);
2749
2750 struct MemberInit * MkMemberInitExp(struct Expression * idExp, struct Initializer * initializer)
2751 {
2752 struct MemberInit * init = (init = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_MemberInit), init->initializer = initializer, init->identifiers = MkList(), init);
2753 struct Expression * exp;
2754
2755 for(exp = idExp; exp && exp->type == 8; exp = exp->member.exp)
2756 {
2757 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert((&*init->identifiers), (((void *)0)), exp->member.member);
2758 exp->member.member = (((void *)0));
2759 }
2760 if(exp && exp->type == 0)
2761 {
2762 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert((&*init->identifiers), (((void *)0)), exp->identifier);
2763 exp->identifier = (((void *)0));
2764 }
2765 FreeExpression(idExp);
2766 return init;
2767 }
2768
2769 struct MembersInit * MkMembersInitList(struct __ecereNameSpace__ecere__sys__OldList * dataMembers)
2770 {
2771 void * __ecereTemp1;
2772
2773 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_MembersInit), ((struct MembersInit *)__ecereTemp1)->type = 0, ((struct MembersInit *)__ecereTemp1)->dataMembers = dataMembers, ((struct MembersInit *)__ecereTemp1));
2774 }
2775
2776 struct MembersInit * MkMembersInitMethod(struct ClassFunction * function)
2777 {
2778 void * __ecereTemp1;
2779
2780 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_MembersInit), ((struct MembersInit *)__ecereTemp1)->type = 1, ((struct MembersInit *)__ecereTemp1)->function = function, ((struct MembersInit *)__ecereTemp1));
2781 }
2782
2783 struct Instantiation * MkInstantiation(struct Specifier * _class, struct Expression * exp, struct __ecereNameSpace__ecere__sys__OldList * members)
2784 {
2785 void * __ecereTemp1;
2786
2787 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Instantiation), ((struct Instantiation *)__ecereTemp1)->_class = _class, ((struct Instantiation *)__ecereTemp1)->exp = exp, ((struct Instantiation *)__ecereTemp1)->members = members, ((struct Instantiation *)__ecereTemp1));
2788 }
2789
2790 extern void Compiler_Error(char *  format, ...);
2791
2792 struct Instantiation * MkInstantiationNamed(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Expression * exp, struct __ecereNameSpace__ecere__sys__OldList * members)
2793 {
2794 struct Instantiation * inst = (inst = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Instantiation), inst->exp = exp, inst->members = members, inst);
2795
2796 if(specs != (((void *)0)))
2797 {
2798 struct Specifier * spec;
2799
2800 for(spec = specs->first; spec; spec = spec->next)
2801 if(spec->type == 1)
2802 {
2803 inst->_class = spec;
2804 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Remove(specs, spec);
2805 break;
2806 }
2807 FreeList(specs, FreeSpecifier);
2808 if(!spec)
2809 {
2810 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Expecting class specifier\n", (((void *)0))));
2811 inst->_class = MkSpecifierName("");
2812 }
2813 }
2814 return inst;
2815 }
2816
2817 struct ClassDef * MkClassDefAccessOverride(int access, struct Identifier * id)
2818 {
2819 void * __ecereTemp1;
2820
2821 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 13, ((struct ClassDef *)__ecereTemp1)->id = id, ((struct ClassDef *)__ecereTemp1)->memberAccess = access, ((struct ClassDef *)__ecereTemp1));
2822 }
2823
2824 struct ClassDef * MkClassDefMemberAccess()
2825 {
2826 void * __ecereTemp1;
2827
2828 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 12, ((struct ClassDef *)__ecereTemp1));
2829 }
2830
2831 struct ClassDef * MkClassDefDeclaration(struct Declaration * decl)
2832 {
2833 void * __ecereTemp1;
2834
2835 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 2, ((struct ClassDef *)__ecereTemp1)->decl = decl, ((struct ClassDef *)__ecereTemp1));
2836 }
2837
2838 struct ClassDef * MkClassDefClassData(struct Declaration * decl)
2839 {
2840 void * __ecereTemp1;
2841
2842 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 9, ((struct ClassDef *)__ecereTemp1)->decl = decl, ((struct ClassDef *)__ecereTemp1));
2843 }
2844
2845 struct ClassDef * MkClassDefDesigner(char * designer)
2846 {
2847 void * __ecereTemp1;
2848
2849 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 5, ((struct ClassDef *)__ecereTemp1)->designer = __ecereNameSpace__ecere__sys__CopyString(designer), ((struct ClassDef *)__ecereTemp1));
2850 }
2851
2852 struct ClassDef * MkClassDefNoExpansion()
2853 {
2854 void * __ecereTemp1;
2855
2856 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 6, ((struct ClassDef *)__ecereTemp1));
2857 }
2858
2859 struct ClassDef * MkClassDefFixed()
2860 {
2861 void * __ecereTemp1;
2862
2863 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 7, ((struct ClassDef *)__ecereTemp1));
2864 }
2865
2866 struct ClassDef * MkClassDefDesignerDefaultProperty(struct Identifier * id)
2867 {
2868 void * __ecereTemp1;
2869
2870 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 8, ((struct ClassDef *)__ecereTemp1)->defaultProperty = id, ((struct ClassDef *)__ecereTemp1));
2871 }
2872
2873 struct ClassDef * MkClassDefDefaultProperty(struct __ecereNameSpace__ecere__sys__OldList * defProperties)
2874 {
2875 void * __ecereTemp1;
2876
2877 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 1, ((struct ClassDef *)__ecereTemp1)->defProperties = defProperties, ((struct ClassDef *)__ecereTemp1));
2878 }
2879
2880 extern void FreeClassFunction(struct ClassFunction * func);
2881
2882 struct ClassDef * MkClassDefFunction(struct ClassFunction * function)
2883 {
2884 struct ClassDef * def = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef);
2885
2886 if(function && function->declarator)
2887 {
2888 struct Declarator * funcDecl = GetFuncDecl(function->declarator);
2889
2890 if(funcDecl && funcDecl->declarator && funcDecl->declarator->type == 2)
2891 {
2892 def->type = 2;
2893 def->decl = MkStructDeclaration(function->specifiers, MkListOne(MkStructDeclarator(function->declarator, (((void *)0)))), (((void *)0)));
2894 function->declarator = (((void *)0));
2895 function->specifiers = (((void *)0));
2896 FreeClassFunction(function);
2897 return def;
2898 }
2899 }
2900 def->type = 0;
2901 def->function = function;
2902 return def;
2903 }
2904
2905 struct Symbol * DeclClassAddNameSpace(int symbolID, char * className)
2906 {
2907 char name[1024];
2908 int len = 0, stringLen;
2909
2910 name[0] = '\0';
2911 if((currentNameSpace || defaultNameSpace) && declMode != 0 && defaultDeclMode != 0)
2912 {
2913 if(defaultNameSpace)
2914 {
2915 memcpy(name, defaultNameSpace, defaultNameSpaceLen);
2916 len += defaultNameSpaceLen;
2917 name[len++] = ':';
2918 name[len++] = ':';
2919 }
2920 if(currentNameSpace)
2921 {
2922 memcpy(name + len, currentNameSpace, currentNameSpaceLen);
2923 len += currentNameSpaceLen;
2924 name[len++] = ':';
2925 name[len++] = ':';
2926 }
2927 }
2928 stringLen = strlen(className);
2929 memcpy(name + len, className, stringLen);
2930 len += stringLen;
2931 name[len] = (char)0;
2932 return _DeclClass(symbolID, name);
2933 }
2934
2935 extern char *  strchr(char * , int);
2936
2937 struct Symbol * DeclClass(int symbolID, char * name)
2938 {
2939 if(strchr(name, ':'))
2940 return _DeclClass(symbolID, name);
2941 else
2942 return DeclClassAddNameSpace(symbolID, name);
2943 }
2944
2945 struct Symbol * _DeclClass(int symbolID, char * name)
2946 {
2947 void * __ecereTemp1;
2948 struct Symbol * symbol = FindClass(name);
2949
2950 if(!symbol)
2951 {
2952 if(name[0] == ':' && name[1] == ':')
2953 name += 2;
2954 symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(name), ((struct Symbol *)__ecereTemp1)->idCode = symbolID, ((struct Symbol *)__ecereTemp1)->id = symbolID, ((struct Symbol *)__ecereTemp1));
2955 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->classes, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol))
2956 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
2957 {
2958 int start = 0, c;
2959 char ch;
2960
2961 for(c = 0; (ch = name[c]); c++)
2962 {
2963 if(ch == '.' || (ch == ':' && name[c + 1] == ':'))
2964 {
2965 if(ch == ':')
2966 c++;
2967 start = c + 1;
2968 }
2969 }
2970 if(start && c - start)
2971 symbol->shortName = __ecereNameSpace__ecere__sys__CopyString(name + start);
2972 }
2973 }
2974 if(symbolID)
2975 symbol->idCode = symbol->id = symbolID;
2976 return symbol;
2977 }
2978
2979 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateParameter;
2980
2981 struct __ecereNameSpace__ecere__com__ClassTemplateParameter
2982 {
2983 struct __ecereNameSpace__ecere__com__ClassTemplateParameter * prev;
2984 struct __ecereNameSpace__ecere__com__ClassTemplateParameter * next;
2985 char *  name;
2986 int type;
2987 union
2988 {
2989 char *  dataTypeString;
2990 int memberType;
2991 };
2992 struct __ecereNameSpace__ecere__com__ClassTemplateArgument defaultArg;
2993 void *  param;
2994 char __ecere_padding[4];
2995 };
2996
2997 void SetupBaseSpecs(struct Symbol * symbol, struct __ecereNameSpace__ecere__sys__OldList * baseSpecs)
2998 {
2999 void * __ecereTemp1;
3000
3001 if(baseSpecs && baseSpecs->first && ((struct Specifier *)baseSpecs->first)->type == 1)
3002 {
3003 char name[1024];
3004 struct Symbol * baseClass;
3005 char * tpl;
3006
3007 strcpy(name, ((struct Specifier *)baseSpecs->first)->name);
3008 tpl = strchr(name, '<');
3009 if(tpl)
3010 *tpl = (char)0;
3011 baseClass = FindClass(name);
3012 if(baseClass->ctx)
3013 {
3014 struct TemplatedType * copy;
3015
3016 for(copy = (struct TemplatedType *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&baseClass->ctx->templateTypes); copy; copy = (struct TemplatedType *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(copy))
3017 {
3018 struct TemplatedType * type = (type = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TemplatedType), type->key = copy->key, type->param = copy->param, type);
3019
3020 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&curContext->templateTypes, (struct __ecereNameSpace__ecere__sys__BTNode *)type))
3021 ((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);
3022 }
3023 }
3024 else if(baseClass->registered)
3025 {
3026 struct __ecereNameSpace__ecere__com__Class * sClass;
3027
3028 for(sClass = baseClass->registered; sClass; sClass = sClass->base)
3029 {
3030 struct __ecereNameSpace__ecere__com__ClassTemplateParameter * p;
3031
3032 for(p = sClass->templateParams.first; p; p = p->next)
3033 {
3034 if(p->type == 0)
3035 {
3036 struct TemplateParameter * param = p->param;
3037 struct TemplatedType * type;
3038
3039 if(!param)
3040 {
3041 p->param = param = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TemplateParameter), ((struct TemplateParameter *)__ecereTemp1)->identifier = MkIdentifier(p->name), ((struct TemplateParameter *)__ecereTemp1)->type = p->type, ((struct TemplateParameter *)__ecereTemp1)->dataTypeString = p->dataTypeString, ((struct TemplateParameter *)__ecereTemp1));
3042 }
3043 type = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TemplatedType), ((struct TemplatedType *)__ecereTemp1)->key = (unsigned int)p->name, ((struct TemplatedType *)__ecereTemp1)->param = param, ((struct TemplatedType *)__ecereTemp1));
3044 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&curContext->templateTypes, (struct __ecereNameSpace__ecere__sys__BTNode *)type))
3045 ((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);
3046 }
3047 }
3048 }
3049 }
3050 }
3051 }
3052
3053 extern void FreeContext(struct Context * context);
3054
3055 struct ClassDefinition * MkClass(struct Symbol * symbol, struct __ecereNameSpace__ecere__sys__OldList * baseSpecs, struct __ecereNameSpace__ecere__sys__OldList * definitions)
3056 {
3057 void * __ecereTemp1;
3058 struct ClassDefinition * classDef;
3059
3060 SetupBaseSpecs(symbol, baseSpecs);
3061 if(symbol->ctx)
3062 {
3063 FreeContext(symbol->ctx);
3064 ((symbol->ctx ? (__ecereClass_Context->Destructor ? __ecereClass_Context->Destructor(symbol->ctx) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(symbol->ctx)) : 0), symbol->ctx = 0);
3065 }
3066 symbol->ctx = curContext;
3067 classDef = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDefinition), ((struct ClassDefinition *)__ecereTemp1)->symbol = symbol, ((struct ClassDefinition *)__ecereTemp1)->_class = MkSpecifierName(symbol->string), ((struct ClassDefinition *)__ecereTemp1)->baseSpecs = baseSpecs, ((struct ClassDefinition *)__ecereTemp1)->definitions = definitions, ((struct ClassDefinition *)__ecereTemp1)->nameLoc = symbol->nameLoc, ((struct ClassDefinition *)__ecereTemp1));
3068 curContext->classDef = classDef;
3069 return classDef;
3070 }
3071
3072 struct Expression * MkExpInstance(struct Instantiation * inst)
3073 {
3074 void * __ecereTemp1;
3075
3076 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 1, ((struct Expression *)__ecereTemp1)->instance = inst, ((struct Expression *)__ecereTemp1));
3077 }
3078
3079 struct External * MkExternalClass(struct ClassDefinition * _class)
3080 {
3081 void * __ecereTemp1;
3082
3083 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_External), ((struct External *)__ecereTemp1)->type = 2, ((struct External *)__ecereTemp1)->_class = _class, ((struct External *)__ecereTemp1)->symbol = _class->symbol, ((struct External *)__ecereTemp1));
3084 }
3085
3086 extern void PrintType(struct Type * type, char *  string, unsigned int printName, unsigned int fullName);
3087
3088 struct PropertyDef * MkProperty(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl, struct Identifier * id, struct Statement * setStmt, struct Statement * getStmt)
3089 {
3090 void * __ecereTemp1;
3091 struct PropertyDef * prop = (prop = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_PropertyDef), prop->specifiers = specs, prop->declarator = decl, prop->setStmt = setStmt, prop->getStmt = getStmt, prop);
3092 struct Symbol * symbol;
3093 struct Type * type = ProcessType(specs, decl);
3094
3095 if(!id)
3096 {
3097 char typeString[1024];
3098
3099 typeString[0] = '\0';
3100 PrintType(type, typeString, 0x0, 0x1);
3101 id = MkIdentifier(typeString);
3102 prop->conversion = 0x1;
3103 }
3104 prop->id = id;
3105 symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(id->string), ((struct Symbol *)__ecereTemp1)->type = type, ((struct Symbol *)__ecereTemp1));
3106 symbol->idCode = symbol->id = globalContext->nextID++;
3107 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
3108 globalContext->nextID++;
3109 globalContext->nextID++;
3110 prop->symbol = symbol;
3111 return prop;
3112 }
3113
3114 struct ClassDef * MkClassDefProperty(struct PropertyDef * propertyDef)
3115 {
3116 void * __ecereTemp1;
3117
3118 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 3, ((struct ClassDef *)__ecereTemp1)->propertyDef = propertyDef, ((struct ClassDef *)__ecereTemp1));
3119 }
3120
3121 struct ClassDef * MkClassDefClassProperty(struct PropertyDef * propertyDef)
3122 {
3123 void * __ecereTemp1;
3124
3125 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 10, ((struct ClassDef *)__ecereTemp1)->propertyDef = propertyDef, ((struct ClassDef *)__ecereTemp1));
3126 }
3127
3128 struct ClassDef * MkClassDefClassPropertyValue(struct Identifier * id, struct Initializer * initializer)
3129 {
3130 void * __ecereTemp1;
3131
3132 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 11, ((struct ClassDef *)__ecereTemp1)->id = id, ((struct ClassDef *)__ecereTemp1)->initializer = initializer, ((struct ClassDef *)__ecereTemp1));
3133 }
3134
3135 int CheckType(char * text)
3136 {
3137 if(FindTemplateTypeParameter(curContext, text))
3138 {
3139 return TYPE_NAME;
3140 }
3141 if(FindType(curContext, text))
3142 {
3143 return TYPE_NAME;
3144 }
3145 if(FindClass(text))
3146 {
3147 return TYPE_NAME;
3148 }
3149 return IDENTIFIER;
3150 }
3151
3152 int check_type()
3153 {
3154 return CheckType(yytext);
3155 }
3156
3157 struct Context * PushContext()
3158 {
3159 struct Context * ctx = (ctx = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context), ctx->parent = curContext, ctx);
3160
3161 curContext = ctx;
3162 return ctx;
3163 }
3164
3165 void PopContext(struct Context * ctx)
3166 {
3167 curContext = ctx->parent;
3168 }
3169
3170 struct Symbol * FindType(struct Context * ctx, char * name)
3171 {
3172 struct Symbol * type = (((void *)0));
3173
3174 if(curContext)
3175 {
3176 type = (struct Symbol *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&ctx->types, name);
3177 if(!type && ctx->parent)
3178 type = FindType(ctx->parent, name);
3179 }
3180 return type;
3181 }
3182
3183 struct TemplatedType * FindTemplateTypeParameter(struct Context * ctx, char * name)
3184 {
3185 struct TemplatedType * templatedType = (((void *)0));
3186
3187 if(curContext)
3188 {
3189 templatedType = (struct TemplatedType *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&ctx->templateTypes, name);
3190 if(!templatedType && ctx->parent)
3191 templatedType = FindTemplateTypeParameter(ctx->parent, name);
3192 }
3193 return templatedType;
3194 }
3195
3196 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__NameSpace;
3197
3198 struct __ecereNameSpace__ecere__com__NameSpace
3199 {
3200 char *  name;
3201 struct __ecereNameSpace__ecere__com__NameSpace *  btParent;
3202 struct __ecereNameSpace__ecere__com__NameSpace *  left;
3203 struct __ecereNameSpace__ecere__com__NameSpace *  right;
3204 int depth;
3205 struct __ecereNameSpace__ecere__com__NameSpace *  parent;
3206 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
3207 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
3208 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
3209 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
3210 };
3211
3212 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
3213
3214 struct __ecereNameSpace__ecere__com__Module
3215 {
3216 struct __ecereNameSpace__ecere__com__Instance * application;
3217 struct __ecereNameSpace__ecere__sys__OldList classes;
3218 struct __ecereNameSpace__ecere__sys__OldList defines;
3219 struct __ecereNameSpace__ecere__sys__OldList functions;
3220 struct __ecereNameSpace__ecere__sys__OldList modules;
3221 struct __ecereNameSpace__ecere__com__Instance * prev;
3222 struct __ecereNameSpace__ecere__com__Instance * next;
3223 char *  name;
3224 void *  library;
3225 void *  Unload;
3226 int importType;
3227 int origImportType;
3228 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
3229 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
3230 };
3231
3232 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SubModule;
3233
3234 struct __ecereNameSpace__ecere__com__SubModule
3235 {
3236 struct __ecereNameSpace__ecere__com__SubModule * prev;
3237 struct __ecereNameSpace__ecere__com__SubModule * next;
3238 struct __ecereNameSpace__ecere__com__Instance * module;
3239 int importMode;
3240 };
3241
3242 unsigned int ModuleAccess(struct __ecereNameSpace__ecere__com__Instance * searchIn, struct __ecereNameSpace__ecere__com__Instance * searchFor)
3243 {
3244 struct __ecereNameSpace__ecere__com__SubModule * subModule;
3245
3246 if(searchFor == searchIn)
3247 return 0x1;
3248 for(subModule = ((struct __ecereNameSpace__ecere__com__Module *)(((char *)searchIn + 12)))->modules.first; subModule; subModule = subModule->next)
3249 {
3250 if(subModule->importMode == 1)
3251 {
3252 if(ModuleAccess(subModule->module, searchFor))
3253 return 0x1;
3254 }
3255 }
3256 return 0x0;
3257 }
3258
3259 extern struct ModuleImport * mainModule;
3260
3261 extern struct __ecereNameSpace__ecere__sys__OldList *  imports;
3262
3263 struct ModuleImport * FindModule(struct __ecereNameSpace__ecere__com__Instance * moduleToFind)
3264 {
3265 void * __ecereTemp1;
3266 struct ModuleImport * module;
3267
3268 if(!((struct __ecereNameSpace__ecere__com__Module *)(((char *)moduleToFind + 12)))->name)
3269 return mainModule;
3270 for(module = (*imports).first; module; module = module->next)
3271 if(module->name && !strcmp(module->name, ((struct __ecereNameSpace__ecere__com__Module *)(((char *)moduleToFind + 12)))->name))
3272 break;
3273 if(!module)
3274 {
3275 module = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ModuleImport), ((struct ModuleImport *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(((struct __ecereNameSpace__ecere__com__Module *)(((char *)moduleToFind + 12)))->name), ((struct ModuleImport *)__ecereTemp1)->importType = ((struct __ecereNameSpace__ecere__com__Module *)(((char *)moduleToFind + 12)))->importType, ((struct ModuleImport *)__ecereTemp1)->importAccess = ModuleAccess(privateModule, moduleToFind) ? 1 : 2, ((struct ModuleImport *)__ecereTemp1));
3276 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*imports), module);
3277 }
3278 return module;
3279 }
3280
3281 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_FindClass(struct __ecereNameSpace__ecere__com__Instance * module, char *  name);
3282
3283 struct Symbol * FindClass(char * name)
3284 {
3285 void * __ecereTemp1;
3286 struct Symbol * cl = (((void *)0));
3287 struct __ecereNameSpace__ecere__com__Class * _class;
3288 unsigned int global = 0x0;
3289 char fullName[1024];
3290
3291 if(name[0] == ':' && name[1] == ':')
3292 {
3293 global = 0x1;
3294 name += 2;
3295 }
3296 if(!global && (currentNameSpace || defaultNameSpace) && declMode != 0 && defaultDeclMode != 0)
3297 {
3298 int len = 0, stringLen;
3299
3300 if(defaultNameSpace)
3301 {
3302 memcpy(fullName, defaultNameSpace, defaultNameSpaceLen);
3303 len += defaultNameSpaceLen;
3304 fullName[len++] = ':';
3305 fullName[len++] = ':';
3306 }
3307 if(currentNameSpace)
3308 {
3309 memcpy(fullName + len, currentNameSpace, currentNameSpaceLen);
3310 len += currentNameSpaceLen;
3311 fullName[len++] = ':';
3312 fullName[len++] = ':';
3313 }
3314 stringLen = strlen(name);
3315 memcpy(fullName + len, name, stringLen);
3316 len += stringLen;
3317 fullName[len] = (char)0;
3318 cl = globalContext ? (struct Symbol *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&globalContext->classes, fullName) : (((void *)0));
3319 }
3320 if(!cl)
3321 cl = globalContext ? (struct Symbol *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&globalContext->classes, name) : (((void *)0));
3322 if(!cl && !global)
3323 {
3324 for(cl = globalContext ? (struct Symbol *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&globalContext->classes) : (((void *)0)); cl; cl = (struct Symbol *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)cl)))
3325 {
3326 if(cl->shortName && !strcmp(cl->shortName, name))
3327 break;
3328 }
3329 }
3330 if(!cl)
3331 {
3332 _class = (((void *)0));
3333 if(!global && (currentNameSpace || defaultNameSpace) && declMode != 0 && defaultDeclMode != 0)
3334 _class = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, fullName);
3335 if(!_class)
3336 _class = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, name);
3337 if(_class)
3338 {
3339 name = _class->fullName;
3340 cl = (struct Symbol *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&globalContext->classes, name);
3341 if(!cl)
3342 {
3343 cl = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(name), ((struct Symbol *)__ecereTemp1)->registered = _class, ((struct Symbol *)__ecereTemp1)->id = (((int)0x7fffffff)), ((struct Symbol *)__ecereTemp1)->idCode = (((int)0x7fffffff)), ((struct Symbol *)__ecereTemp1)->imported = 0x1, ((struct Symbol *)__ecereTemp1));
3344 _class->symbol = cl;
3345 if(_class->module)
3346 cl->module = FindModule(_class->module);
3347 else
3348 cl->module = mainModule;
3349 if(!__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->classes, (struct __ecereNameSpace__ecere__sys__BTNode *)cl))
3350 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), cl);
3351 if(strcmp(name, _class->name))
3352 cl->shortName = __ecereNameSpace__ecere__sys__CopyString(_class->name);
3353 }
3354 }
3355 }
3356 return cl;
3357 }
3358
3359 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__NamedLink;
3360
3361 struct __ecereNameSpace__ecere__sys__NamedLink
3362 {
3363 struct __ecereNameSpace__ecere__sys__NamedLink * prev;
3364 struct __ecereNameSpace__ecere__sys__NamedLink * next;
3365 char *  name;
3366 void *  data;
3367 };
3368
3369 extern struct Expression * CopyExpression(struct Expression * exp);
3370
3371 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Clear(struct __ecereNameSpace__ecere__sys__OldList * this);
3372
3373 void CopyTypeInto(struct Type * type, struct Type * src)
3374 {
3375 void * __ecereTemp1;
3376
3377 *type = *src;
3378 type->name = __ecereNameSpace__ecere__sys__CopyString(src->name);
3379 type->enumName = __ecereNameSpace__ecere__sys__CopyString(src->enumName);
3380 type->refCount = 1;
3381 if(src->kind == 15)
3382 {
3383 struct __ecereNameSpace__ecere__sys__NamedLink * member;
3384
3385 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Clear(&type->members);
3386 for(member = src->members.first; member; member = member->next)
3387 {
3388 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&type->members, (__ecereTemp1 = __ecereNameSpace__ecere__com__eSystem_New0(16), ((struct __ecereNameSpace__ecere__sys__NamedLink *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(member->name), ((struct __ecereNameSpace__ecere__sys__NamedLink *)__ecereTemp1)->data = member->data, ((struct __ecereNameSpace__ecere__sys__NamedLink *)__ecereTemp1)));
3389 }
3390 }
3391 else if(src->kind == 9 || src->kind == 10)
3392 {
3393 struct Type * member;
3394
3395 for(member = type->members.first; member; member = member->next)
3396 member->refCount++;
3397 }
3398 else if(src->kind == 11)
3399 {
3400 struct Type * param;
3401
3402 type->returnType->refCount++;
3403 for(param = type->params.first; param; param = param->next)
3404 param->refCount++;
3405 }
3406 else if(src->kind == 13 || src->kind == 12)
3407 {
3408 type->type->refCount++;
3409 if(src->kind == 12)
3410 {
3411 if(type->arraySizeExp)
3412 type->arraySizeExp = CopyExpression(type->arraySizeExp);
3413 }
3414 }
3415 }
3416
3417 extern void ProcessExpressionType(struct Expression * exp);
3418
3419 extern void ComputeExpression(struct Expression * exp);
3420
3421 extern unsigned long strtoul(const char *  nptr, char * *  endptr, int base);
3422
3423 extern struct Symbol * FindSymbol(char *  name, struct Context * startContext, struct Context * endContext, unsigned int isStruct, unsigned int globalNameSpace);
3424
3425 struct Type * ProcessType(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl)
3426 {
3427 void * __ecereTemp1;
3428 struct Type * type = (((void *)0));
3429 unsigned int isTypedef = 0x0;
3430
3431 if(!specs || specs->first)
3432 {
3433 struct Declarator * funcDecl = GetFuncDecl(decl);
3434 struct Type * specType = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type);
3435 unsigned int dllExport = 0x0;
3436
3437 specType->kind = 3;
3438 specType->isSigned = 0x1;
3439 specType->refCount = 1;
3440 type = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), ((struct Type *)__ecereTemp1)->refCount = 1, ((struct Type *)__ecereTemp1));
3441 while(decl && (decl->type == 0 || decl->type == 6 || decl->type == 7))
3442 {
3443 if(decl->type == 0 && decl->structDecl.exp)
3444 {
3445 ProcessExpressionType(decl->structDecl.exp);
3446 ComputeExpression(decl->structDecl.exp);
3447 if(decl->structDecl.exp->type == 2)
3448 specType->bitFieldCount = strtoul(decl->structDecl.exp->constant, (((void *)0)), 0);
3449 }
3450 if((decl->type == 6 || decl->type == 7) && decl->extended.extended && (!strcmp(decl->extended.extended, "__declspec(dllexport)") || !strcmp(decl->extended.extended, "dllexport")))
3451 {
3452 dllExport = 0x1;
3453 }
3454 if((decl->type == 6 || decl->type == 7) && decl->extended.extended && (strstr(decl->extended.extended, "__attribute__")))
3455 {
3456 specType->keepCast = 0x1;
3457 }
3458 decl = decl->declarator;
3459 }
3460 if(funcDecl || !decl || decl->type == 1)
3461 {
3462 struct Specifier * spec;
3463
3464 if(specs != (((void *)0)))
3465 {
3466 unsigned int isLong = 0x0;
3467
3468 for(spec = specs->first; spec; spec = spec->next)
3469 {
3470 if(spec->type == 5 && (!strcmp(spec->name, "__declspec(dllexport)") || !strcmp(spec->name, "dllexport")))
3471 {
3472 dllExport = 0x1;
3473 }
3474 if(spec->type == 5 && strstr(spec->name, "__attribute__"))
3475 {
3476 specType->keepCast = 0x1;
3477 }
3478 if(spec->specifier != CONST && (specType->kind == 9 || specType->kind == 10))
3479 {
3480 FreeType(specType);
3481 specType = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), ((struct Type *)__ecereTemp1)->kind = 3, ((struct Type *)__ecereTemp1)->isSigned = 0x1, ((struct Type *)__ecereTemp1)->refCount = 1, ((struct Type *)__ecereTemp1));
3482 }
3483 if(spec->type == 0)
3484 {
3485 if(spec->specifier == TYPEDEF)
3486 isTypedef = 0x1;
3487 else if(spec->specifier == VOID)
3488 specType->kind = 0;
3489 else if(spec->specifier == CHAR)
3490 specType->kind = 1;
3491 else if(spec->specifier == INT)
3492 {
3493 if(specType->kind != 2 && specType->kind != 5)
3494 specType->kind = 3;
3495 }
3496 else if(spec->specifier == UINT)
3497 {
3498 if(specType->kind != 2 && specType->kind != 5)
3499 specType->kind = 3;
3500 specType->isSigned = 0x0;
3501 }
3502 else if(spec->specifier == INT64)
3503 specType->kind = 4;
3504 else if(spec->specifier == VALIST)
3505 specType->kind = 17;
3506 else if(spec->specifier == SHORT)
3507 specType->kind = 2;
3508 else if(spec->specifier == LONG)
3509 {
3510 if(isLong)
3511 specType->kind = 4;
3512 else
3513 specType->kind = 3;
3514 isLong = 0x1;
3515 }
3516 else if(spec->specifier == FLOAT)
3517 specType->kind = 6;
3518 else if(spec->specifier == DOUBLE)
3519 specType->kind = 7;
3520 else if(spec->specifier == SIGNED)
3521 specType->isSigned = 0x1;
3522 else if(spec->specifier == UNSIGNED)
3523 specType->isSigned = 0x0;
3524 else if(spec->specifier == CONST)
3525 specType->constant = 0x1;
3526 else if(spec->specifier == TYPED_OBJECT)
3527 {
3528 specType->classObjectType = 2;
3529 specType->kind = 8;
3530 specType->_class = FindClass("class");
3531 }
3532 else if(spec->specifier == ANY_OBJECT)
3533 {
3534 specType->classObjectType = 3;
3535 specType->kind = 8;
3536 specType->_class = FindClass("class");
3537 }
3538 else if(spec->specifier == CLASS)
3539 {
3540 specType->classObjectType = 1;
3541 specType->kind = 8;
3542 specType->_class = FindClass("class");
3543 }
3544 else if(spec->specifier == THISCLASS)
3545 specType->kind = 21;
3546 }
3547 else if(spec->type == 1)
3548 {
3549 struct Symbol * symbol = spec->name ? FindType(curContext, spec->name) : (((void *)0));
3550
3551 if(symbol && symbol->type)
3552 {
3553 struct Type * dummy = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type);
3554
3555 *dummy = *specType;
3556 FreeType(dummy);
3557 CopyTypeInto(specType, symbol->type);
3558 specType->typeName = __ecereNameSpace__ecere__sys__CopyString(symbol->type->name);
3559 }
3560 else if(!isTypedef)
3561 {
3562 specType->_class = spec->name ? FindClass(spec->name) : (((void *)0));
3563 specType->kind = 8;
3564 if(!specType->_class)
3565 specType->kind = 3;
3566 }
3567 }
3568 else if(spec->type == 2)
3569 {
3570 specType->kind = 15;
3571 specType->enumName = spec->id ? __ecereNameSpace__ecere__sys__CopyString(spec->id->string) : (((void *)0));
3572 if(spec->list)
3573 {
3574 struct Enumerator * e;
3575 int nextValue = 0;
3576
3577 for(e = (*spec->list).first; e; e = e->next)
3578 {
3579 struct __ecereNameSpace__ecere__sys__NamedLink * i = (i = __ecereNameSpace__ecere__com__eSystem_New0(16), i->name = __ecereNameSpace__ecere__sys__CopyString(e->id->string), i);
3580
3581 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&specType->members, i);
3582 }
3583 }
3584 }
3585 else if(spec->type == 8)
3586 {
3587 specType->kind = 20;
3588 specType->templateParameter = spec->templateParameter;
3589 }
3590 else if(spec->type == 3 || spec->type == 4)
3591 {
3592 struct Symbol * _class = spec->id ? FindClass(spec->id->string) : (((void *)0));
3593
3594 if(_class)
3595 {
3596 if(!_class->registered || _class->registered->type != 1)
3597 specType->directClassAccess = 0x1;
3598 specType->_class = _class;
3599 specType->kind = 8;
3600 break;
3601 }
3602 if(spec->type == 3)
3603 specType->kind = 9;
3604 else if(spec->type == 4)
3605 specType->kind = 10;
3606 if(spec->id)
3607 {
3608 if(!spec->definitions && !isTypedef)
3609 {
3610 struct Symbol * symbol = spec->id->string ? FindSymbol(spec->id->string, curContext, globalContext, 0x1, 0x0) : (((void *)0));
3611
3612 if(symbol && symbol->type)
3613 {
3614 *specType = *symbol->type;
3615 specType->name = __ecereNameSpace__ecere__sys__CopyString(symbol->type->name);
3616 specType->typeName = __ecereNameSpace__ecere__sys__CopyString(spec->name);
3617 specType->enumName = __ecereNameSpace__ecere__sys__CopyString(symbol->type->enumName);
3618 specType->refCount = 1;
3619 if(symbol->type->kind == 15)
3620 {
3621 struct __ecereNameSpace__ecere__sys__NamedLink * member;
3622
3623 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Clear(&specType->members);
3624 for(member = symbol->type->members.first; member; member = member->next)
3625 {
3626 struct __ecereNameSpace__ecere__sys__NamedLink * item = (item = __ecereNameSpace__ecere__com__eSystem_New0(16), item->name = __ecereNameSpace__ecere__sys__CopyString(member->name), item->data = member->data, item);
3627
3628 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&specType->members, item);
3629 }
3630 }
3631 else if(symbol->type->kind == 9 || symbol->type->kind == 10)
3632 {
3633 struct Type * member;
3634
3635 for(member = specType->members.first; member; member = member->next)
3636 member->refCount++;
3637 }
3638 else if(symbol->type->kind == 11)
3639 {
3640 struct Type * param;
3641
3642 specType->returnType->refCount++;
3643 for(param = specType->params.first; param; param = param->next)
3644 param->refCount++;
3645 }
3646 else if(symbol->type->kind == 13 || symbol->type->kind == 12)
3647 {
3648 specType->type->refCount++;
3649 if(symbol->type->kind == 12)
3650 {
3651 if(specType->arraySizeExp)
3652 specType->arraySizeExp = CopyExpression(specType->arraySizeExp);
3653 }
3654 }
3655 }
3656 else
3657 specType->enumName = __ecereNameSpace__ecere__sys__CopyString(spec->id->string);
3658 }
3659 else
3660 specType->enumName = __ecereNameSpace__ecere__sys__CopyString(spec->id->string);
3661 }
3662 if(spec->definitions)
3663 {
3664 struct ClassDef * def;
3665
3666 for(def = (*spec->definitions).first; def; def = def->next)
3667 {
3668 if(def->type == 2 && def->decl->type == 0)
3669 {
3670 struct Declaration * decl = def->decl;
3671
3672 if(decl->declarators)
3673 {
3674 struct Declarator * d;
3675
3676 for(d = (*decl->declarators).first; d; d = d->next)
3677 {
3678 struct Type * memberType = ProcessType(decl->specifiers, d);
3679
3680 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&specType->members, memberType);
3681 }
3682 }
3683 else if(decl->specifiers)
3684 {
3685 struct Type * memberType = ProcessType(decl->specifiers, (((void *)0)));
3686
3687 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&specType->members, memberType);
3688 }
3689 }
3690 }
3691 }
3692 break;
3693 }
3694 else if(spec->type == 7)
3695 {
3696 specType->kind = specType->kind = 19;
3697 specType->_class = spec->_class->symbol;
3698 }
3699 }
3700 }
3701 else if(!decl)
3702 specType->kind = 14;
3703 }
3704 if(funcDecl)
3705 {
3706 struct Declarator * d = funcDecl->declarator;
3707 struct Type * funcType = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type);
3708 struct TypeName * param;
3709
3710 funcType->kind = 11;
3711 funcType->refCount = 1;
3712 if(funcDecl->function.parameters)
3713 {
3714 for(param = (*funcDecl->function.parameters).first; param; param = param->next)
3715 {
3716 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&funcType->params, ProcessType(param->qualifiers, param->declarator));
3717 }
3718 }
3719 if(decl->type == 5)
3720 {
3721 struct Pointer * pointer = decl->pointer.pointer;
3722 struct Type * ptrType = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type);
3723
3724 funcType->returnType = ptrType;
3725 funcType->returnType->refCount = 1;
3726 while(pointer)
3727 {
3728 ptrType->kind = 13;
3729 pointer = pointer->pointer;
3730 if(pointer)
3731 {
3732 ptrType->type = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), ((struct Type *)__ecereTemp1)->refCount = 1, ((struct Type *)__ecereTemp1));
3733 ptrType = ptrType->type;
3734 }
3735 }
3736 ptrType->type = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), ((struct Type *)__ecereTemp1)->refCount = 1, ((struct Type *)__ecereTemp1));
3737 *ptrType->type = *specType;
3738 }
3739 else
3740 {
3741 funcType->returnType = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), ((struct Type *)__ecereTemp1)->refCount = 1, ((struct Type *)__ecereTemp1));
3742 *funcType->returnType = *specType;
3743 }
3744 while(d && (d->type == 2 || d->type == 6 || d->type == 7))
3745 {
3746 if((d->type == 6 || d->type == 7) && d->extended.extended && (!strcmp(d->extended.extended, "__declspec(dllexport)") || !strcmp(d->extended.extended, "dllexport")))
3747 {
3748 dllExport = 0x1;
3749 }
3750 d = d->declarator;
3751 }
3752 funcType->dllExport = dllExport;
3753 if(d && d->type == 5)
3754 {
3755 struct Type * ptrType;
3756 struct Identifier * id;
3757
3758 if(d->declarator && d->declarator->type == 3)
3759 {
3760 struct Pointer * pointer = d->pointer.pointer;
3761
3762 type->kind = 12;
3763 type->arraySizeExp = CopyExpression(d->declarator->array.exp);
3764 type->freeExp = 0x1;
3765 if(d->declarator->array.enumClass)
3766 type->enumClass = d->declarator->array.enumClass->symbol;
3767 if(d->declarator->declarator && d->declarator->declarator->type == 3)
3768 {
3769 struct Type * tmpType = type;
3770 struct Type * inType;
3771
3772 type = ProcessType((((void *)0)), d->declarator->declarator);
3773 inType = type->type;
3774 type->type = tmpType;
3775 tmpType->type = inType;
3776 }
3777 else
3778 type->type = ProcessType((((void *)0)), d->declarator->declarator);
3779 for(ptrType = type->type; ptrType && ptrType->kind && ptrType->type; ptrType = ptrType->type)
3780 ;
3781 while(pointer)
3782 {
3783 ptrType->kind = 13;
3784 pointer = pointer->pointer;
3785 if(pointer)
3786 {
3787 ptrType->type = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), ((struct Type *)__ecereTemp1)->refCount = 1, ((struct Type *)__ecereTemp1));
3788 ptrType = ptrType->type;
3789 }
3790 }
3791 ptrType->type = ProcessType(specs, (((void *)0)));
3792 }
3793 else
3794 {
3795 struct Pointer * pointer = d->pointer.pointer;
3796
3797 ptrType = type;
3798 while(pointer)
3799 {
3800 ptrType->kind = 13;
3801 ptrType->type = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), ((struct Type *)__ecereTemp1)->refCount = 1, ((struct Type *)__ecereTemp1));
3802 pointer = pointer->pointer;
3803 if(pointer)
3804 ptrType = ptrType->type;
3805 }
3806 }
3807 *ptrType->type = *funcType;
3808 id = GetDeclId(d);
3809 if(id)
3810 {
3811 if(id->_class && !id->_class->name)
3812 ptrType->type->staticMethod = 0x1;
3813 else
3814 {
3815 if(!id->classSym)
3816 {
3817 if(id->_class && id->_class->name)
3818 {
3819 id->classSym = id->_class->symbol;
3820 }
3821 }
3822 ptrType->type->thisClass = id->classSym;
3823 if(ptrType->type->thisClass && strcmp(ptrType->type->thisClass->string, "class"))
3824 ptrType->type->extraParam = 0x1;
3825 else if(id->_class && id->_class->name && !strcmp(id->_class->name, "any_object"))
3826 {
3827 ptrType->type->extraParam = 0x1;
3828 ptrType->type->thisClass = FindClass("class");
3829 }
3830 }
3831 type->name = __ecereNameSpace__ecere__sys__CopyString(id->string);
3832 }
3833 }
3834 else if(!d || d->type == 1)
3835 {
3836 *type = *funcType;
3837 if(d)
3838 {
3839 if(d->identifier->_class && d->identifier->_class->type == 8)
3840 {
3841 type->thisClassTemplate = d->identifier->_class->templateParameter;
3842 type->extraParam = 0x1;
3843 }
3844 else
3845 {
3846 if(d->identifier->_class && !d->identifier->_class->name)
3847 type->staticMethod = 0x1;
3848 else
3849 {
3850 if(d->identifier->_class && d->identifier->_class->name && d->identifier->_class->name[strlen(d->identifier->_class->name) - 1] == '&')
3851 {
3852 type->thisClass = FindClass("class");
3853 type->byReference = 0x1;
3854 }
3855 else
3856 type->thisClass = d->identifier->_class ? d->identifier->_class->symbol : (((void *)0));
3857 if(type->thisClass && strcmp(type->thisClass->string, "class"))
3858 {
3859 type->extraParam = 0x1;
3860 }
3861 else if(d->identifier->_class && d->identifier->_class->name && !strcmp(d->identifier->_class->name, "any_object"))
3862 {
3863 type->extraParam = 0x1;
3864 type->thisClass = FindClass("class");
3865 }
3866 else if(d->identifier->_class && d->identifier->_class->name && !strcmp(d->identifier->_class->name, "class"))
3867 {
3868 type->thisClass = FindClass("class");
3869 type->classObjectType = 1;
3870 }
3871 }
3872 }
3873 type->name = __ecereNameSpace__ecere__sys__CopyString(d->identifier->string);
3874 }
3875 }
3876 ((funcType ? (__ecereClass_Type->Destructor ? __ecereClass_Type->Destructor(funcType) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(funcType)) : 0), funcType = 0);
3877 }
3878 else if(decl && decl->type == 5)
3879 {
3880 if(decl->declarator && decl->declarator->type == 3)
3881 {
3882 struct Identifier * id;
3883 struct Pointer * pointer = decl->pointer.pointer;
3884 struct Type * ptrType;
3885
3886 type->kind = 12;
3887 type->arraySizeExp = CopyExpression(decl->declarator->array.exp);
3888 type->freeExp = 0x1;
3889 if(decl->declarator->array.enumClass)
3890 type->enumClass = decl->declarator->array.enumClass->symbol;
3891 if(decl->declarator->declarator && decl->declarator->declarator->type == 3)
3892 {
3893 struct Type * tmpType = type;
3894 struct Type * inType;
3895
3896 type = ProcessType((((void *)0)), decl->declarator->declarator);
3897 inType = type->type;
3898 type->type = tmpType;
3899 tmpType->type = inType;
3900 }
3901 else
3902 type->type = ProcessType((((void *)0)), decl->declarator->declarator);
3903 for(ptrType = type->type; ptrType && ptrType->kind && ptrType->type; ptrType = ptrType->type)
3904 ;
3905 while(pointer)
3906 {
3907 ptrType->kind = 13;
3908 pointer = pointer->pointer;
3909 if(pointer)
3910 {
3911 ptrType->type = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), ((struct Type *)__ecereTemp1)->refCount = 1, ((struct Type *)__ecereTemp1));
3912 ptrType = ptrType->type;
3913 }
3914 }
3915 ptrType->type = ProcessType(specs, (((void *)0)));
3916 id = GetDeclId(decl);
3917 if(id)
3918 type->name = __ecereNameSpace__ecere__sys__CopyString(id->string);
3919 }
3920 else
3921 {
3922 struct Identifier * id;
3923 struct Pointer * pointer = decl->pointer.pointer;
3924 struct Type * ptrType = type;
3925
3926 if(type->classObjectType)
3927 {
3928 type->byReference = 0x1;
3929 }
3930 else
3931 {
3932 while(pointer)
3933 {
3934 ptrType->kind = 13;
3935 pointer = pointer->pointer;
3936 if(pointer)
3937 {
3938 ptrType->type = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), ((struct Type *)__ecereTemp1)->refCount = 1, ((struct Type *)__ecereTemp1));
3939 ptrType = ptrType->type;
3940 }
3941 }
3942 ptrType->type = ProcessType(specs, decl->declarator);
3943 if(type->type->classObjectType)
3944 {
3945 struct Type * subType = type->type;
3946
3947 type->classObjectType = subType->classObjectType;
3948 type->kind = subType->kind;
3949 type->_class = subType->_class;
3950 type->byReference = 0x1;
3951 FreeType(subType);
3952 }
3953 id = GetDeclId(decl);
3954 if(id)
3955 type->name = __ecereNameSpace__ecere__sys__CopyString(id->string);
3956 }
3957 }
3958 }
3959 else if(decl && decl->type == 3)
3960 {
3961 struct Identifier * id;
3962
3963 type->kind = 12;
3964 type->arraySizeExp = CopyExpression(decl->array.exp);
3965 type->freeExp = 0x1;
3966 if(decl->array.enumClass)
3967 type->enumClass = decl->array.enumClass->symbol;
3968 id = GetDeclId(decl);
3969 if(decl->declarator && decl->declarator->type == 3)
3970 {
3971 struct Type * tmpType = type;
3972 struct Type * inType;
3973
3974 type = ProcessType(specs, decl->declarator);
3975 inType = type->type;
3976 type->type = tmpType;
3977 tmpType->type = inType;
3978 }
3979 else
3980 type->type = ProcessType(specs, decl->declarator);
3981 if(id)
3982 {
3983 (__ecereNameSpace__ecere__com__eSystem_Delete(type->name), type->name = 0);
3984 type->name = __ecereNameSpace__ecere__sys__CopyString(id->string);
3985 }
3986 }
3987 else
3988 {
3989 if(!decl || decl->type == 1)
3990 {
3991 *type = *specType;
3992 (__ecereNameSpace__ecere__com__eSystem_Delete(type->name), type->name = 0);
3993 type->name = decl ? __ecereNameSpace__ecere__sys__CopyString(decl->identifier->string) : (((void *)0));
3994 }
3995 }
3996 ((specType ? (__ecereClass_Type->Destructor ? __ecereClass_Type->Destructor(specType) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(specType)) : 0), specType = 0);
3997 }
3998 return type;
3999 }
4000
4001 extern struct Declarator * SpecDeclFromString(char *  string, struct __ecereNameSpace__ecere__sys__OldList *  specs, struct Declarator * baseDecl);
4002
4003 extern void FreeDeclarator(struct Declarator * decl);
4004
4005 struct Type * ProcessTypeString(char * string, unsigned int staticMethod)
4006 {
4007 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
4008 struct Declarator * decl = SpecDeclFromString(string, specs, (((void *)0)));
4009 struct Type * type = ProcessType(specs, decl);
4010
4011 if(type && !type->thisClass && staticMethod)
4012 type->staticMethod = 0x1;
4013 FreeList(specs, FreeSpecifier);
4014 if(decl)
4015 FreeDeclarator(decl);
4016 return type;
4017 }
4018
4019 struct Type * MkClassTypeSymbol(struct Symbol * symbol)
4020 {
4021 if(symbol)
4022 {
4023 struct Type * type = (type = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), type->kind = 8, type->_class = symbol, type);
4024
4025 if(!type->_class)
4026 {
4027 type->kind = 3;
4028 }
4029 type->refCount = 1;
4030 return type;
4031 }
4032 return (((void *)0));
4033 }
4034
4035 struct Type * MkClassType(char * name)
4036 {
4037 if(name)
4038 {
4039 struct Type * type = (type = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), type->kind = 8, type->_class = FindClass(name), type);
4040
4041 if(!type->_class)
4042 {
4043 type->kind = 3;
4044 }
4045 type->refCount = 1;
4046 return type;
4047 }
4048 return (((void *)0));
4049 }
4050
4051 struct AsmField * MkAsmField(char * command, struct Expression * expression)
4052 {
4053 void * __ecereTemp1;
4054
4055 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_AsmField), ((struct AsmField *)__ecereTemp1)->command = command, ((struct AsmField *)__ecereTemp1)->expression = expression, ((struct AsmField *)__ecereTemp1));
4056 }
4057
4058 struct Statement * MkAsmStmt(struct Specifier * spec, char * statements, struct __ecereNameSpace__ecere__sys__OldList * inputFields, struct __ecereNameSpace__ecere__sys__OldList * outputFields, struct __ecereNameSpace__ecere__sys__OldList * clobberedFields)
4059 {
4060 void * __ecereTemp1;
4061
4062 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 13, ((struct Statement *)__ecereTemp1)->asmStmt.spec = spec, ((struct Statement *)__ecereTemp1)->asmStmt.statements = statements, ((struct Statement *)__ecereTemp1)->asmStmt.inputFields = inputFields, ((struct Statement *)__ecereTemp1)->asmStmt.outputFields = outputFields, ((struct Statement *)__ecereTemp1)->asmStmt.clobberedFields = clobberedFields, ((struct Statement *)__ecereTemp1));
4063 }
4064
4065 struct ClassDef * MkClassDefPropertyWatch(struct PropertyWatch * watcher)
4066 {
4067 void * __ecereTemp1;
4068
4069 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassDef), ((struct ClassDef *)__ecereTemp1)->type = 4, ((struct ClassDef *)__ecereTemp1)->propertyWatch = watcher, ((struct ClassDef *)__ecereTemp1));
4070 }
4071
4072 struct Statement * MkFireWatchersStmt(struct Expression * object, struct __ecereNameSpace__ecere__sys__OldList * watches)
4073 {
4074 void * __ecereTemp1;
4075
4076 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 15, ((struct Statement *)__ecereTemp1)->_watch.object = object, ((struct Statement *)__ecereTemp1)->_watch.watches = watches, ((struct Statement *)__ecereTemp1));
4077 }
4078
4079 struct Statement * MkStopWatchingStmt(struct Expression * watcher, struct Expression * object, struct __ecereNameSpace__ecere__sys__OldList * watches)
4080 {
4081 void * __ecereTemp1;
4082
4083 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 16, ((struct Statement *)__ecereTemp1)->_watch.watcher = watcher, ((struct Statement *)__ecereTemp1)->_watch.object = object, ((struct Statement *)__ecereTemp1)->_watch.watches = watches, ((struct Statement *)__ecereTemp1));
4084 }
4085
4086 struct Statement * MkWatchStmt(struct Expression * watcher, struct Expression * object, struct __ecereNameSpace__ecere__sys__OldList * watches)
4087 {
4088 void * __ecereTemp1;
4089
4090 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Statement), ((struct Statement *)__ecereTemp1)->type = 17, ((struct Statement *)__ecereTemp1)->_watch.watcher = watcher, ((struct Statement *)__ecereTemp1)->_watch.object = object, ((struct Statement *)__ecereTemp1)->_watch.watches = watches, ((struct Statement *)__ecereTemp1));
4091 }
4092
4093 struct PropertyWatch * MkDeleteWatch(struct Statement * compound)
4094 {
4095 void * __ecereTemp1;
4096
4097 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_PropertyWatch), ((struct PropertyWatch *)__ecereTemp1)->compound = compound, ((struct PropertyWatch *)__ecereTemp1)->deleteWatch = 0x1, ((struct PropertyWatch *)__ecereTemp1));
4098 }
4099
4100 struct PropertyWatch * MkPropertyWatch(struct __ecereNameSpace__ecere__sys__OldList * properties, struct Statement * compound)
4101 {
4102 void * __ecereTemp1;
4103
4104 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_PropertyWatch), ((struct PropertyWatch *)__ecereTemp1)->compound = compound, ((struct PropertyWatch *)__ecereTemp1)->properties = properties, ((struct PropertyWatch *)__ecereTemp1));
4105 }
4106
4107 struct Expression * MkExpClass(struct __ecereNameSpace__ecere__sys__OldList * specifiers, struct Declarator * decl)
4108 {
4109 void * __ecereTemp1;
4110
4111 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 26, ((struct Expression *)__ecereTemp1)->_classExp.specifiers = specifiers, ((struct Expression *)__ecereTemp1)->_classExp.decl = decl, ((struct Expression *)__ecereTemp1));
4112 }
4113
4114 struct Expression * MkExpClassData(struct Identifier * id)
4115 {
4116 void * __ecereTemp1;
4117
4118 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 27, ((struct Expression *)__ecereTemp1)->classData.id = id, ((struct Expression *)__ecereTemp1));
4119 }
4120
4121 struct External * MkExternalDBTable(struct DBTableDef * table)
4122 {
4123 void * __ecereTemp1;
4124
4125 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_External), ((struct External *)__ecereTemp1)->type = 5, ((struct External *)__ecereTemp1)->table = table, ((struct External *)__ecereTemp1));
4126 }
4127
4128 struct DBTableDef * MkDBTableDef(char * name, struct Symbol * symbol, struct __ecereNameSpace__ecere__sys__OldList * definitions)
4129 {
4130 void * __ecereTemp1;
4131
4132 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_DBTableDef), ((struct DBTableDef *)__ecereTemp1)->name = name, ((struct DBTableDef *)__ecereTemp1)->symbol = symbol, ((struct DBTableDef *)__ecereTemp1)->definitions = definitions, ((struct DBTableDef *)__ecereTemp1));
4133 }
4134
4135 struct DBTableEntry * MkDBFieldEntry(struct TypeName * type, struct Identifier * id, char * name)
4136 {
4137 void * __ecereTemp1;
4138
4139 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_DBTableEntry), ((struct DBTableEntry *)__ecereTemp1)->type = 0, ((struct DBTableEntry *)__ecereTemp1)->dataType = type, ((struct DBTableEntry *)__ecereTemp1)->id = id, ((struct DBTableEntry *)__ecereTemp1)->name = name, ((struct DBTableEntry *)__ecereTemp1));
4140 }
4141
4142 struct DBIndexItem * MkDBIndexItem(struct Identifier * id, int order)
4143 {
4144 void * __ecereTemp1;
4145
4146 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_DBIndexItem), ((struct DBIndexItem *)__ecereTemp1)->id = id, ((struct DBIndexItem *)__ecereTemp1)->order = order, ((struct DBIndexItem *)__ecereTemp1));
4147 }
4148
4149 struct DBTableEntry * MkDBIndexEntry(struct __ecereNameSpace__ecere__sys__OldList * items, struct Identifier * id)
4150 {
4151 void * __ecereTemp1;
4152
4153 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_DBTableEntry), ((struct DBTableEntry *)__ecereTemp1)->type = 1, ((struct DBTableEntry *)__ecereTemp1)->items = items, ((struct DBTableEntry *)__ecereTemp1)->id = id, ((struct DBTableEntry *)__ecereTemp1));
4154 }
4155
4156 struct Expression * MkExpDBOpen(struct Expression * ds, struct Expression * dbName)
4157 {
4158 void * __ecereTemp1;
4159
4160 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 30, ((struct Expression *)__ecereTemp1)->dbopen.ds = ds, ((struct Expression *)__ecereTemp1)->dbopen.name = dbName, ((struct Expression *)__ecereTemp1));
4161 }
4162
4163 struct Expression * MkExpDBField(char * table, struct Identifier * id)
4164 {
4165 void * __ecereTemp1;
4166
4167 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 31, ((struct Expression *)__ecereTemp1)->db.table = table, ((struct Expression *)__ecereTemp1)->db.id = id, ((struct Expression *)__ecereTemp1));
4168 }
4169
4170 struct Expression * MkExpDBIndex(char * table, struct Identifier * id)
4171 {
4172 void * __ecereTemp1;
4173
4174 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 33, ((struct Expression *)__ecereTemp1)->db.table = table, ((struct Expression *)__ecereTemp1)->db.id = id, ((struct Expression *)__ecereTemp1));
4175 }
4176
4177 struct Expression * MkExpDBTable(char * table)
4178 {
4179 void * __ecereTemp1;
4180
4181 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 32, ((struct Expression *)__ecereTemp1)->db.table = table, ((struct Expression *)__ecereTemp1));
4182 }
4183
4184 struct Expression * MkExpArray(struct __ecereNameSpace__ecere__sys__OldList * expressions)
4185 {
4186 void * __ecereTemp1;
4187
4188 return (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Expression), ((struct Expression *)__ecereTemp1)->type = 37, ((struct Expression *)__ecereTemp1)->list = expressions, ((struct Expression *)__ecereTemp1));
4189 }
4190
4191 extern struct External * curExternal;
4192
4193 extern void FullClassNameCat(char *  output, char *  className, unsigned int includeTemplateParams);
4194
4195 extern void MangleClassName(char *  className);
4196
4197 extern void DeclareClass(struct Symbol * classSym, char *  className);
4198
4199 struct Expression * GetTemplateArgExpByName(char * paramName, struct __ecereNameSpace__ecere__com__Class * curClass, int tplType)
4200 {
4201 struct Expression * argExp = (((void *)0));
4202 struct __ecereNameSpace__ecere__com__Class * _class = curClass ? curClass : ((curExternal && curExternal->type == 0 && curExternal->function) ? curExternal->function->_class : (((void *)0)));
4203
4204 if(_class)
4205 {
4206 int id = 0;
4207 struct __ecereNameSpace__ecere__com__ClassTemplateParameter * curParam;
4208 struct __ecereNameSpace__ecere__com__Class * sClass;
4209
4210 for(sClass = _class; sClass; sClass = sClass->base)
4211 {
4212 id = 0;
4213 for(curParam = sClass->templateParams.first; curParam; curParam = curParam->next)
4214 {
4215 if(!strcmp(curParam->name, paramName))
4216 {
4217 for(sClass = sClass->base; sClass; sClass = sClass->base)
4218 id += sClass->templateParams.count;
4219 break;
4220 }
4221 id++;
4222 }
4223 if(curParam)
4224 break;
4225 }
4226 if(curParam && curParam->type != tplType)
4227 curParam = (((void *)0));
4228 if(curParam)
4229 {
4230 char idString[32];
4231 char className[1024];
4232 struct Expression * classExp;
4233
4234 sprintf(idString, "%d", id);
4235 strcpy(className, "__ecereClass_");
4236 FullClassNameCat(className, _class->fullName, 0x1);
4237 MangleClassName(className);
4238 DeclareClass(FindClass(_class->fullName), className);
4239 argExp = MkExpIndex((MkExpMember)(MkExpMember(MkExpIdentifier(MkIdentifier("this")), MkIdentifier("_class")), MkIdentifier("templateArgs")), MkListOne(MkExpConstant(idString)));
4240 }
4241 }
4242 return argExp;
4243 }
4244
4245 struct Expression * GetTemplateArgExp(struct TemplateParameter * param, struct __ecereNameSpace__ecere__com__Class * curClass, unsigned int pointer)
4246 {
4247 return param->identifier ? GetTemplateArgExpByName(param->identifier->string, curClass, 0) : (((void *)0));
4248 }
4249
4250 extern char *  GetSourceFile(void);
4251
4252 extern char *  GetOutputFile(void);
4253
4254 extern char *  __ecereNameSpace__ecere__sys__ChangeExtension(char *  string, char *  ext, char *  output);
4255
4256 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpen(char *  fileName, int mode);
4257
4258 extern int __ecereNameSpace__ecere__com__GetRuntimePlatform(void);
4259
4260 extern char *  __ecereNameSpace__ecere__sys__GetSystemPathBuffer(char *  d, char *  p);
4261
4262 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__MapIterator;
4263
4264 struct __ecereNameSpace__ecere__com__MapIterator
4265 {
4266 struct __ecereNameSpace__ecere__com__Instance * container;
4267 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
4268 };
4269
4270 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Iterator;
4271
4272 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__CustomAVLTree;
4273
4274 struct __ecereNameSpace__ecere__com__CustomAVLTree
4275 {
4276 struct __ecereNameSpace__ecere__com__AVLNode * root;
4277 int count;
4278 };
4279
4280 struct __ecereNameSpace__ecere__com__Instance * __ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_map(struct __ecereNameSpace__ecere__com__MapIterator * this);
4281
4282 void __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(struct __ecereNameSpace__ecere__com__MapIterator * this, struct __ecereNameSpace__ecere__com__Instance * value);
4283
4284 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__MapIterator_map;
4285
4286 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Next();
4287
4288 uint64 __ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_key(struct __ecereNameSpace__ecere__com__MapIterator * this);
4289
4290 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__MapIterator_key;
4291
4292 int __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(struct __ecereNameSpace__ecere__com__Instance * this, char *  format, ...);
4293
4294 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
4295
4296 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Free;
4297
4298 void OutputIntlStrings()
4299 {
4300 if(((struct __ecereNameSpace__ecere__com__CustomAVLTree *)(((char *)intlStrings + 12)))->count)
4301 {
4302 char * srcFile = GetSourceFile();
4303 char * objFile = GetOutputFile();
4304 char srcFileFixed[797];
4305 char potFile[797];
4306 struct __ecereNameSpace__ecere__com__Instance * f;
4307
4308 __ecereNameSpace__ecere__sys__ChangeExtension(objFile, "bowl", potFile);
4309 f = __ecereNameSpace__ecere__sys__FileOpen(potFile, 2);
4310 if(f)
4311 {
4312 char * filePrefix = "";
4313
4314 if(!(srcFile[0] && (srcFile[1] == ':' || srcFile[0] == '/')))
4315 filePrefix = (__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? ".\\" : "./";
4316 __ecereNameSpace__ecere__sys__GetSystemPathBuffer(srcFileFixed, srcFile);
4317 {
4318 struct __ecereNameSpace__ecere__com__MapIterator s = (s.container = (void *)0, s.pointer = (void *)0, __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(&s, (intlStrings)), s);
4319
4320 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&s))
4321 {
4322 struct ContextStringPair pair = (*(struct ContextStringPair *)__ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_key(&s));
4323
4324 {
4325 struct __ecereNameSpace__ecere__com__Iterator l =
4326 {
4327 ((struct __ecereNameSpace__ecere__com__Instance *)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&s)), 0
4328 };
4329
4330 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&l))
4331 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "#: %s%s:%d\n", filePrefix, srcFileFixed, (*(struct Location *)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&l)).start.line);
4332 }
4333 if(pair.context)
4334 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "msgctxt \"%s\"\n", pair.context);
4335 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "msgid \"%s\"\n", pair.string);
4336 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "msgstr \"%s\"\n\n", pair.string);
4337 }
4338 }
4339 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
4340 }
4341 ((void (*)(struct __ecereNameSpace__ecere__com__Instance *))intlStrings->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Free])(intlStrings);
4342 }
4343 }
4344
4345 extern struct __ecereNameSpace__ecere__sys__OldList * ast;
4346
4347 extern int yyparse();
4348
4349 void SetAST(struct __ecereNameSpace__ecere__sys__OldList * list)
4350 {
4351 ast = list;
4352 }
4353
4354 struct __ecereNameSpace__ecere__sys__OldList * GetAST()
4355 {
4356 return ast;
4357 }
4358
4359 void ParseEc()
4360 {
4361 yyparse();
4362 }
4363
4364 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
4365
4366 struct __ecereNameSpace__ecere__com__GlobalFunction;
4367
4368 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);
4369
4370 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_RegisterClass(int type, char *  name, char *  baseName, int size, int sizeClass, unsigned int (* )(void * ), void (* )(void * ), struct __ecereNameSpace__ecere__com__Instance * module, int declMode, int inheritanceAccess);
4371
4372 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_AddMethod(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, void *  function, int declMode);
4373
4374 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eClass_AddDataMember(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, unsigned int size, unsigned int alignment, int declMode);
4375
4376 void __ecereRegisterModule_ast(struct __ecereNameSpace__ecere__com__Instance * module)
4377 {
4378 struct __ecereNameSpace__ecere__com__Class * class;
4379
4380 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetDefaultNameSpace", "void SetDefaultNameSpace(char * s)", SetDefaultNameSpace, module, 1);
4381 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetStrictNameSpaces", "void SetStrictNameSpaces(bool b)", SetStrictNameSpaces, module, 1);
4382 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetDeclMode", "void SetDeclMode(ecere::com::AccessMode accessMode)", SetDeclMode, module, 1);
4383 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetDefaultDeclMode", "void SetDefaultDeclMode(ecere::com::AccessMode accessMode)", SetDefaultDeclMode, module, 1);
4384 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetCurrentNameSpace", "void SetCurrentNameSpace(char * s)", SetCurrentNameSpace, module, 1);
4385 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkList", "ecere::sys::OldList * MkList(void)", MkList, module, 1);
4386 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkListOne", "ecere::sys::OldList * MkListOne(void * item)", MkListOne, module, 1);
4387 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ListAdd", "void ListAdd(ecere::sys::OldList list, void * item)", ListAdd, module, 2);
4388 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ListAddFront", "void ListAddFront(ecere::sys::OldList list, void * item)", ListAddFront, module, 2);
4389 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkIdentifier", "Identifier MkIdentifier(char * string)", MkIdentifier, module, 1);
4390 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkTypeTemplateParameter", "TemplateParameter MkTypeTemplateParameter(Identifier identifier, TemplateDatatype baseTplDatatype, TemplateArgument defaultArgument)", MkTypeTemplateParameter, module, 1);
4391 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkIdentifierTemplateParameter", "TemplateParameter MkIdentifierTemplateParameter(Identifier identifier, ecere::com::TemplateMemberType memberType, TemplateArgument defaultArgument)", MkIdentifierTemplateParameter, module, 1);
4392 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpressionTemplateParameter", "TemplateParameter MkExpressionTemplateParameter(Identifier identifier, TemplateDatatype dataType, TemplateArgument defaultArgument)", MkExpressionTemplateParameter, module, 1);
4393 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkTemplateDatatype", "TemplateDatatype MkTemplateDatatype(ecere::sys::OldList * specifiers, Declarator decl)", MkTemplateDatatype, module, 1);
4394 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkTemplateTypeArgument", "TemplateArgument MkTemplateTypeArgument(TemplateDatatype tplDatatype)", MkTemplateTypeArgument, module, 1);
4395 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkTemplateExpressionArgument", "TemplateArgument MkTemplateExpressionArgument(Expression expr)", MkTemplateExpressionArgument, module, 1);
4396 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkTemplateIdentifierArgument", "TemplateArgument MkTemplateIdentifierArgument(Identifier ident)", MkTemplateIdentifierArgument, module, 1);
4397 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpExtensionCompound", "Expression MkExpExtensionCompound(Statement compound)", MkExpExtensionCompound, module, 2);
4398 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpExtensionExpression", "Expression MkExpExtensionExpression(ecere::sys::OldList * expressions)", MkExpExtensionExpression, module, 2);
4399 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpExtensionInitializer", "Expression MkExpExtensionInitializer(TypeName typeName, Initializer initializer)", MkExpExtensionInitializer, module, 2);
4400 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpIdentifier", "Expression MkExpIdentifier(Identifier id)", MkExpIdentifier, module, 1);
4401 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpDummy", "Expression MkExpDummy(void)", MkExpDummy, module, 1);
4402 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpConstant", "Expression MkExpConstant(char * string)", MkExpConstant, module, 1);
4403 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpString", "Expression MkExpString(char * string)", MkExpString, module, 2);
4404 class = __ecereNameSpace__ecere__com__eSystem_RegisterClass(1, "ContextStringPair", 0, sizeof(struct ContextStringPair), 0, 0, 0, module, 1, 1);
4405 if(((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + 12)))->application == ((struct __ecereNameSpace__ecere__com__Module *)(((char *)__thisModule + 12)))->application && class)
4406 __ecereClass_ContextStringPair = class;
4407 __ecereNameSpace__ecere__com__eClass_AddMethod(class, "OnCompare", 0, __ecereMethod_ContextStringPair_OnCompare, 1);
4408 __ecereNameSpace__ecere__com__eClass_AddMethod(class, "OnFree", 0, __ecereMethod_ContextStringPair_OnFree, 1);
4409 __ecereNameSpace__ecere__com__eClass_AddDataMember(class, "string", "String", 4, 4, 1);
4410 __ecereNameSpace__ecere__com__eClass_AddDataMember(class, "context", "String", 4, 4, 1);
4411 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpIntlString", "Expression MkExpIntlString(char * string, char * context)", MkExpIntlString, module, 2);
4412 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpOp", "Expression MkExpOp(Expression exp1, int op, Expression exp2)", MkExpOp, module, 2);
4413 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpBrackets", "Expression MkExpBrackets(ecere::sys::OldList expressions)", MkExpBrackets, module, 2);
4414 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpIndex", "Expression MkExpIndex(Expression expression, ecere::sys::OldList index)", MkExpIndex, module, 2);
4415 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpCall", "Expression MkExpCall(Expression expression, ecere::sys::OldList arguments)", MkExpCall, module, 2);
4416 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpMember", "Expression MkExpMember(Expression expression, Identifier member)", MkExpMember, module, 2);
4417 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpPointer", "Expression MkExpPointer(Expression expression, Identifier member)", MkExpPointer, module, 2);
4418 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpTypeSize", "Expression MkExpTypeSize(TypeName typeName)", MkExpTypeSize, module, 2);
4419 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpClassSize", "Expression MkExpClassSize(Specifier _class)", MkExpClassSize, module, 2);
4420 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpCast", "Expression MkExpCast(TypeName typeName, Expression expression)", MkExpCast, module, 2);
4421 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpCondition", "Expression MkExpCondition(Expression cond, ecere::sys::OldList expressions, Expression elseExp)", MkExpCondition, module, 2);
4422 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpRenew", "Expression MkExpRenew(Expression memExp, TypeName type, Expression size)", MkExpRenew, module, 2);
4423 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpRenew0", "Expression MkExpRenew0(Expression memExp, TypeName type, Expression size)", MkExpRenew0, module, 2);
4424 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpNew", "Expression MkExpNew(TypeName type, Expression size)", MkExpNew, module, 2);
4425 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpNew0", "Expression MkExpNew0(TypeName type, Expression size)", MkExpNew0, module, 2);
4426 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpVaArg", "Expression MkExpVaArg(Expression exp, TypeName type)", MkExpVaArg, module, 2);
4427 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkSpecifier", "Specifier MkSpecifier(int specifier)", MkSpecifier, module, 2);
4428 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkSpecifierTypeOf", "Specifier MkSpecifierTypeOf(Expression expression)", MkSpecifierTypeOf, module, 2);
4429 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkSpecifierSubClass", "Specifier MkSpecifierSubClass(Specifier _class)", MkSpecifierSubClass, module, 2);
4430 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkSpecifierExtended", "Specifier MkSpecifierExtended(char * name)", MkSpecifierExtended, module, 2);
4431 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkEnum", "Specifier MkEnum(Identifier id, ecere::sys::OldList list)", MkEnum, module, 2);
4432 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkStructOrUnion", "Specifier MkStructOrUnion(SpecifierType type, Identifier id, ecere::sys::OldList definitions)", MkStructOrUnion, module, 2);
4433 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("AddStructDefinitions", "void AddStructDefinitions(Specifier spec, ecere::sys::OldList definitions)", AddStructDefinitions, module, 2);
4434 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclaratorIdentifier", "Declarator MkDeclaratorIdentifier(Identifier id)", MkDeclaratorIdentifier, module, 1);
4435 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclaratorFunction", "Declarator MkDeclaratorFunction(Declarator declarator, ecere::sys::OldList parameters)", MkDeclaratorFunction, module, 2);
4436 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclaratorExtended", "Declarator MkDeclaratorExtended(char * extended, Declarator declarator)", MkDeclaratorExtended, module, 2);
4437 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclaratorExtendedEnd", "Declarator MkDeclaratorExtendedEnd(char * extended, Declarator declarator)", MkDeclaratorExtendedEnd, module, 2);
4438 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkStructDeclarator", "Declarator MkStructDeclarator(Declarator declarator, Expression exp)", MkStructDeclarator, module, 2);
4439 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclaratorBrackets", "Declarator MkDeclaratorBrackets(Declarator declarator)", MkDeclaratorBrackets, module, 2);
4440 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclaratorArray", "Declarator MkDeclaratorArray(Declarator declarator, Expression exp)", MkDeclaratorArray, module, 2);
4441 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclaratorEnumArray", "Declarator MkDeclaratorEnumArray(Declarator declarator, Specifier _class)", MkDeclaratorEnumArray, module, 2);
4442 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclaratorPointer", "Declarator MkDeclaratorPointer(Pointer pointer, Declarator declarator)", MkDeclaratorPointer, module, 2);
4443 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkEnumerator", "Enumerator MkEnumerator(Identifier id, Expression exp)", MkEnumerator, module, 2);
4444 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkPointer", "Pointer MkPointer(ecere::sys::OldList qualifiers, Pointer pointer)", MkPointer, module, 2);
4445 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkInitializerAssignment", "Initializer MkInitializerAssignment(Expression exp)", MkInitializerAssignment, module, 2);
4446 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkInitializerList", "Initializer MkInitializerList(ecere::sys::OldList list)", MkInitializerList, module, 2);
4447 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkInitDeclarator", "InitDeclarator MkInitDeclarator(Declarator declarator, Initializer initializer)", MkInitDeclarator, module, 2);
4448 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkTypeName", "TypeName MkTypeName(ecere::sys::OldList qualifiers, Declarator declarator)", MkTypeName, module, 1);
4449 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetDeclId", "Identifier GetDeclId(Declarator decl)", GetDeclId, module, 1);
4450 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclarationClassInst", "Declaration MkDeclarationClassInst(Instantiation inst)", MkDeclarationClassInst, module, 2);
4451 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclarationInst", "Declaration MkDeclarationInst(Instantiation inst)", MkDeclarationInst, module, 2);
4452 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclarationDefine", "Declaration MkDeclarationDefine(Identifier id, Expression exp)", MkDeclarationDefine, module, 2);
4453 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeclaration", "Declaration MkDeclaration(ecere::sys::OldList specifiers, ecere::sys::OldList initDeclarators)", MkDeclaration, module, 2);
4454 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkStructDeclaration", "Declaration MkStructDeclaration(ecere::sys::OldList specifiers, ecere::sys::OldList declarators, Specifier extStorage)", MkStructDeclaration, module, 2);
4455 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkLabeledStmt", "Statement MkLabeledStmt(Identifier id, Statement statement)", MkLabeledStmt, module, 2);
4456 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkCaseStmt", "Statement MkCaseStmt(Expression exp, Statement statement)", MkCaseStmt, module, 2);
4457 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkCompoundStmt", "Statement MkCompoundStmt(ecere::sys::OldList declarations, ecere::sys::OldList statements)", MkCompoundStmt, module, 2);
4458 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpressionStmt", "Statement MkExpressionStmt(ecere::sys::OldList expressions)", MkExpressionStmt, module, 2);
4459 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkBadDeclStmt", "Statement MkBadDeclStmt(Declaration decl)", MkBadDeclStmt, module, 2);
4460 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkIfStmt", "Statement MkIfStmt(ecere::sys::OldList exp, Statement statement, Statement elseStmt)", MkIfStmt, module, 2);
4461 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkSwitchStmt", "Statement MkSwitchStmt(ecere::sys::OldList exp, Statement statement)", MkSwitchStmt, module, 2);
4462 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkWhileStmt", "Statement MkWhileStmt(ecere::sys::OldList exp, Statement statement)", MkWhileStmt, module, 2);
4463 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDoWhileStmt", "Statement MkDoWhileStmt(Statement statement, ecere::sys::OldList exp)", MkDoWhileStmt, module, 2);
4464 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkForStmt", "Statement MkForStmt(Statement init, Statement check, ecere::sys::OldList inc, Statement statement)", MkForStmt, module, 2);
4465 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkForEachStmt", "Statement MkForEachStmt(Identifier id, ecere::sys::OldList exp, ecere::sys::OldList filter, Statement statement)", MkForEachStmt, module, 2);
4466 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkGotoStmt", "Statement MkGotoStmt(Identifier id)", MkGotoStmt, module, 2);
4467 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkContinueStmt", "Statement MkContinueStmt(void)", MkContinueStmt, module, 2);
4468 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkBreakStmt", "Statement MkBreakStmt(void)", MkBreakStmt, module, 2);
4469 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkReturnStmt", "Statement MkReturnStmt(ecere::sys::OldList exp)", MkReturnStmt, module, 2);
4470 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkFunction", "FunctionDefinition MkFunction(ecere::sys::OldList specifiers, Declarator declarator, ecere::sys::OldList declarationList)", MkFunction, module, 2);
4471 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ProcessFunctionBody", "void ProcessFunctionBody(FunctionDefinition func, Statement body)", ProcessFunctionBody, module, 2);
4472 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExternalFunction", "External MkExternalFunction(FunctionDefinition function)", MkExternalFunction, module, 2);
4473 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExternalImport", "External MkExternalImport(char * name, ecere::com::ImportType importType, ecere::com::AccessMode importAccess)", MkExternalImport, module, 2);
4474 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExternalDeclaration", "External MkExternalDeclaration(Declaration declaration)", MkExternalDeclaration, module, 2);
4475 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExternalNameSpace", "External MkExternalNameSpace(Identifier identifier)", MkExternalNameSpace, module, 2);
4476 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetClassTemplateArgs", "void SetClassTemplateArgs(Specifier spec, ecere::sys::OldList templateArgs)", SetClassTemplateArgs, module, 2);
4477 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("_MkSpecifierName", "Specifier _MkSpecifierName(char * name, Symbol symbol, ecere::sys::OldList templateArgs)", _MkSpecifierName, module, 2);
4478 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkSpecifierName", "Specifier MkSpecifierName(char * name)", MkSpecifierName, module, 1);
4479 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkSpecifierNameArgs", "Specifier MkSpecifierNameArgs(char * name, ecere::sys::OldList * templateArgs)", MkSpecifierNameArgs, module, 1);
4480 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassFunction", "ClassFunction MkClassFunction(ecere::sys::OldList specifiers, Specifier _class, Declarator decl, ecere::sys::OldList declList)", MkClassFunction, module, 2);
4481 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ProcessClassFunctionBody", "void ProcessClassFunctionBody(ClassFunction func, Statement body)", ProcessClassFunctionBody, module, 2);
4482 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkSpecsClass", "ecere::sys::OldList * MkSpecsClass(Specifier _class)", MkSpecsClass, module, 2);
4483 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkMemberInit", "MemberInit MkMemberInit(ecere::sys::OldList ids, Initializer initializer)", MkMemberInit, module, 2);
4484 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkMemberInitExp", "MemberInit MkMemberInitExp(Expression idExp, Initializer initializer)", MkMemberInitExp, module, 2);
4485 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkMembersInitList", "MembersInit MkMembersInitList(ecere::sys::OldList dataMembers)", MkMembersInitList, module, 2);
4486 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkMembersInitMethod", "MembersInit MkMembersInitMethod(ClassFunction function)", MkMembersInitMethod, module, 2);
4487 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkInstantiation", "Instantiation MkInstantiation(Specifier _class, Expression exp, ecere::sys::OldList members)", MkInstantiation, module, 2);
4488 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkInstantiationNamed", "Instantiation MkInstantiationNamed(ecere::sys::OldList specs, Expression exp, ecere::sys::OldList members)", MkInstantiationNamed, module, 2);
4489 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefAccessOverride", "ClassDef MkClassDefAccessOverride(ecere::com::AccessMode access, Identifier id)", MkClassDefAccessOverride, module, 2);
4490 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefMemberAccess", "ClassDef MkClassDefMemberAccess(void)", MkClassDefMemberAccess, module, 2);
4491 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefDeclaration", "ClassDef MkClassDefDeclaration(Declaration decl)", MkClassDefDeclaration, module, 2);
4492 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefClassData", "ClassDef MkClassDefClassData(Declaration decl)", MkClassDefClassData, module, 2);
4493 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefDesigner", "ClassDef MkClassDefDesigner(char * designer)", MkClassDefDesigner, module, 2);
4494 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefNoExpansion", "ClassDef MkClassDefNoExpansion(void)", MkClassDefNoExpansion, module, 2);
4495 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefFixed", "ClassDef MkClassDefFixed(void)", MkClassDefFixed, module, 2);
4496 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefDesignerDefaultProperty", "ClassDef MkClassDefDesignerDefaultProperty(Identifier id)", MkClassDefDesignerDefaultProperty, module, 2);
4497 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefDefaultProperty", "ClassDef MkClassDefDefaultProperty(ecere::sys::OldList defProperties)", MkClassDefDefaultProperty, module, 2);
4498 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefFunction", "ClassDef MkClassDefFunction(ClassFunction function)", MkClassDefFunction, module, 2);
4499 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("DeclClassAddNameSpace", "Symbol DeclClassAddNameSpace(int symbolID, char * className)", DeclClassAddNameSpace, module, 2);
4500 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("DeclClass", "Symbol DeclClass(int symbolID, char * name)", DeclClass, module, 2);
4501 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("_DeclClass", "Symbol _DeclClass(int symbolID, char * name)", _DeclClass, module, 2);
4502 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetupBaseSpecs", "void SetupBaseSpecs(Symbol symbol, ecere::sys::OldList baseSpecs)", SetupBaseSpecs, module, 2);
4503 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClass", "ClassDefinition MkClass(Symbol symbol, ecere::sys::OldList baseSpecs, ecere::sys::OldList definitions)", MkClass, module, 2);
4504 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpInstance", "Expression MkExpInstance(Instantiation inst)", MkExpInstance, module, 2);
4505 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExternalClass", "External MkExternalClass(ClassDefinition _class)", MkExternalClass, module, 2);
4506 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkProperty", "PropertyDef MkProperty(ecere::sys::OldList specs, Declarator decl, Identifier id, Statement setStmt, Statement getStmt)", MkProperty, module, 2);
4507 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefProperty", "ClassDef MkClassDefProperty(PropertyDef propertyDef)", MkClassDefProperty, module, 2);
4508 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefClassProperty", "ClassDef MkClassDefClassProperty(PropertyDef propertyDef)", MkClassDefClassProperty, module, 2);
4509 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefClassPropertyValue", "ClassDef MkClassDefClassPropertyValue(Identifier id, Initializer initializer)", MkClassDefClassPropertyValue, module, 2);
4510 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("CheckType", "int CheckType(char * text)", CheckType, module, 2);
4511 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("check_type", "int check_type(void)", check_type, module, 2);
4512 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("PushContext", "Context PushContext(void)", PushContext, module, 2);
4513 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("PopContext", "void PopContext(Context ctx)", PopContext, module, 2);
4514 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FindType", "Symbol FindType(Context ctx, char * name)", FindType, module, 2);
4515 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FindTemplateTypeParameter", "TemplatedType FindTemplateTypeParameter(Context ctx, char * name)", FindTemplateTypeParameter, module, 2);
4516 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ModuleAccess", "bool ModuleAccess(ecere::com::Module searchIn, ecere::com::Module searchFor)", ModuleAccess, module, 2);
4517 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FindModule", "ModuleImport FindModule(ecere::com::Module moduleToFind)", FindModule, module, 2);
4518 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FindClass", "Symbol FindClass(char * name)", FindClass, module, 1);
4519 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("CopyTypeInto", "void CopyTypeInto(Type type, Type src)", CopyTypeInto, module, 2);
4520 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ProcessType", "Type ProcessType(ecere::sys::OldList specs, Declarator decl)", ProcessType, module, 1);
4521 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ProcessTypeString", "Type ProcessTypeString(char * string, bool staticMethod)", ProcessTypeString, module, 1);
4522 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassTypeSymbol", "Type MkClassTypeSymbol(Symbol symbol)", MkClassTypeSymbol, module, 2);
4523 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassType", "Type MkClassType(char * name)", MkClassType, module, 1);
4524 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkAsmField", "AsmField MkAsmField(char * command, Expression expression)", MkAsmField, module, 2);
4525 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkAsmStmt", "Statement MkAsmStmt(Specifier spec, char * statements, ecere::sys::OldList inputFields, ecere::sys::OldList outputFields, ecere::sys::OldList clobberedFields)", MkAsmStmt, module, 2);
4526 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkClassDefPropertyWatch", "ClassDef MkClassDefPropertyWatch(PropertyWatch watcher)", MkClassDefPropertyWatch, module, 2);
4527 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkFireWatchersStmt", "Statement MkFireWatchersStmt(Expression object, ecere::sys::OldList watches)", MkFireWatchersStmt, module, 2);
4528 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkStopWatchingStmt", "Statement MkStopWatchingStmt(Expression watcher, Expression object, ecere::sys::OldList watches)", MkStopWatchingStmt, module, 2);
4529 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkWatchStmt", "Statement MkWatchStmt(Expression watcher, Expression object, ecere::sys::OldList watches)", MkWatchStmt, module, 2);
4530 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDeleteWatch", "PropertyWatch MkDeleteWatch(Statement compound)", MkDeleteWatch, module, 2);
4531 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkPropertyWatch", "PropertyWatch MkPropertyWatch(ecere::sys::OldList properties, Statement compound)", MkPropertyWatch, module, 2);
4532 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpClass", "Expression MkExpClass(ecere::sys::OldList * specifiers, Declarator decl)", MkExpClass, module, 2);
4533 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpClassData", "Expression MkExpClassData(Identifier id)", MkExpClassData, module, 2);
4534 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExternalDBTable", "External MkExternalDBTable(DBTableDef table)", MkExternalDBTable, module, 2);
4535 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDBTableDef", "DBTableDef MkDBTableDef(char * name, Symbol symbol, ecere::sys::OldList * definitions)", MkDBTableDef, module, 2);
4536 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDBFieldEntry", "DBTableEntry MkDBFieldEntry(TypeName type, Identifier id, char * name)", MkDBFieldEntry, module, 2);
4537 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDBIndexItem", "DBIndexItem MkDBIndexItem(Identifier id, Order order)", MkDBIndexItem, module, 2);
4538 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkDBIndexEntry", "DBTableEntry MkDBIndexEntry(ecere::sys::OldList * items, Identifier id)", MkDBIndexEntry, module, 2);
4539 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpDBOpen", "Expression MkExpDBOpen(Expression ds, Expression dbName)", MkExpDBOpen, module, 2);
4540 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpDBField", "Expression MkExpDBField(char * table, Identifier id)", MkExpDBField, module, 2);
4541 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpDBIndex", "Expression MkExpDBIndex(char * table, Identifier id)", MkExpDBIndex, module, 2);
4542 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpDBTable", "Expression MkExpDBTable(char * table)", MkExpDBTable, module, 2);
4543 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("MkExpArray", "Expression MkExpArray(ecere::sys::OldList * expressions)", MkExpArray, module, 2);
4544 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetTemplateArgExpByName", "Expression GetTemplateArgExpByName(char * paramName, ecere::com::Class curClass, ecere::com::TemplateParameterType tplType)", GetTemplateArgExpByName, module, 2);
4545 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetTemplateArgExp", "Expression GetTemplateArgExp(TemplateParameter param, ecere::com::Class curClass, bool pointer)", GetTemplateArgExp, module, 2);
4546 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("OutputIntlStrings", "void OutputIntlStrings(void)", OutputIntlStrings, module, 1);
4547 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetAST", "void SetAST(ecere::sys::OldList * list)", SetAST, module, 1);
4548 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetAST", "ecere::sys::OldList * GetAST(void)", GetAST, module, 1);
4549 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ParseEc", "void ParseEc(void)", ParseEc, module, 1);
4550 }
4551
4552 void __ecereUnregisterModule_ast(struct __ecereNameSpace__ecere__com__Instance * module)
4553 {
4554
4555 }
4556
4557 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Map_TPL_ContextStringPair__ecere__com__List_TPL_Location___;
4558
4559 void __ecereCreateModuleInstances_ast()
4560 {
4561 intlStrings = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__Map_TPL_ContextStringPair__ecere__com__List_TPL_Location___);
4562 __ecereNameSpace__ecere__com__eInstance_IncRef(intlStrings);
4563 }
4564
4565 void __ecereDestroyModuleInstances_ast()
4566 {
4567 (__ecereNameSpace__ecere__com__eInstance_DecRef(intlStrings), intlStrings = 0);
4568 }
4569