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

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