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

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