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

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