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