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