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