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