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

   1 /* Code generated from eC source file: pass3.ec */
   2 #if defined(_WIN32)
   3 #define __runtimePlatform 1
   4 #elif defined(__APPLE__)
   5 #define __runtimePlatform 3
   6 #else
   7 #define __runtimePlatform 2
   8 #endif
   9 #if defined(__GNUC__)
  10 typedef long long int64;
  11 typedef unsigned long long uint64;
  12 #ifndef _WIN32
  13 #define __declspec(x)
  14 #endif
  15 #elif defined(__TINYC__)
  16 #include <stdarg.h>
  17 #define __builtin_va_list va_list
  18 #define __builtin_va_start va_start
  19 #define __builtin_va_end va_end
  20 #ifdef _WIN32
  21 #define strcasecmp stricmp
  22 #define strncasecmp strnicmp
  23 #define __declspec(x) __attribute__((x))
  24 #else
  25 #define __declspec(x)
  26 #endif
  27 typedef long long int64;
  28 typedef unsigned long long uint64;
  29 #else
  30 typedef __int64 int64;
  31 typedef unsigned __int64 uint64;
  32 #endif
  33 #ifdef __BIG_ENDIAN__
  34 #define __ENDIAN_PAD(x) (8 - (x))
  35 #else
  36 #define __ENDIAN_PAD(x) 0
  37 #endif
  38 #include <stdint.h>
  39 #include <sys/types.h>
  40 struct __ecereNameSpace__ecere__com__Instance;
  41
  42 extern void *  __ecereNameSpace__ecere__com__eSystem_New(unsigned int size);
  43
  44 extern void *  __ecereNameSpace__ecere__com__eSystem_New0(unsigned int size);
  45
  46 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew(void *  memory, unsigned int size);
  47
  48 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew0(void *  memory, unsigned int size);
  49
  50 extern void __ecereNameSpace__ecere__com__eSystem_Delete(void *  memory);
  51
  52 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
  53
  54 struct __ecereNameSpace__ecere__sys__BTNode;
  55
  56 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
  57
  58 struct __ecereNameSpace__ecere__sys__BinaryTree
  59 {
  60 struct __ecereNameSpace__ecere__sys__BTNode * root;
  61 int count;
  62 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
  63 void (*  FreeKey)(void *  key);
  64 } __attribute__ ((gcc_struct));
  65
  66 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
  67
  68 struct __ecereNameSpace__ecere__sys__OldList
  69 {
  70 void *  first;
  71 void *  last;
  72 int count;
  73 unsigned int offset;
  74 unsigned int circ;
  75 } __attribute__ ((gcc_struct));
  76
  77 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
  78
  79 struct __ecereNameSpace__ecere__com__Method
  80 {
  81 const char *  name;
  82 struct __ecereNameSpace__ecere__com__Method * parent;
  83 struct __ecereNameSpace__ecere__com__Method * left;
  84 struct __ecereNameSpace__ecere__com__Method * right;
  85 int depth;
  86 int (*  function)();
  87 int vid;
  88 int type;
  89 struct __ecereNameSpace__ecere__com__Class * _class;
  90 void *  symbol;
  91 const char *  dataTypeString;
  92 struct Type * dataType;
  93 int memberAccess;
  94 } __attribute__ ((gcc_struct));
  95
  96 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
  97
  98 struct __ecereNameSpace__ecere__com__Property
  99 {
 100 struct __ecereNameSpace__ecere__com__Property * prev;
 101 struct __ecereNameSpace__ecere__com__Property * next;
 102 const char *  name;
 103 unsigned int isProperty;
 104 int memberAccess;
 105 int id;
 106 struct __ecereNameSpace__ecere__com__Class * _class;
 107 const char *  dataTypeString;
 108 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 109 struct Type * dataType;
 110 void (*  Set)(void * , int);
 111 int (*  Get)(void * );
 112 unsigned int (*  IsSet)(void * );
 113 void *  data;
 114 void *  symbol;
 115 int vid;
 116 unsigned int conversion;
 117 unsigned int watcherOffset;
 118 const char *  category;
 119 unsigned int compiled;
 120 unsigned int selfWatchable;
 121 unsigned int isWatchable;
 122 } __attribute__ ((gcc_struct));
 123
 124 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_CodePosition;
 125
 126 struct CodePosition
 127 {
 128 int line;
 129 int charPos;
 130 int pos;
 131 int included;
 132 } __attribute__ ((gcc_struct));
 133
 134 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Location;
 135
 136 struct Location
 137 {
 138 struct CodePosition start;
 139 struct CodePosition end;
 140 } __attribute__ ((gcc_struct));
 141
 142 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attrib;
 143
 144 struct Attrib;
 145
 146 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ExtDecl;
 147
 148 struct ExtDecl
 149 {
 150 struct Location loc;
 151 int type;
 152 union
 153 {
 154 char * s;
 155 struct Attrib * attr;
 156 } __attribute__ ((gcc_struct)) __anon1;
 157 } __attribute__ ((gcc_struct));
 158
 159 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDefinition;
 160
 161 struct ClassDefinition;
 162
 163 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
 164
 165 struct Context;
 166
 167 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
 168
 169 struct Instantiation;
 170
 171 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
 172
 173 struct Declaration
 174 {
 175 struct Declaration * prev;
 176 struct Declaration * next;
 177 struct Location loc;
 178 int type;
 179 union
 180 {
 181 struct
 182 {
 183 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 184 struct __ecereNameSpace__ecere__sys__OldList *  declarators;
 185 } __attribute__ ((gcc_struct)) __anon1;
 186 struct Instantiation * inst;
 187 struct
 188 {
 189 struct Identifier * id;
 190 struct Expression * exp;
 191 } __attribute__ ((gcc_struct)) __anon2;
 192 } __attribute__ ((gcc_struct)) __anon1;
 193 struct Specifier * extStorage;
 194 struct Symbol * symbol;
 195 int declMode;
 196 } __attribute__ ((gcc_struct));
 197
 198 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
 199
 200 struct Statement
 201 {
 202 struct Statement * prev;
 203 struct Statement * next;
 204 struct Location loc;
 205 int type;
 206 union
 207 {
 208 struct __ecereNameSpace__ecere__sys__OldList *  expressions;
 209 struct
 210 {
 211 struct Identifier * id;
 212 struct Statement * stmt;
 213 } __attribute__ ((gcc_struct)) labeled;
 214 struct
 215 {
 216 struct Expression * exp;
 217 struct Statement * stmt;
 218 } __attribute__ ((gcc_struct)) caseStmt;
 219 struct
 220 {
 221 struct __ecereNameSpace__ecere__sys__OldList * declarations;
 222 struct __ecereNameSpace__ecere__sys__OldList * statements;
 223 struct Context * context;
 224 unsigned int isSwitch;
 225 } __attribute__ ((gcc_struct)) compound;
 226 struct
 227 {
 228 struct __ecereNameSpace__ecere__sys__OldList * exp;
 229 struct Statement * stmt;
 230 struct Statement * elseStmt;
 231 } __attribute__ ((gcc_struct)) ifStmt;
 232 struct
 233 {
 234 struct __ecereNameSpace__ecere__sys__OldList * exp;
 235 struct Statement * stmt;
 236 } __attribute__ ((gcc_struct)) switchStmt;
 237 struct
 238 {
 239 struct __ecereNameSpace__ecere__sys__OldList * exp;
 240 struct Statement * stmt;
 241 } __attribute__ ((gcc_struct)) whileStmt;
 242 struct
 243 {
 244 struct __ecereNameSpace__ecere__sys__OldList * exp;
 245 struct Statement * stmt;
 246 } __attribute__ ((gcc_struct)) doWhile;
 247 struct
 248 {
 249 struct Statement * init;
 250 struct Statement * check;
 251 struct __ecereNameSpace__ecere__sys__OldList * increment;
 252 struct Statement * stmt;
 253 } __attribute__ ((gcc_struct)) forStmt;
 254 struct
 255 {
 256 struct Identifier * id;
 257 } __attribute__ ((gcc_struct)) gotoStmt;
 258 struct
 259 {
 260 struct Specifier * spec;
 261 char * statements;
 262 struct __ecereNameSpace__ecere__sys__OldList * inputFields;
 263 struct __ecereNameSpace__ecere__sys__OldList * outputFields;
 264 struct __ecereNameSpace__ecere__sys__OldList * clobberedFields;
 265 } __attribute__ ((gcc_struct)) asmStmt;
 266 struct
 267 {
 268 struct Expression * watcher;
 269 struct Expression * object;
 270 struct __ecereNameSpace__ecere__sys__OldList * watches;
 271 } __attribute__ ((gcc_struct)) _watch;
 272 struct
 273 {
 274 struct Identifier * id;
 275 struct __ecereNameSpace__ecere__sys__OldList * exp;
 276 struct __ecereNameSpace__ecere__sys__OldList * filter;
 277 struct Statement * stmt;
 278 } __attribute__ ((gcc_struct)) forEachStmt;
 279 struct Declaration * decl;
 280 } __attribute__ ((gcc_struct)) __anon1;
 281 } __attribute__ ((gcc_struct));
 282
 283 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
 284
 285 struct TypeName
 286 {
 287 struct TypeName * prev;
 288 struct TypeName * next;
 289 struct Location loc;
 290 struct __ecereNameSpace__ecere__sys__OldList *  qualifiers;
 291 struct Declarator * declarator;
 292 int classObjectType;
 293 struct Expression * bitCount;
 294 } __attribute__ ((gcc_struct));
 295
 296 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
 297
 298 struct Initializer
 299 {
 300 struct Initializer * prev;
 301 struct Initializer * next;
 302 struct Location loc;
 303 int type;
 304 union
 305 {
 306 struct Expression * exp;
 307 struct __ecereNameSpace__ecere__sys__OldList *  list;
 308 } __attribute__ ((gcc_struct)) __anon1;
 309 unsigned int isConstant;
 310 struct Identifier * id;
 311 } __attribute__ ((gcc_struct));
 312
 313 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
 314
 315 struct __ecereNameSpace__ecere__com__DataValue
 316 {
 317 union
 318 {
 319 char c;
 320 unsigned char uc;
 321 short s;
 322 unsigned short us;
 323 int i;
 324 unsigned int ui;
 325 void *  p;
 326 float f;
 327 double d;
 328 long long i64;
 329 uint64 ui64;
 330 } __attribute__ ((gcc_struct)) __anon1;
 331 } __attribute__ ((gcc_struct));
 332
 333 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
 334
 335 struct Expression
 336 {
 337 struct Expression * prev;
 338 struct Expression * next;
 339 struct Location loc;
 340 int type;
 341 union
 342 {
 343 struct
 344 {
 345 char *  constant;
 346 struct Identifier * identifier;
 347 } __attribute__ ((gcc_struct)) __anon1;
 348 struct Statement * compound;
 349 struct Instantiation * instance;
 350 struct
 351 {
 352 char *  string;
 353 unsigned int intlString;
 354 unsigned int wideString;
 355 } __attribute__ ((gcc_struct)) __anon2;
 356 struct __ecereNameSpace__ecere__sys__OldList *  list;
 357 struct
 358 {
 359 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
 360 struct Declarator * decl;
 361 } __attribute__ ((gcc_struct)) _classExp;
 362 struct
 363 {
 364 struct Identifier * id;
 365 } __attribute__ ((gcc_struct)) classData;
 366 struct
 367 {
 368 struct Expression * exp;
 369 struct __ecereNameSpace__ecere__sys__OldList * arguments;
 370 struct Location argLoc;
 371 } __attribute__ ((gcc_struct)) call;
 372 struct
 373 {
 374 struct Expression * exp;
 375 struct __ecereNameSpace__ecere__sys__OldList * index;
 376 } __attribute__ ((gcc_struct)) index;
 377 struct
 378 {
 379 struct Expression * exp;
 380 struct Identifier * member;
 381 int memberType;
 382 unsigned int thisPtr;
 383 } __attribute__ ((gcc_struct)) member;
 384 struct
 385 {
 386 int op;
 387 struct Expression * exp1;
 388 struct Expression * exp2;
 389 } __attribute__ ((gcc_struct)) op;
 390 struct TypeName * typeName;
 391 struct Specifier * _class;
 392 struct
 393 {
 394 struct TypeName * typeName;
 395 struct Expression * exp;
 396 } __attribute__ ((gcc_struct)) cast;
 397 struct
 398 {
 399 struct Expression * cond;
 400 struct __ecereNameSpace__ecere__sys__OldList * exp;
 401 struct Expression * elseExp;
 402 } __attribute__ ((gcc_struct)) cond;
 403 struct
 404 {
 405 struct TypeName * typeName;
 406 struct Expression * size;
 407 } __attribute__ ((gcc_struct)) _new;
 408 struct
 409 {
 410 struct TypeName * typeName;
 411 struct Expression * size;
 412 struct Expression * exp;
 413 } __attribute__ ((gcc_struct)) _renew;
 414 struct
 415 {
 416 char * table;
 417 struct Identifier * id;
 418 } __attribute__ ((gcc_struct)) db;
 419 struct
 420 {
 421 struct Expression * ds;
 422 struct Expression * name;
 423 } __attribute__ ((gcc_struct)) dbopen;
 424 struct
 425 {
 426 struct TypeName * typeName;
 427 struct Initializer * initializer;
 428 } __attribute__ ((gcc_struct)) initializer;
 429 struct
 430 {
 431 struct Expression * exp;
 432 struct TypeName * typeName;
 433 } __attribute__ ((gcc_struct)) vaArg;
 434 } __attribute__ ((gcc_struct)) __anon1;
 435 unsigned int debugValue;
 436 struct __ecereNameSpace__ecere__com__DataValue val;
 437 uint64 address;
 438 unsigned int hasAddress;
 439 struct Type * expType;
 440 struct Type * destType;
 441 unsigned int usage;
 442 int tempCount;
 443 unsigned int byReference;
 444 unsigned int isConstant;
 445 unsigned int addedThis;
 446 unsigned int needCast;
 447 unsigned int thisPtr;
 448 unsigned int opDestType;
 449 unsigned int needTemplateCast;
 450 } __attribute__ ((gcc_struct));
 451
 452 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
 453
 454 struct TemplateDatatype
 455 {
 456 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 457 struct Declarator * decl;
 458 } __attribute__ ((gcc_struct));
 459
 460 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
 461
 462 struct TemplateArgument;
 463
 464 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
 465
 466 struct TemplateParameter
 467 {
 468 struct TemplateParameter * prev;
 469 struct TemplateParameter * next;
 470 struct Location loc;
 471 int type;
 472 struct Identifier * identifier;
 473 union
 474 {
 475 struct TemplateDatatype * dataType;
 476 int memberType;
 477 } __attribute__ ((gcc_struct)) __anon1;
 478 struct TemplateArgument * defaultArgument;
 479 const char *  dataTypeString;
 480 struct Type * baseType;
 481 } __attribute__ ((gcc_struct));
 482
 483 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
 484
 485 struct Specifier
 486 {
 487 struct Specifier * prev;
 488 struct Specifier * next;
 489 struct Location loc;
 490 int type;
 491 union
 492 {
 493 int specifier;
 494 struct
 495 {
 496 struct ExtDecl * extDecl;
 497 char *  name;
 498 struct Symbol * symbol;
 499 struct __ecereNameSpace__ecere__sys__OldList *  templateArgs;
 500 } __attribute__ ((gcc_struct)) __anon1;
 501 struct
 502 {
 503 struct Identifier * id;
 504 struct __ecereNameSpace__ecere__sys__OldList *  list;
 505 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
 506 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 507 unsigned int addNameSpace;
 508 struct Context * ctx;
 509 struct ExtDecl * extDeclStruct;
 510 } __attribute__ ((gcc_struct)) __anon2;
 511 struct Expression * expression;
 512 struct Specifier * _class;
 513 struct TemplateParameter * templateParameter;
 514 } __attribute__ ((gcc_struct)) __anon1;
 515 } __attribute__ ((gcc_struct));
 516
 517 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
 518
 519 struct Identifier
 520 {
 521 struct Identifier * prev;
 522 struct Identifier * next;
 523 struct Location loc;
 524 struct Symbol * classSym;
 525 struct Specifier * _class;
 526 char *  string;
 527 struct Identifier * badID;
 528 } __attribute__ ((gcc_struct));
 529
 530 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Pointer;
 531
 532 struct Pointer
 533 {
 534 struct Pointer * prev;
 535 struct Pointer * next;
 536 struct Location loc;
 537 struct __ecereNameSpace__ecere__sys__OldList *  qualifiers;
 538 struct Pointer * pointer;
 539 } __attribute__ ((gcc_struct));
 540
 541 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
 542
 543 struct Declarator
 544 {
 545 struct Declarator * prev;
 546 struct Declarator * next;
 547 struct Location loc;
 548 int type;
 549 struct Symbol * symbol;
 550 struct Declarator * declarator;
 551 union
 552 {
 553 struct Identifier * identifier;
 554 struct
 555 {
 556 struct Expression * exp;
 557 struct Expression * posExp;
 558 struct Attrib * attrib;
 559 } __attribute__ ((gcc_struct)) structDecl;
 560 struct
 561 {
 562 struct Expression * exp;
 563 struct Specifier * enumClass;
 564 } __attribute__ ((gcc_struct)) array;
 565 struct
 566 {
 567 struct __ecereNameSpace__ecere__sys__OldList * parameters;
 568 } __attribute__ ((gcc_struct)) function;
 569 struct
 570 {
 571 struct Pointer * pointer;
 572 } __attribute__ ((gcc_struct)) pointer;
 573 struct
 574 {
 575 struct ExtDecl * extended;
 576 } __attribute__ ((gcc_struct)) extended;
 577 } __attribute__ ((gcc_struct)) __anon1;
 578 } __attribute__ ((gcc_struct));
 579
 580 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
 581
 582 struct FunctionDefinition
 583 {
 584 struct FunctionDefinition * prev;
 585 struct FunctionDefinition * next;
 586 struct Location loc;
 587 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 588 struct Declarator * declarator;
 589 struct __ecereNameSpace__ecere__sys__OldList *  declarations;
 590 struct Statement * body;
 591 struct __ecereNameSpace__ecere__com__Class * _class;
 592 struct __ecereNameSpace__ecere__sys__OldList attached;
 593 int declMode;
 594 struct Type * type;
 595 struct Symbol * propSet;
 596 int tempCount;
 597 unsigned int propertyNoThis;
 598 } __attribute__ ((gcc_struct));
 599
 600 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
 601
 602 struct DBTableDef;
 603
 604 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
 605
 606 struct External
 607 {
 608 struct External * prev;
 609 struct External * next;
 610 struct Location loc;
 611 int type;
 612 struct Symbol * symbol;
 613 union
 614 {
 615 struct FunctionDefinition * function;
 616 struct ClassDefinition * _class;
 617 struct Declaration * declaration;
 618 char *  importString;
 619 struct Identifier * id;
 620 struct DBTableDef * table;
 621 } __attribute__ ((gcc_struct)) __anon1;
 622 int importType;
 623 } __attribute__ ((gcc_struct));
 624
 625 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
 626
 627 struct ModuleImport;
 628
 629 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
 630
 631 struct ClassImport;
 632
 633 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
 634
 635 struct Symbol
 636 {
 637 char *  string;
 638 struct Symbol * parent;
 639 struct Symbol * left;
 640 struct Symbol * right;
 641 int depth;
 642 struct Type * type;
 643 union
 644 {
 645 struct __ecereNameSpace__ecere__com__Method * method;
 646 struct __ecereNameSpace__ecere__com__Property * _property;
 647 struct __ecereNameSpace__ecere__com__Class * registered;
 648 } __attribute__ ((gcc_struct)) __anon1;
 649 int id;
 650 int idCode;
 651 union
 652 {
 653 struct
 654 {
 655 struct External * pointerExternal;
 656 struct External * structExternal;
 657 } __attribute__ ((gcc_struct)) __anon1;
 658 struct
 659 {
 660 struct External * externalGet;
 661 struct External * externalSet;
 662 struct External * externalPtr;
 663 struct External * externalIsSet;
 664 } __attribute__ ((gcc_struct)) __anon2;
 665 struct
 666 {
 667 struct External * methodExternal;
 668 struct External * methodCodeExternal;
 669 } __attribute__ ((gcc_struct)) __anon3;
 670 } __attribute__ ((gcc_struct)) __anon2;
 671 unsigned int imported;
 672 unsigned int declaredStructSym;
 673 struct __ecereNameSpace__ecere__com__Class * _class;
 674 unsigned int declaredStruct;
 675 unsigned int needConstructor;
 676 unsigned int needDestructor;
 677 char *  constructorName;
 678 char *  structName;
 679 char *  className;
 680 char *  destructorName;
 681 struct ModuleImport * module;
 682 struct ClassImport * _import;
 683 struct Location nameLoc;
 684 unsigned int isParam;
 685 unsigned int isRemote;
 686 unsigned int isStruct;
 687 unsigned int fireWatchersDone;
 688 int declaring;
 689 unsigned int classData;
 690 unsigned int isStatic;
 691 char *  shortName;
 692 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
 693 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
 694 struct Context * ctx;
 695 int isIterator;
 696 struct Expression * propCategory;
 697 } __attribute__ ((gcc_struct));
 698
 699 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
 700
 701 struct Type
 702 {
 703 struct Type * prev;
 704 struct Type * next;
 705 int refCount;
 706 union
 707 {
 708 struct Symbol * _class;
 709 struct
 710 {
 711 struct __ecereNameSpace__ecere__sys__OldList members;
 712 char *  enumName;
 713 } __attribute__ ((gcc_struct)) __anon1;
 714 struct
 715 {
 716 struct Type * returnType;
 717 struct __ecereNameSpace__ecere__sys__OldList params;
 718 struct Symbol * thisClass;
 719 unsigned int staticMethod;
 720 struct TemplateParameter * thisClassTemplate;
 721 } __attribute__ ((gcc_struct)) __anon2;
 722 struct
 723 {
 724 struct __ecereNameSpace__ecere__com__Method * method;
 725 struct __ecereNameSpace__ecere__com__Class * methodClass;
 726 struct __ecereNameSpace__ecere__com__Class * usedClass;
 727 } __attribute__ ((gcc_struct)) __anon3;
 728 struct
 729 {
 730 struct Type * arrayType;
 731 int arraySize;
 732 struct Expression * arraySizeExp;
 733 unsigned int freeExp;
 734 struct Symbol * enumClass;
 735 } __attribute__ ((gcc_struct)) __anon4;
 736 struct Type * type;
 737 struct TemplateParameter * templateParameter;
 738 } __attribute__ ((gcc_struct)) __anon1;
 739 int kind;
 740 unsigned int size;
 741 char *  name;
 742 char *  typeName;
 743 int classObjectType;
 744 int alignment;
 745 unsigned int offset;
 746 int bitFieldCount;
 747 int count;
 748 unsigned int isSigned : 1;
 749 unsigned int constant : 1;
 750 unsigned int truth : 1;
 751 unsigned int byReference : 1;
 752 unsigned int extraParam : 1;
 753 unsigned int directClassAccess : 1;
 754 unsigned int computing : 1;
 755 unsigned int keepCast : 1;
 756 unsigned int passAsTemplate : 1;
 757 unsigned int dllExport : 1;
 758 unsigned int attrStdcall : 1;
 759 unsigned int declaredWithStruct : 1;
 760 unsigned int typedByReference : 1;
 761 unsigned int casted : 1;
 762 } __attribute__ ((gcc_struct));
 763
 764 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
 765
 766 struct __ecereNameSpace__ecere__com__Class
 767 {
 768 struct __ecereNameSpace__ecere__com__Class * prev;
 769 struct __ecereNameSpace__ecere__com__Class * next;
 770 const char *  name;
 771 int offset;
 772 int structSize;
 773 void * *  _vTbl;
 774 int vTblSize;
 775 unsigned int (*  Constructor)(void * );
 776 void (*  Destructor)(void * );
 777 int offsetClass;
 778 int sizeClass;
 779 struct __ecereNameSpace__ecere__com__Class * base;
 780 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
 781 struct __ecereNameSpace__ecere__sys__BinaryTree members;
 782 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
 783 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
 784 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
 785 struct __ecereNameSpace__ecere__sys__OldList derivatives;
 786 int memberID;
 787 int startMemberID;
 788 int type;
 789 struct __ecereNameSpace__ecere__com__Instance * module;
 790 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
 791 const char *  dataTypeString;
 792 struct Type * dataType;
 793 int typeSize;
 794 int defaultAlignment;
 795 void (*  Initialize)();
 796 int memberOffset;
 797 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
 798 const char *  designerClass;
 799 unsigned int noExpansion;
 800 const char *  defaultProperty;
 801 unsigned int comRedefinition;
 802 int count;
 803 int isRemote;
 804 unsigned int internalDecl;
 805 void *  data;
 806 unsigned int computeSize;
 807 int structAlignment;
 808 int destructionWatchOffset;
 809 unsigned int fixed;
 810 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
 811 int inheritanceAccess;
 812 const char *  fullName;
 813 void *  symbol;
 814 struct __ecereNameSpace__ecere__sys__OldList conversions;
 815 struct __ecereNameSpace__ecere__sys__OldList templateParams;
 816 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
 817 struct __ecereNameSpace__ecere__com__Class * templateClass;
 818 struct __ecereNameSpace__ecere__sys__OldList templatized;
 819 int numParams;
 820 unsigned int isInstanceClass;
 821 unsigned int byValueSystemClass;
 822 } __attribute__ ((gcc_struct));
 823
 824 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name);
 825
 826 extern void __ecereNameSpace__ecere__com__eClass_SetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, long long value);
 827
 828 extern void __ecereNameSpace__ecere__com__eInstance_FireSelfWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
 829
 830 extern void __ecereNameSpace__ecere__com__eInstance_SetMethod(struct __ecereNameSpace__ecere__com__Instance * instance, const char *  name, void *  function);
 831
 832 extern void __ecereNameSpace__ecere__com__eInstance_IncRef(struct __ecereNameSpace__ecere__com__Instance * instance);
 833
 834 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);
 835
 836 extern void __ecereNameSpace__ecere__com__eInstance_Watch(void *  instance, struct __ecereNameSpace__ecere__com__Property * _property, void *  object, void (*  callback)(void * , void * ));
 837
 838 extern void __ecereNameSpace__ecere__com__eInstance_FireWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
 839
 840 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
 841
 842 struct __ecereNameSpace__ecere__com__Instance
 843 {
 844 void * *  _vTbl;
 845 struct __ecereNameSpace__ecere__com__Class * _class;
 846 int _refCount;
 847 } __attribute__ ((gcc_struct));
 848
 849 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
 850
 851 struct __ecereNameSpace__ecere__com__DataMember
 852 {
 853 struct __ecereNameSpace__ecere__com__DataMember * prev;
 854 struct __ecereNameSpace__ecere__com__DataMember * next;
 855 const char *  name;
 856 unsigned int isProperty;
 857 int memberAccess;
 858 int id;
 859 struct __ecereNameSpace__ecere__com__Class * _class;
 860 const char *  dataTypeString;
 861 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 862 struct Type * dataType;
 863 int type;
 864 int offset;
 865 int memberID;
 866 struct __ecereNameSpace__ecere__sys__OldList members;
 867 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 868 int memberOffset;
 869 int structAlignment;
 870 } __attribute__ ((gcc_struct));
 871
 872 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
 873
 874 struct __ecereNameSpace__ecere__com__SerialBuffer
 875 {
 876 unsigned char *  _buffer;
 877 unsigned int count;
 878 unsigned int _size;
 879 unsigned int pos;
 880 } __attribute__ ((gcc_struct));
 881
 882 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
 883
 884 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 885 {
 886 union
 887 {
 888 struct
 889 {
 890 const char *  dataTypeString;
 891 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 892 } __attribute__ ((gcc_struct)) __anon1;
 893 struct __ecereNameSpace__ecere__com__DataValue expression;
 894 struct
 895 {
 896 const char *  memberString;
 897 union
 898 {
 899 struct __ecereNameSpace__ecere__com__DataMember * member;
 900 struct __ecereNameSpace__ecere__com__Property * prop;
 901 struct __ecereNameSpace__ecere__com__Method * method;
 902 } __attribute__ ((gcc_struct)) __anon1;
 903 } __attribute__ ((gcc_struct)) __anon2;
 904 } __attribute__ ((gcc_struct)) __anon1;
 905 } __attribute__ ((gcc_struct));
 906
 907 enum yytokentype
 908 {
 909 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, WIDE_STRING_LITERAL = 373
 910 };
 911
 912 typedef union YYSTYPE
 913 {
 914 int specifierType;
 915 int i;
 916 int declMode;
 917 struct Identifier * id;
 918 struct Expression * exp;
 919 struct Specifier * specifier;
 920 struct __ecereNameSpace__ecere__sys__OldList * list;
 921 struct Enumerator * enumerator;
 922 struct Declarator * declarator;
 923 struct Pointer * pointer;
 924 struct Initializer * initializer;
 925 struct InitDeclarator * initDeclarator;
 926 struct TypeName * typeName;
 927 struct Declaration * declaration;
 928 struct Statement * stmt;
 929 struct FunctionDefinition * function;
 930 struct External * external;
 931 struct Context * context;
 932 struct AsmField * asmField;
 933 struct Attrib * attrib;
 934 struct ExtDecl * extDecl;
 935 struct Attribute * attribute;
 936 struct Instantiation * instance;
 937 struct MembersInit * membersInit;
 938 struct MemberInit * memberInit;
 939 struct ClassFunction * classFunction;
 940 struct ClassDefinition * _class;
 941 struct ClassDef * classDef;
 942 struct PropertyDef * prop;
 943 char * string;
 944 struct Symbol * symbol;
 945 struct PropertyWatch * propertyWatch;
 946 struct TemplateParameter * templateParameter;
 947 struct TemplateArgument * templateArgument;
 948 struct TemplateDatatype * templateDatatype;
 949 struct DBTableEntry * dbtableEntry;
 950 struct DBIndexItem * dbindexItem;
 951 struct DBTableDef * dbtableDef;
 952 } __attribute__ ((gcc_struct)) YYSTYPE;
 953
 954 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Enumerator;
 955
 956 struct Enumerator
 957 {
 958 struct Enumerator * prev;
 959 struct Enumerator * next;
 960 struct Location loc;
 961 struct Identifier * id;
 962 struct Expression * exp;
 963 } __attribute__ ((gcc_struct));
 964
 965 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_InitDeclarator;
 966
 967 struct InitDeclarator
 968 {
 969 struct InitDeclarator * prev;
 970 struct InitDeclarator * next;
 971 struct Location loc;
 972 struct Declarator * declarator;
 973 struct Initializer * initializer;
 974 } __attribute__ ((gcc_struct));
 975
 976 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_AsmField;
 977
 978 struct AsmField
 979 {
 980 struct AsmField * prev;
 981 struct AsmField * next;
 982 struct Location loc;
 983 char *  command;
 984 struct Expression * expression;
 985 struct Identifier * symbolic;
 986 } __attribute__ ((gcc_struct));
 987
 988 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attribute;
 989
 990 struct Attribute;
 991
 992 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassFunction;
 993
 994 struct ClassFunction;
 995
 996 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MembersInit;
 997
 998 struct MembersInit;
 999
1000 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MemberInit;
1001
1002 struct MemberInit;
1003
1004 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyDef;
1005
1006 struct PropertyDef;
1007
1008 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyWatch;
1009
1010 struct PropertyWatch;
1011
1012 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDef;
1013
1014 struct ClassDef
1015 {
1016 struct ClassDef * prev;
1017 struct ClassDef * next;
1018 struct Location loc;
1019 int type;
1020 union
1021 {
1022 struct Declaration * decl;
1023 struct ClassFunction * function;
1024 struct __ecereNameSpace__ecere__sys__OldList *  defProperties;
1025 struct PropertyDef * propertyDef;
1026 struct PropertyWatch * propertyWatch;
1027 char *  designer;
1028 struct Identifier * defaultProperty;
1029 struct
1030 {
1031 struct Identifier * id;
1032 struct Initializer * initializer;
1033 } __attribute__ ((gcc_struct)) __anon1;
1034 } __attribute__ ((gcc_struct)) __anon1;
1035 int memberAccess;
1036 void *  object;
1037 } __attribute__ ((gcc_struct));
1038
1039 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableEntry;
1040
1041 struct DBTableEntry;
1042
1043 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBIndexItem;
1044
1045 struct DBIndexItem;
1046
1047 extern YYSTYPE yylval;
1048
1049 extern struct Location yylloc;
1050
1051 extern struct External * curExternal;
1052
1053 extern struct __ecereNameSpace__ecere__sys__OldList *  MkList(void);
1054
1055 extern struct Declarator * SpecDeclFromString(const char *  string, struct __ecereNameSpace__ecere__sys__OldList *  specs, struct Declarator * baseDecl);
1056
1057 extern struct Specifier * CopySpecifier(struct Specifier * spec);
1058
1059 extern void FreeList(struct __ecereNameSpace__ecere__sys__OldList * list, void (*  FreeFunction)(void * ));
1060
1061 extern void FreeSpecifier(struct Specifier * spec);
1062
1063 extern void FreeDeclarator(struct Declarator * decl);
1064
1065 extern char *  __ecereNameSpace__ecere__sys__CopyString(const char *  string);
1066
1067 extern struct Symbol * FindClass(const char *  name);
1068
1069 extern void FreeSpecifierContents(struct Specifier * spec);
1070
1071 extern void FullClassNameCat(char *  output, const char *  className, unsigned int includeTemplateParams);
1072
1073 extern struct Identifier * MkIdentifier(const char *  string);
1074
1075 extern int strcmp(const char * , const char * );
1076
1077 extern struct Type * ProcessTypeString(const char *  string, unsigned int staticMethod);
1078
1079 extern struct Specifier * MkSpecifier(int specifier);
1080
1081 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
1082
1083 static int ReplaceClassSpec(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Specifier * spec, unsigned int param)
1084 {
1085 if(spec->type == 8)
1086 {
1087 struct TemplateParameter * parameter = spec->__anon1.templateParameter;
1088
1089 if(!param && parameter->dataTypeString)
1090 {
1091 struct __ecereNameSpace__ecere__sys__OldList * newSpecs = MkList();
1092 struct Declarator * decl = SpecDeclFromString(parameter->dataTypeString, newSpecs, (((void *)0)));
1093
1094 if((*newSpecs).first)
1095 {
1096 struct Specifier * newSpec = CopySpecifier((*newSpecs).first);
1097
1098 *spec = *newSpec;
1099 ((newSpec ? (__ecereClass_Specifier->Destructor ? __ecereClass_Specifier->Destructor((void *)newSpec) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(newSpec)) : 0), newSpec = 0);
1100 }
1101 FreeList(newSpecs, (void *)(FreeSpecifier));
1102 if(decl)
1103 {
1104 unsigned int isPointer = decl->type == 5;
1105
1106 if(decl)
1107 FreeDeclarator(decl);
1108 if(isPointer)
1109 return 1;
1110 }
1111 }
1112 else if(!param && parameter->__anon1.dataType)
1113 {
1114 struct __ecereNameSpace__ecere__sys__OldList * newSpecs = parameter->__anon1.dataType->specifiers;
1115 struct Declarator * decl = parameter->__anon1.dataType->decl;
1116
1117 if((*newSpecs).first)
1118 {
1119 struct Specifier * newSpec = CopySpecifier((*newSpecs).first);
1120
1121 *spec = *newSpec;
1122 ((newSpec ? (__ecereClass_Specifier->Destructor ? __ecereClass_Specifier->Destructor((void *)newSpec) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(newSpec)) : 0), newSpec = 0);
1123 }
1124 if(decl)
1125 {
1126 unsigned int isPointer = decl->type == 5;
1127
1128 if(isPointer)
1129 return 1;
1130 }
1131 }
1132 else
1133 {
1134 spec->type = 1;
1135 spec->__anon1.__anon1.name = __ecereNameSpace__ecere__sys__CopyString("uint64");
1136 spec->__anon1.__anon1.symbol = FindClass("uint64");
1137 }
1138 }
1139 if(spec->type == 1 || spec->type == 7)
1140 {
1141 struct Symbol * classSym = spec->__anon1.__anon1.symbol;
1142
1143 if(spec->type == 7)
1144 {
1145 classSym = FindClass("ecere::com::Class");
1146 }
1147 if(classSym)
1148 {
1149 struct __ecereNameSpace__ecere__com__Class * _class = classSym->__anon1.registered;
1150
1151 FreeSpecifierContents(spec);
1152 spec->type = 1;
1153 if(_class && _class->type == 1)
1154 {
1155 char name[1024];
1156
1157 name[0] = (char)0;
1158 FullClassNameCat(name, _class->fullName, 0);
1159 FreeSpecifierContents(spec);
1160 spec->type = 3;
1161 spec->__anon1.__anon2.baseSpecs = (((void *)0));
1162 spec->__anon1.__anon2.id = MkIdentifier(name);
1163 spec->__anon1.__anon2.list = (((void *)0));
1164 spec->__anon1.__anon2.definitions = (((void *)0));
1165 spec->__anon1.__anon2.ctx = (((void *)0));
1166 spec->__anon1.__anon2.addNameSpace = 0;
1167 }
1168 else if(_class && _class->type == 5)
1169 {
1170 char name[1024] = "";
1171
1172 FullClassNameCat(name, _class->fullName, 0);
1173 spec->type = 3;
1174 spec->__anon1.__anon2.baseSpecs = (((void *)0));
1175 spec->__anon1.__anon2.id = MkIdentifier(name);
1176 spec->__anon1.__anon2.list = (((void *)0));
1177 spec->__anon1.__anon2.definitions = (((void *)0));
1178 spec->__anon1.__anon2.ctx = (((void *)0));
1179 spec->__anon1.__anon2.addNameSpace = 0;
1180 }
1181 else if(_class)
1182 {
1183 if((_class->type != 1000 || !strcmp(_class->fullName, "enum") || (_class->dataTypeString && !strcmp(_class->dataTypeString, "char *")) || !strcmp(_class->fullName, "uint64") || !strcmp(_class->fullName, "uint32") || !strcmp(_class->fullName, "uint16") || !strcmp(_class->fullName, "uintptr") || !strcmp(_class->fullName, "intptr") || !strcmp(_class->fullName, "uintsize") || !strcmp(_class->fullName, "intsize") || !strcmp(_class->fullName, "uint") || !strcmp(_class->fullName, "byte")))
1184 {
1185 if(_class->dataTypeString)
1186 {
1187 if(!strcmp(_class->dataTypeString, "uint64") || !strcmp(_class->dataTypeString, "uint32") || !strcmp(_class->dataTypeString, "uint16") || !strcmp(_class->dataTypeString, "uintptr") || !strcmp(_class->dataTypeString, "intptr") || !strcmp(_class->dataTypeString, "uintsize") || !strcmp(_class->dataTypeString, "intsize") || !strcmp(_class->dataTypeString, "uint") || !strcmp(_class->dataTypeString, "byte"))
1188 {
1189 if(!_class->dataType)
1190 _class->dataType = ProcessTypeString(_class->dataTypeString, 0);
1191 if(_class->dataType && _class->dataType->kind == 8)
1192 classSym = _class->dataType->__anon1._class;
1193 else
1194 classSym = FindClass(_class->dataTypeString);
1195 _class = classSym ? classSym->__anon1.registered : (((void *)0));
1196 }
1197 spec->__anon1.__anon1.name = __ecereNameSpace__ecere__sys__CopyString(!strcmp(_class->dataTypeString, "char *") ? "char" : _class->dataTypeString);
1198 spec->__anon1.__anon1.symbol = (((void *)0));
1199 }
1200 else
1201 {
1202 spec->__anon1.__anon1.name = __ecereNameSpace__ecere__sys__CopyString((((void *)0)));
1203 spec->__anon1.__anon1.symbol = (((void *)0));
1204 }
1205 }
1206 else if(!_class->base)
1207 {
1208 spec->type = 0;
1209 spec->__anon1.specifier = VOID;
1210 return 1;
1211 }
1212 }
1213 else
1214 {
1215 spec->type = 3;
1216 spec->__anon1.__anon2.id = MkIdentifier("__ecereNameSpace__ecere__com__Instance");
1217 spec->__anon1.__anon2.list = (((void *)0));
1218 spec->__anon1.__anon2.baseSpecs = (((void *)0));
1219 spec->__anon1.__anon2.definitions = (((void *)0));
1220 spec->__anon1.__anon2.ctx = (((void *)0));
1221 spec->__anon1.__anon2.addNameSpace = 0;
1222 }
1223 if(_class && _class->dataTypeString && !strcmp(_class->dataTypeString, "char *"))
1224 return 1;
1225 if(!_class || _class->type == 0 || _class->type == 5)
1226 return 1;
1227 else if(param && _class->type == 1)
1228 return 2;
1229 }
1230 }
1231 else if(spec->type == 0)
1232 {
1233 if(spec->__anon1.specifier == ANY_OBJECT || spec->__anon1.specifier == CLASS)
1234 {
1235 spec->__anon1.specifier = CONST;
1236 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(specs, MkSpecifier(VOID));
1237 return 1;
1238 }
1239 }
1240 return 0;
1241 }
1242
1243 extern struct Pointer * MkPointer(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Pointer * pointer);
1244
1245 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
1246
1247 static void ReplaceByInstancePtr(struct Specifier * spec, struct Declarator ** declPtr, int type)
1248 {
1249 struct Declarator * decl = *declPtr;
1250
1251 if(decl && decl->type == 5)
1252 {
1253 if(type == 2)
1254 ;
1255 else
1256 decl->__anon1.pointer.pointer = MkPointer((((void *)0)), decl->__anon1.pointer.pointer);
1257 }
1258 else
1259 {
1260 struct Declarator * newDecl = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Declarator);
1261
1262 if(decl)
1263 {
1264 *newDecl = *decl;
1265 decl->declarator = newDecl;
1266 }
1267 else
1268 decl = newDecl;
1269 decl->type = 5;
1270 decl->__anon1.pointer.pointer = MkPointer((((void *)0)), (((void *)0)));
1271 *declPtr = decl;
1272 }
1273 }
1274
1275 extern struct ExtDecl * MkExtDeclString(char * s);
1276
1277 static void InstDeclPassDeclaration(struct Declaration * decl);
1278
1279 static void InstDeclPassIdentifier(struct Identifier * id);
1280
1281 extern int targetPlatform;
1282
1283 static void InstDeclPassSpecifier(struct Specifier * spec, unsigned int byRefTypedObject)
1284 {
1285 switch(spec->type)
1286 {
1287 case 0:
1288 if(spec->__anon1.specifier == TYPED_OBJECT)
1289 {
1290 spec->type = 5;
1291 spec->__anon1.__anon1.extDecl = MkExtDeclString(__ecereNameSpace__ecere__sys__CopyString(byRefTypedObject ? "struct __ecereNameSpace__ecere__com__Class * class, void *" : "struct __ecereNameSpace__ecere__com__Class * class, const void *"));
1292 }
1293 break;
1294 case 1:
1295 break;
1296 case 2:
1297 {
1298 struct Enumerator * e;
1299
1300 if(spec->__anon1.__anon2.list)
1301 {
1302 for(e = (*spec->__anon1.__anon2.list).first; e; e = e->next)
1303 {
1304 }
1305 }
1306 break;
1307 }
1308 case 3:
1309 case 4:
1310 {
1311 if(spec->__anon1.__anon2.definitions)
1312 {
1313 struct ClassDef * def;
1314
1315 for(def = (*spec->__anon1.__anon2.definitions).first; def; def = def->next)
1316 if(def->__anon1.decl)
1317 InstDeclPassDeclaration(def->__anon1.decl);
1318 }
1319 if(spec->__anon1.__anon2.id)
1320 InstDeclPassIdentifier(spec->__anon1.__anon2.id);
1321 break;
1322 }
1323 case 5:
1324 if(spec->__anon1.__anon1.extDecl && spec->__anon1.__anon1.extDecl->type == 0 && spec->__anon1.__anon1.extDecl->__anon1.s)
1325 {
1326 if(!strcmp(spec->__anon1.__anon1.extDecl->__anon1.s, "dllexport"))
1327 {
1328 struct Specifier * prevSpec;
1329
1330 (__ecereNameSpace__ecere__com__eSystem_Delete(spec->__anon1.__anon1.extDecl->__anon1.s), spec->__anon1.__anon1.extDecl->__anon1.s = 0);
1331 for(prevSpec = spec->prev; prevSpec; prevSpec = prevSpec->prev)
1332 if(prevSpec->type == 0 && prevSpec->__anon1.specifier == EXTERN)
1333 break;
1334 if(prevSpec)
1335 {
1336 if(targetPlatform == 1)
1337 spec->__anon1.__anon1.extDecl->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("__declspec(dllexport)");
1338 else
1339 spec->__anon1.__anon1.extDecl->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("__attribute__ ((visibility(\"default\")))");
1340 }
1341 else
1342 {
1343 if(targetPlatform == 1)
1344 spec->__anon1.__anon1.extDecl->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("extern __declspec(dllexport)");
1345 else
1346 spec->__anon1.__anon1.extDecl->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("extern __attribute__ ((visibility(\"default\")))");
1347 }
1348 }
1349 else if(!strcmp(spec->__anon1.__anon1.extDecl->__anon1.s, "stdcall") || !strcmp(spec->__anon1.__anon1.extDecl->__anon1.s, "_stdcall") || !strcmp(spec->__anon1.__anon1.extDecl->__anon1.s, "__stdcall") || !strcmp(spec->__anon1.__anon1.extDecl->__anon1.s, "__stdcall__"))
1350 {
1351 (__ecereNameSpace__ecere__com__eSystem_Delete(spec->__anon1.__anon1.extDecl->__anon1.s), spec->__anon1.__anon1.extDecl->__anon1.s = 0);
1352 if(targetPlatform == 1)
1353 spec->__anon1.__anon1.extDecl->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("__attribute__((__stdcall__))");
1354 else
1355 spec->__anon1.__anon1.extDecl->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("");
1356 }
1357 }
1358 break;
1359 }
1360 }
1361
1362 void InstDeclPassTypeName(struct TypeName * type, unsigned int param);
1363
1364 extern struct __ecereNameSpace__ecere__sys__OldList *  MkListOne(void *  item);
1365
1366 extern struct Specifier * MkStructOrUnion(int type, struct Identifier * id, struct __ecereNameSpace__ecere__sys__OldList * definitions);
1367
1368 extern struct Declarator * MkDeclaratorPointer(struct Pointer * pointer, struct Declarator * declarator);
1369
1370 extern struct Declarator * MkDeclaratorIdentifier(struct Identifier * id);
1371
1372 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert(struct __ecereNameSpace__ecere__sys__OldList * this, void *  prevItem, void *  item);
1373
1374 static void InstDeclPassDeclarator(struct Declarator * decl)
1375 {
1376 switch(decl->type)
1377 {
1378 case 0:
1379 if(decl->declarator)
1380 InstDeclPassDeclarator(decl->declarator);
1381 break;
1382 case 1:
1383 {
1384 if(decl->__anon1.identifier)
1385 InstDeclPassIdentifier(decl->__anon1.identifier);
1386 break;
1387 }
1388 case 2:
1389 if(decl->declarator)
1390 InstDeclPassDeclarator(decl->declarator);
1391 break;
1392 case 3:
1393 if(decl->declarator)
1394 InstDeclPassDeclarator(decl->declarator);
1395 break;
1396 case 4:
1397 {
1398 if(decl->declarator)
1399 InstDeclPassDeclarator(decl->declarator);
1400 if(decl->__anon1.function.parameters)
1401 {
1402 struct TypeName * type;
1403
1404 if(decl->declarator)
1405 InstDeclPassDeclarator(decl->declarator);
1406 for(type = (*decl->__anon1.function.parameters).first; type; type = type->next)
1407 {
1408 unsigned int typedObject = 0;
1409 struct Specifier * spec = (((void *)0));
1410
1411 if(type->qualifiers)
1412 {
1413 spec = (struct Specifier *)(*type->qualifiers).first;
1414 if(spec && spec->type == 1 && !strcmp(spec->__anon1.__anon1.name, "class"))
1415 typedObject = 1;
1416 }
1417 InstDeclPassTypeName(type, 1);
1418 if(typedObject)
1419 {
1420 struct TypeName * _class = (_class = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TypeName), _class->qualifiers = MkListOne(MkStructOrUnion(3, MkIdentifier("__ecereNameSpace__ecere__com__Class"), (((void *)0)))), _class->declarator = MkDeclaratorPointer(MkPointer((((void *)0)), (((void *)0))), MkDeclaratorIdentifier(MkIdentifier("class"))), _class);
1421
1422 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert((&*decl->__anon1.function.parameters), spec->prev, _class);
1423 }
1424 }
1425 }
1426 break;
1427 }
1428 case 5:
1429 case 6:
1430 case 7:
1431 if((decl->type == 6 || decl->type == 7) && decl->__anon1.extended.extended)
1432 {
1433 if(decl->__anon1.extended.extended->type == 0 && decl->__anon1.extended.extended->__anon1.s && !strcmp(decl->__anon1.extended.extended->__anon1.s, "dllexport"))
1434 {
1435 (__ecereNameSpace__ecere__com__eSystem_Delete(decl->__anon1.extended.extended->__anon1.s), decl->__anon1.extended.extended->__anon1.s = 0);
1436 if(targetPlatform == 1)
1437 decl->__anon1.extended.extended->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("extern __declspec(dllexport)");
1438 else
1439 decl->__anon1.extended.extended->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("extern __attribute__ ((visibility(\"default\")))");
1440 }
1441 else if(decl->__anon1.extended.extended->type == 0 && decl->__anon1.extended.extended->__anon1.s && (!strcmp(decl->__anon1.extended.extended->__anon1.s, "stdcall") || !strcmp(decl->__anon1.extended.extended->__anon1.s, "_stdcall") || !strcmp(decl->__anon1.extended.extended->__anon1.s, "__stdcall") || !strcmp(decl->__anon1.extended.extended->__anon1.s, "__stdcall__")))
1442 {
1443 (__ecereNameSpace__ecere__com__eSystem_Delete(decl->__anon1.extended.extended->__anon1.s), decl->__anon1.extended.extended->__anon1.s = 0);
1444 if(targetPlatform == 1)
1445 decl->__anon1.extended.extended->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("__attribute__((__stdcall__))");
1446 else
1447 decl->__anon1.extended.extended->__anon1.s = __ecereNameSpace__ecere__sys__CopyString("");
1448 }
1449 }
1450 if(decl->declarator)
1451 InstDeclPassDeclarator(decl->declarator);
1452 break;
1453 }
1454 }
1455
1456 void InstDeclPassTypeName(struct TypeName * type, unsigned int param)
1457 {
1458 if(type->qualifiers)
1459 {
1460 struct Specifier * spec;
1461
1462 for(spec = (*type->qualifiers).first; spec; spec = spec->next)
1463 {
1464 int result;
1465
1466 if((result = ReplaceClassSpec(type->qualifiers, spec, param)))
1467 ReplaceByInstancePtr(spec, &type->declarator, result);
1468 else
1469 {
1470 struct Symbol * classSym = (spec->type == 1) ? spec->__anon1.__anon1.symbol : (((void *)0));
1471
1472 if(type->classObjectType && (!classSym || (classSym && classSym->__anon1.registered && (classSym->__anon1.registered->type == 4 || classSym->__anon1.registered->type == 2 || classSym->__anon1.registered->type == 3))))
1473 ReplaceByInstancePtr(spec, &type->declarator, 2);
1474 }
1475 InstDeclPassSpecifier(spec, type->declarator && type->declarator->type == 5);
1476 }
1477 }
1478 if(type->declarator)
1479 InstDeclPassDeclarator(type->declarator);
1480 }
1481
1482 extern char *  strchr(const char * , int);
1483
1484 extern char *  strcpy(char * , const char * );
1485
1486 extern size_t strlen(const char * );
1487
1488 static void InstDeclPassIdentifier(struct Identifier * id)
1489 {
1490 if(strchr(id->string, ':'))
1491 {
1492 char newID[1024];
1493 int c;
1494 char ch;
1495 int len;
1496
1497 strcpy(newID, "__ecereNameSpace__");
1498 len = strlen(newID);
1499 for(c = 0; (ch = id->string[c]); c++)
1500 {
1501 if(ch == ':')
1502 ch = '_';
1503 newID[len++] = ch;
1504 }
1505 newID[len] = (char)0;
1506 (__ecereNameSpace__ecere__com__eSystem_Delete(id->string), id->string = 0);
1507 id->string = __ecereNameSpace__ecere__sys__CopyString(newID);
1508 }
1509 }
1510
1511 unsigned int IsVoidPtrCast(struct TypeName * typeName)
1512 {
1513 unsigned int result = 0;
1514 struct Declarator * d = typeName->declarator;
1515
1516 if(d && d->type == 5 && d->__anon1.pointer.pointer && !d->__anon1.pointer.pointer->pointer)
1517 {
1518 if(typeName->qualifiers)
1519 {
1520 struct Specifier * s;
1521
1522 for(s = (*typeName->qualifiers).first; s; s = s->next)
1523 {
1524 if(s->type == 0 && s->__anon1.specifier == VOID)
1525 result = 1;
1526 }
1527 }
1528 }
1529 return result;
1530 }
1531
1532 extern struct Type * ProcessType(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl);
1533
1534 extern void FreeType(struct Type * type);
1535
1536 extern struct Expression * MkExpBrackets(struct __ecereNameSpace__ecere__sys__OldList * expressions);
1537
1538 extern struct Expression * MoveExpContents(struct Expression * exp);
1539
1540 extern struct TypeName * MkTypeName(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Declarator * declarator);
1541
1542 extern struct Declarator * QMkPtrDecl(const char *  id);
1543
1544 static void AddPointerCast(struct Expression * e)
1545 {
1546 struct Type * src = e->expType;
1547
1548 if(src && (src->kind == 20 || src->kind == 8))
1549 {
1550 if(e->type != 11 || !IsVoidPtrCast(e->__anon1.cast.typeName))
1551 {
1552 if(src)
1553 src->refCount++;
1554 if(src->kind == 20 && src->__anon1.templateParameter && src->__anon1.templateParameter->type == 0)
1555 {
1556 struct Type * newType = (((void *)0));
1557
1558 if(src->__anon1.templateParameter->dataTypeString)
1559 newType = ProcessTypeString(src->__anon1.templateParameter->dataTypeString, 0);
1560 else if(src->__anon1.templateParameter->__anon1.dataType)
1561 newType = ProcessType(src->__anon1.templateParameter->__anon1.dataType->specifiers, src->__anon1.templateParameter->__anon1.dataType->decl);
1562 if(newType)
1563 {
1564 FreeType(src);
1565 src = newType;
1566 }
1567 }
1568 if(src && src->kind == 8 && src->__anon1._class)
1569 {
1570 struct __ecereNameSpace__ecere__com__Class * sc = src->__anon1._class->__anon1.registered;
1571
1572 if(sc && (sc->type == 1 || sc->type == 5))
1573 {
1574 struct Type * dest = e->destType;
1575
1576 if(dest && (dest->kind == 20 || dest->kind == 8))
1577 {
1578 if(dest)
1579 dest->refCount++;
1580 if(dest->kind == 20 && dest->__anon1.templateParameter && dest->__anon1.templateParameter->type == 0)
1581 {
1582 struct Type * newType = (((void *)0));
1583
1584 if(dest->__anon1.templateParameter->dataTypeString)
1585 newType = ProcessTypeString(dest->__anon1.templateParameter->dataTypeString, 0);
1586 else if(dest->__anon1.templateParameter->__anon1.dataType)
1587 newType = ProcessType(dest->__anon1.templateParameter->__anon1.dataType->specifiers, dest->__anon1.templateParameter->__anon1.dataType->decl);
1588 if(newType)
1589 {
1590 FreeType(dest);
1591 dest = newType;
1592 }
1593 }
1594 if(!dest->passAsTemplate && dest->kind == 8 && dest->__anon1._class && dest->__anon1._class->__anon1.registered)
1595 {
1596 struct __ecereNameSpace__ecere__com__Class * dc = dest->__anon1._class->__anon1.registered;
1597
1598 if(sc->templateClass)
1599 sc = sc->templateClass;
1600 if(dc->templateClass)
1601 dc = dc->templateClass;
1602 if(dc->base && sc != dc)
1603 {
1604 e->__anon1.cast.exp = MkExpBrackets(MkListOne(MoveExpContents(e)));
1605 e->type = 11;
1606 e->__anon1.typeName = MkTypeName(MkListOne(MkSpecifier(VOID)), QMkPtrDecl((((void *)0))));
1607 }
1608 }
1609 FreeType(dest);
1610 }
1611 }
1612 }
1613 FreeType(src);
1614 }
1615 }
1616 }
1617
1618 extern void FreeExpContents(struct Expression * exp);
1619
1620 static void InstDeclPassStatement(struct Statement * stmt);
1621
1622 static void InstDeclPassInitializer(struct Initializer * init);
1623
1624 static void InstDeclPassExpression(struct Expression * exp)
1625 {
1626 switch(exp->type)
1627 {
1628 case 0:
1629 {
1630 if(exp->__anon1.__anon1.identifier)
1631 InstDeclPassIdentifier(exp->__anon1.__anon1.identifier);
1632 break;
1633 }
1634 case 2:
1635 break;
1636 case 3:
1637 break;
1638 case 4:
1639 if(exp->__anon1.op.exp1)
1640 InstDeclPassExpression(exp->__anon1.op.exp1);
1641 if(exp->__anon1.op.exp2)
1642 {
1643 InstDeclPassExpression(exp->__anon1.op.exp2);
1644 if(exp->__anon1.op.op != '=' && exp->__anon1.op.exp1 && exp->__anon1.op.exp1->expType && exp->__anon1.op.exp1->expType->kind == 13 && exp->__anon1.op.exp1->expType->__anon1.type && exp->__anon1.op.exp1->expType->__anon1.type->kind == 20 && exp->__anon1.op.exp2->expType && exp->__anon1.op.exp2->expType->kind == 13 && exp->__anon1.op.exp2->expType->__anon1.type && exp->__anon1.op.exp2->expType->__anon1.type->kind == 20)
1645 {
1646 struct Expression * e = exp->__anon1.op.exp2;
1647
1648 e->__anon1.cast.exp = MkExpBrackets(MkListOne(MoveExpContents(e)));
1649 e->type = 11;
1650 e->__anon1.typeName = MkTypeName(MkListOne(MkSpecifier(VOID)), QMkPtrDecl((((void *)0))));
1651 e = exp->__anon1.op.exp1;
1652 e->__anon1.cast.exp = MkExpBrackets(MkListOne(MoveExpContents(e)));
1653 e->type = 11;
1654 e->__anon1.typeName = MkTypeName(MkListOne(MkSpecifier(VOID)), QMkPtrDecl((((void *)0))));
1655 }
1656 else if(exp->__anon1.op.exp1 && (exp->__anon1.op.op == '=' || exp->__anon1.op.op == EQ_OP || exp->__anon1.op.op == NE_OP))
1657 AddPointerCast(exp->__anon1.op.exp2);
1658 }
1659 break;
1660 case 32:
1661 case 5:
1662 {
1663 struct Expression * e;
1664
1665 for(e = (*exp->__anon1.list).first; e; e = e->next)
1666 InstDeclPassExpression(e);
1667 break;
1668 }
1669 case 6:
1670 {
1671 struct Expression * e;
1672
1673 InstDeclPassExpression(exp->__anon1.index.exp);
1674 for(e = (*exp->__anon1.index.index).first; e; e = e->next)
1675 InstDeclPassExpression(e);
1676 break;
1677 }
1678 case 7:
1679 {
1680 struct Expression * e;
1681
1682 InstDeclPassExpression(exp->__anon1.call.exp);
1683 if(exp->__anon1.call.arguments)
1684 {
1685 for(e = (*exp->__anon1.call.arguments).first; e; e = e->next)
1686 {
1687 InstDeclPassExpression(e);
1688 AddPointerCast(e);
1689 if(e->expType && e->expType->kind == 13 && e->expType->__anon1.type && (e->expType->__anon1.type->kind == 8 || (e->expType->__anon1.type->kind == 13 && e->expType->__anon1.type->__anon1.type && e->expType->__anon1.type->__anon1.type->kind != 0)) && e->destType && e->destType->kind == 13 && e->destType->__anon1.type && e->destType->__anon1.type->kind == 13 && e->destType->__anon1.type->__anon1.type && e->destType->__anon1.type->__anon1.type->kind == 0 && (e->type != 11 || !IsVoidPtrCast(e->__anon1.cast.typeName)))
1690 {
1691 e->__anon1.cast.exp = MkExpBrackets(MkListOne(MoveExpContents(e)));
1692 e->type = 11;
1693 e->__anon1.typeName = MkTypeName(MkListOne(MkSpecifier(VOID)), QMkPtrDecl((((void *)0))));
1694 }
1695 }
1696 }
1697 break;
1698 }
1699 case 8:
1700 {
1701 if(exp->__anon1.member.exp)
1702 InstDeclPassExpression(exp->__anon1.member.exp);
1703 break;
1704 }
1705 case 9:
1706 {
1707 if(exp->__anon1.member.exp)
1708 InstDeclPassExpression(exp->__anon1.member.exp);
1709 break;
1710 }
1711 case 10:
1712 InstDeclPassTypeName(exp->__anon1.typeName, 0);
1713 break;
1714 case 11:
1715 {
1716 struct Type * type = exp->expType;
1717
1718 if(type && type->kind == 8 && type->__anon1._class->__anon1.registered && type->__anon1._class->__anon1.registered->type == 1 && !exp->needCast)
1719 {
1720 struct Expression * castExp = exp->__anon1.cast.exp;
1721 struct Expression * prev = exp->prev, * next = exp->next;
1722
1723 exp->__anon1.cast.exp = (((void *)0));
1724 FreeExpContents(exp);
1725 FreeType(exp->expType);
1726 FreeType(exp->destType);
1727 *exp = *castExp;
1728 ((castExp ? (__ecereClass_Expression->Destructor ? __ecereClass_Expression->Destructor((void *)castExp) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(castExp)) : 0), castExp = 0);
1729 exp->prev = prev;
1730 exp->next = next;
1731 InstDeclPassExpression(exp);
1732 }
1733 else
1734 {
1735 InstDeclPassTypeName(exp->__anon1.cast.typeName, ((unsigned int)((exp->usage & 0x4) >> 2)));
1736 if(exp->__anon1.cast.exp)
1737 InstDeclPassExpression(exp->__anon1.cast.exp);
1738 }
1739 break;
1740 }
1741 case 12:
1742 {
1743 struct Expression * e;
1744
1745 InstDeclPassExpression(exp->__anon1.cond.cond);
1746 for(e = (*exp->__anon1.cond.exp).first; e; e = e->next)
1747 InstDeclPassExpression(e);
1748 InstDeclPassExpression(exp->__anon1.cond.elseExp);
1749 break;
1750 }
1751 case 23:
1752 {
1753 InstDeclPassStatement(exp->__anon1.compound);
1754 break;
1755 }
1756 case 34:
1757 {
1758 InstDeclPassExpression(exp->__anon1.vaArg.exp);
1759 break;
1760 }
1761 case 33:
1762 {
1763 InstDeclPassTypeName(exp->__anon1.initializer.typeName, 0);
1764 InstDeclPassInitializer(exp->__anon1.initializer.initializer);
1765 break;
1766 }
1767 }
1768 }
1769
1770 static void InstDeclPassInitializer(struct Initializer * init)
1771 {
1772 switch(init->type)
1773 {
1774 case 0:
1775 if(init->__anon1.exp)
1776 InstDeclPassExpression(init->__anon1.exp);
1777 break;
1778 case 1:
1779 {
1780 struct Initializer * i;
1781
1782 for(i = (*init->__anon1.list).first; i; i = i->next)
1783 InstDeclPassInitializer(i);
1784 break;
1785 }
1786 }
1787 }
1788
1789 static void InstDeclPassDeclaration(struct Declaration * decl)
1790 {
1791 switch(decl->type)
1792 {
1793 case 1:
1794 {
1795 if(decl->__anon1.__anon1.specifiers)
1796 {
1797 struct Specifier * spec;
1798
1799 for(spec = (*decl->__anon1.__anon1.specifiers).first; spec; spec = spec->next)
1800 {
1801 int type;
1802
1803 if((type = ReplaceClassSpec(decl->__anon1.__anon1.specifiers, spec, 0)))
1804 {
1805 struct InitDeclarator * d;
1806
1807 if(decl->__anon1.__anon1.declarators)
1808 {
1809 for(d = (*decl->__anon1.__anon1.declarators).first; d; d = d->next)
1810 ReplaceByInstancePtr(spec, &d->declarator, type);
1811 }
1812 }
1813 InstDeclPassSpecifier(spec, 0);
1814 }
1815 }
1816 if(decl->__anon1.__anon1.declarators)
1817 {
1818 struct InitDeclarator * d;
1819
1820 for(d = (*decl->__anon1.__anon1.declarators).first; d; d = d->next)
1821 {
1822 InstDeclPassDeclarator(d->declarator);
1823 if(d->initializer)
1824 InstDeclPassInitializer(d->initializer);
1825 }
1826 }
1827 break;
1828 }
1829 case 0:
1830 {
1831 if(decl->__anon1.__anon1.specifiers)
1832 {
1833 struct Specifier * spec;
1834
1835 for(spec = (*decl->__anon1.__anon1.specifiers).first; spec; spec = spec->next)
1836 {
1837 int type;
1838
1839 if((type = ReplaceClassSpec(decl->__anon1.__anon1.specifiers, spec, 0)))
1840 {
1841 if(decl->__anon1.__anon1.declarators)
1842 {
1843 struct Declarator * d;
1844
1845 for(d = (*decl->__anon1.__anon1.declarators).first; d; d = d->next)
1846 ReplaceByInstancePtr(spec, &d, type);
1847 }
1848 }
1849 InstDeclPassSpecifier(spec, 0);
1850 }
1851 }
1852 if(decl->__anon1.__anon1.declarators)
1853 {
1854 struct Declarator * d;
1855
1856 for(d = (*decl->__anon1.__anon1.declarators).first; d; d = d->next)
1857 InstDeclPassDeclarator(d);
1858 }
1859 break;
1860 }
1861 case 2:
1862 break;
1863 }
1864 }
1865
1866 extern struct Context * curContext;
1867
1868 static void InstDeclPassStatement(struct Statement * stmt)
1869 {
1870 switch(stmt->type)
1871 {
1872 case 14:
1873 if(stmt->__anon1.decl)
1874 InstDeclPassDeclaration(stmt->__anon1.decl);
1875 break;
1876 case 0:
1877 InstDeclPassStatement(stmt->__anon1.labeled.stmt);
1878 break;
1879 case 1:
1880 if(stmt->__anon1.caseStmt.exp)
1881 InstDeclPassExpression(stmt->__anon1.caseStmt.exp);
1882 if(stmt->__anon1.caseStmt.stmt)
1883 InstDeclPassStatement(stmt->__anon1.caseStmt.stmt);
1884 break;
1885 case 2:
1886 {
1887 struct Declaration * decl;
1888 struct Statement * s;
1889 struct Context * prevContext = curContext;
1890
1891 if(!stmt->__anon1.compound.isSwitch)
1892 curContext = stmt->__anon1.compound.context;
1893 if(stmt->__anon1.compound.declarations)
1894 {
1895 for(decl = (*stmt->__anon1.compound.declarations).first; decl; decl = decl->next)
1896 InstDeclPassDeclaration(decl);
1897 }
1898 if(stmt->__anon1.compound.statements)
1899 {
1900 for(s = (*stmt->__anon1.compound.statements).first; s; s = s->next)
1901 InstDeclPassStatement(s);
1902 }
1903 curContext = prevContext;
1904 break;
1905 }
1906 case 3:
1907 {
1908 if(stmt->__anon1.expressions)
1909 {
1910 struct Expression * exp;
1911
1912 for(exp = (*stmt->__anon1.expressions).first; exp; exp = exp->next)
1913 InstDeclPassExpression(exp);
1914 }
1915 break;
1916 }
1917 case 4:
1918 {
1919 if(stmt->__anon1.ifStmt.exp)
1920 {
1921 struct Expression * exp;
1922
1923 for(exp = (*stmt->__anon1.ifStmt.exp).first; exp; exp = exp->next)
1924 InstDeclPassExpression(exp);
1925 }
1926 if(stmt->__anon1.ifStmt.stmt)
1927 InstDeclPassStatement(stmt->__anon1.ifStmt.stmt);
1928 if(stmt->__anon1.ifStmt.elseStmt)
1929 InstDeclPassStatement(stmt->__anon1.ifStmt.elseStmt);
1930 break;
1931 }
1932 case 5:
1933 {
1934 struct Expression * exp;
1935
1936 if(stmt->__anon1.switchStmt.exp)
1937 {
1938 for(exp = (*stmt->__anon1.switchStmt.exp).first; exp; exp = exp->next)
1939 InstDeclPassExpression(exp);
1940 }
1941 InstDeclPassStatement(stmt->__anon1.switchStmt.stmt);
1942 break;
1943 }
1944 case 6:
1945 {
1946 struct Expression * exp;
1947
1948 if(stmt->__anon1.whileStmt.exp)
1949 {
1950 for(exp = (*stmt->__anon1.whileStmt.exp).first; exp; exp = exp->next)
1951 InstDeclPassExpression(exp);
1952 }
1953 InstDeclPassStatement(stmt->__anon1.whileStmt.stmt);
1954 break;
1955 }
1956 case 7:
1957 {
1958 if(stmt->__anon1.doWhile.exp)
1959 {
1960 struct Expression * exp;
1961
1962 for(exp = (*stmt->__anon1.doWhile.exp).first; exp; exp = exp->next)
1963 InstDeclPassExpression(exp);
1964 }
1965 if(stmt->__anon1.doWhile.stmt)
1966 InstDeclPassStatement(stmt->__anon1.doWhile.stmt);
1967 break;
1968 }
1969 case 8:
1970 {
1971 struct Expression * exp;
1972
1973 if(stmt->__anon1.forStmt.init)
1974 InstDeclPassStatement(stmt->__anon1.forStmt.init);
1975 if(stmt->__anon1.forStmt.check)
1976 InstDeclPassStatement(stmt->__anon1.forStmt.check);
1977 if(stmt->__anon1.forStmt.increment)
1978 {
1979 for(exp = (*stmt->__anon1.forStmt.increment).first; exp; exp = exp->next)
1980 InstDeclPassExpression(exp);
1981 }
1982 if(stmt->__anon1.forStmt.stmt)
1983 InstDeclPassStatement(stmt->__anon1.forStmt.stmt);
1984 break;
1985 }
1986 case 9:
1987 break;
1988 case 10:
1989 break;
1990 case 11:
1991 break;
1992 case 12:
1993 {
1994 struct Expression * exp;
1995
1996 if(stmt->__anon1.expressions)
1997 {
1998 for(exp = (*stmt->__anon1.expressions).first; exp; exp = exp->next)
1999 InstDeclPassExpression(exp);
2000 AddPointerCast((*stmt->__anon1.expressions).last);
2001 }
2002 break;
2003 }
2004 case 13:
2005 {
2006 struct AsmField * field;
2007
2008 if(stmt->__anon1.asmStmt.inputFields)
2009 {
2010 for(field = (*stmt->__anon1.asmStmt.inputFields).first; field; field = field->next)
2011 if(field->expression)
2012 InstDeclPassExpression(field->expression);
2013 }
2014 if(stmt->__anon1.asmStmt.outputFields)
2015 {
2016 for(field = (*stmt->__anon1.asmStmt.outputFields).first; field; field = field->next)
2017 if(field->expression)
2018 InstDeclPassExpression(field->expression);
2019 }
2020 if(stmt->__anon1.asmStmt.clobberedFields)
2021 {
2022 for(field = (*stmt->__anon1.asmStmt.clobberedFields).first; field; field = field->next)
2023 if(field->expression)
2024 InstDeclPassExpression(field->expression);
2025 }
2026 break;
2027 }
2028 }
2029 }
2030
2031 extern struct Context * globalContext;
2032
2033 extern struct __ecereNameSpace__ecere__sys__OldList *  ast;
2034
2035 void ProcessInstanceDeclarations()
2036 {
2037 struct External * external;
2038
2039 curContext = globalContext;
2040 for(external = (*ast).first; external; external = external->next)
2041 {
2042 curExternal = external;
2043 if(external->type == 0)
2044 {
2045 struct FunctionDefinition * func = external->__anon1.function;
2046
2047 if(func->specifiers)
2048 {
2049 struct Specifier * spec;
2050
2051 for(spec = (*func->specifiers).first; spec; spec = spec->next)
2052 {
2053 int type;
2054
2055 if((type = ReplaceClassSpec(func->specifiers, spec, 0)))
2056 ReplaceByInstancePtr(spec, &func->declarator, type);
2057 InstDeclPassSpecifier(spec, 0);
2058 }
2059 }
2060 InstDeclPassDeclarator(func->declarator);
2061 if(func->body)
2062 InstDeclPassStatement(func->body);
2063 }
2064 else if(external->type == 1)
2065 {
2066 if(external->__anon1.declaration)
2067 InstDeclPassDeclaration(external->__anon1.declaration);
2068 }
2069 }
2070 }
2071
2072 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
2073
2074 struct __ecereNameSpace__ecere__com__GlobalFunction;
2075
2076 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);
2077
2078 void __ecereRegisterModule_pass3(struct __ecereNameSpace__ecere__com__Instance * module)
2079 {
2080 struct __ecereNameSpace__ecere__com__Class __attribute__((unused)) * class;
2081
2082 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("InstDeclPassTypeName", "void InstDeclPassTypeName(TypeName type, bool param)", InstDeclPassTypeName, module, 2);
2083 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("IsVoidPtrCast", "bool IsVoidPtrCast(TypeName typeName)", IsVoidPtrCast, module, 2);
2084 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ProcessInstanceDeclarations", "void ProcessInstanceDeclarations(void)", ProcessInstanceDeclarations, module, 1);
2085 }
2086
2087 void __ecereUnregisterModule_pass3(struct __ecereNameSpace__ecere__com__Instance * module)
2088 {
2089
2090 }
2091