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