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