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

   1 #if defined(__GNUC__)
   2 typedef long long int64;
   3 typedef unsigned long long uint64;
   4 #elif defined(__TINYC__)
   5 #include <stdarg.h>
   6 #define __builtin_va_list va_list
   7 #define __builtin_va_start va_start
   8 #define __builtin_va_end va_end
   9 #ifdef _WIN32
  10 #define strcasecmp stricmp
  11 #define strncasecmp strnicmp
  12 #define __declspec(x) __attribute__((x))
  13 #endif
  14 typedef long long int64;
  15 typedef unsigned long long uint64;
  16 #else
  17 typedef __int64 int64;
  18 typedef unsigned __int64 uint64;
  19 #endif
  20 #ifdef __BIG_ENDIAN__
  21 #define __ENDIAN_PAD(x) (8 - (x))
  22 #else
  23 #define __ENDIAN_PAD(x) 0
  24 #endif
  25 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
  26
  27 struct __ecereNameSpace__ecere__sys__BTNode;
  28
  29 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
  30
  31 struct __ecereNameSpace__ecere__sys__BinaryTree
  32 {
  33 struct __ecereNameSpace__ecere__sys__BTNode * root;
  34 int count;
  35 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, unsigned int a, unsigned int b);
  36 void (*  FreeKey)(void *  key);
  37 };
  38
  39 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
  40
  41 struct __ecereNameSpace__ecere__sys__OldList
  42 {
  43 void *  first;
  44 void *  last;
  45 int count;
  46 unsigned int offset;
  47 unsigned int circ;
  48 };
  49
  50 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
  51
  52 struct __ecereNameSpace__ecere__com__Method
  53 {
  54 char *  name;
  55 struct __ecereNameSpace__ecere__com__Method * parent;
  56 struct __ecereNameSpace__ecere__com__Method * left;
  57 struct __ecereNameSpace__ecere__com__Method * right;
  58 int depth;
  59 int (*  function)();
  60 int vid;
  61 int type;
  62 struct __ecereNameSpace__ecere__com__Class * _class;
  63 void *  symbol;
  64 char *  dataTypeString;
  65 struct Type * dataType;
  66 int memberAccess;
  67 };
  68
  69 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
  70
  71 struct __ecereNameSpace__ecere__com__Property
  72 {
  73 struct __ecereNameSpace__ecere__com__Property * prev;
  74 struct __ecereNameSpace__ecere__com__Property * next;
  75 char *  name;
  76 unsigned int isProperty;
  77 int memberAccess;
  78 int id;
  79 struct __ecereNameSpace__ecere__com__Class * _class;
  80 char *  dataTypeString;
  81 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
  82 struct Type * dataType;
  83 void (*  Set)();
  84 int (*  Get)();
  85 unsigned int (*  IsSet)();
  86 void *  data;
  87 void *  symbol;
  88 int vid;
  89 unsigned int conversion;
  90 unsigned int watcherOffset;
  91 char *  category;
  92 unsigned int compiled;
  93 unsigned int selfWatchable;
  94 unsigned int isWatchable;
  95 };
  96
  97 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_CodePosition;
  98
  99 struct CodePosition
 100 {
 101 int line;
 102 int charPos;
 103 int pos;
 104 unsigned int included;
 105 };
 106
 107 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Location;
 108
 109 struct Location
 110 {
 111 struct CodePosition start;
 112 struct CodePosition end;
 113 };
 114
 115 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDefinition;
 116
 117 struct ClassDefinition
 118 {
 119 struct ClassDefinition * prev;
 120 struct ClassDefinition * next;
 121 struct Location loc;
 122 struct Specifier * _class;
 123 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
 124 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 125 struct Symbol * symbol;
 126 struct Location blockStart;
 127 struct Location nameLoc;
 128 int endid;
 129 int declMode;
 130 unsigned int deleteWatchable;
 131 };
 132
 133 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
 134
 135 struct Context
 136 {
 137 struct Context * parent;
 138 struct __ecereNameSpace__ecere__sys__BinaryTree types;
 139 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
 140 struct __ecereNameSpace__ecere__sys__BinaryTree symbols;
 141 struct __ecereNameSpace__ecere__sys__BinaryTree structSymbols;
 142 int nextID;
 143 int simpleID;
 144 struct __ecereNameSpace__ecere__sys__BinaryTree templateTypes;
 145 struct ClassDefinition * classDef;
 146 unsigned int templateTypesOnly;
 147 unsigned int hasNameSpace;
 148 };
 149
 150 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
 151
 152 struct Instantiation
 153 {
 154 struct Instantiation * prev;
 155 struct Instantiation * next;
 156 struct Location loc;
 157 struct Specifier * _class;
 158 struct Expression * exp;
 159 struct __ecereNameSpace__ecere__sys__OldList *  members;
 160 struct Symbol * symbol;
 161 unsigned int fullSet;
 162 unsigned int isConstant;
 163 unsigned char *  data;
 164 struct Location nameLoc;
 165 struct Location insideLoc;
 166 unsigned int built;
 167 };
 168
 169 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
 170
 171 struct Declaration
 172 {
 173 struct Declaration * prev;
 174 struct Declaration * next;
 175 struct Location loc;
 176 int type;
 177 union
 178 {
 179 struct
 180 {
 181 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 182 struct __ecereNameSpace__ecere__sys__OldList *  declarators;
 183 };
 184 struct Instantiation * inst;
 185 struct
 186 {
 187 struct Identifier * id;
 188 struct Expression * exp;
 189 };
 190 };
 191 struct Specifier * extStorage;
 192 struct Symbol * symbol;
 193 int declMode;
 194 };
 195
 196 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
 197
 198 struct Statement;
 199
 200 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
 201
 202 struct TypeName;
 203
 204 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
 205
 206 struct Initializer;
 207
 208 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
 209
 210 struct __ecereNameSpace__ecere__com__DataValue
 211 {
 212 union
 213 {
 214 char c;
 215 unsigned char uc;
 216 short s;
 217 unsigned short us;
 218 int i;
 219 unsigned int ui;
 220 void *  p;
 221 float f;
 222 double d;
 223 long long i64;
 224 uint64 ui64;
 225 };
 226 };
 227
 228 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
 229
 230 struct Expression
 231 {
 232 struct Expression * prev;
 233 struct Expression * next;
 234 struct Location loc;
 235 int type;
 236 union
 237 {
 238 struct
 239 {
 240 char *  constant;
 241 struct Identifier * identifier;
 242 };
 243 struct Statement * compound;
 244 struct Instantiation * instance;
 245 char *  string;
 246 struct __ecereNameSpace__ecere__sys__OldList *  list;
 247 struct
 248 {
 249 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
 250 struct Declarator * decl;
 251 } _classExp;
 252 struct
 253 {
 254 struct Identifier * id;
 255 } classData;
 256 struct
 257 {
 258 struct Expression * exp;
 259 struct __ecereNameSpace__ecere__sys__OldList * arguments;
 260 struct Location argLoc;
 261 } call;
 262 struct
 263 {
 264 struct Expression * exp;
 265 struct __ecereNameSpace__ecere__sys__OldList * index;
 266 } index;
 267 struct
 268 {
 269 struct Expression * exp;
 270 struct Identifier * member;
 271 int memberType;
 272 unsigned int thisPtr;
 273 } member;
 274 struct
 275 {
 276 int op;
 277 struct Expression * exp1;
 278 struct Expression * exp2;
 279 } op;
 280 struct TypeName * typeName;
 281 struct Specifier * _class;
 282 struct
 283 {
 284 struct TypeName * typeName;
 285 struct Expression * exp;
 286 } cast;
 287 struct
 288 {
 289 struct Expression * cond;
 290 struct __ecereNameSpace__ecere__sys__OldList * exp;
 291 struct Expression * elseExp;
 292 } cond;
 293 struct
 294 {
 295 struct TypeName * typeName;
 296 struct Expression * size;
 297 } _new;
 298 struct
 299 {
 300 struct TypeName * typeName;
 301 struct Expression * size;
 302 struct Expression * exp;
 303 } _renew;
 304 struct
 305 {
 306 char * table;
 307 struct Identifier * id;
 308 } db;
 309 struct
 310 {
 311 struct Expression * ds;
 312 struct Expression * name;
 313 } dbopen;
 314 struct
 315 {
 316 struct TypeName * typeName;
 317 struct Initializer * initializer;
 318 } initializer;
 319 struct
 320 {
 321 struct Expression * exp;
 322 struct TypeName * typeName;
 323 } vaArg;
 324 };
 325 unsigned int debugValue;
 326 struct __ecereNameSpace__ecere__com__DataValue val;
 327 unsigned int address;
 328 unsigned int hasAddress;
 329 struct Type * expType;
 330 struct Type * destType;
 331 unsigned int usage;
 332 int tempCount;
 333 unsigned int byReference;
 334 unsigned int isConstant;
 335 unsigned int addedThis;
 336 unsigned int needCast;
 337 unsigned int thisPtr;
 338 };
 339
 340 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
 341
 342 struct TemplateDatatype
 343 {
 344 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 345 struct Declarator * decl;
 346 };
 347
 348 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
 349
 350 struct TemplateArgument
 351 {
 352 struct TemplateArgument * prev;
 353 struct TemplateArgument * next;
 354 struct Location loc;
 355 struct Identifier * name;
 356 int type;
 357 union
 358 {
 359 struct Expression * expression;
 360 struct Identifier * identifier;
 361 struct TemplateDatatype * templateDatatype;
 362 };
 363 };
 364
 365 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
 366
 367 struct TemplateParameter
 368 {
 369 struct TemplateParameter * prev;
 370 struct TemplateParameter * next;
 371 struct Location loc;
 372 int type;
 373 struct Identifier * identifier;
 374 union
 375 {
 376 struct TemplateDatatype * dataType;
 377 int memberType;
 378 };
 379 struct TemplateArgument * defaultArgument;
 380 char *  dataTypeString;
 381 struct Type * baseType;
 382 };
 383
 384 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
 385
 386 struct Specifier
 387 {
 388 struct Specifier * prev;
 389 struct Specifier * next;
 390 struct Location loc;
 391 int type;
 392 union
 393 {
 394 int specifier;
 395 struct
 396 {
 397 char *  name;
 398 struct Symbol * symbol;
 399 struct __ecereNameSpace__ecere__sys__OldList *  templateArgs;
 400 };
 401 struct
 402 {
 403 struct Identifier * id;
 404 struct __ecereNameSpace__ecere__sys__OldList *  list;
 405 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
 406 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 407 unsigned int addNameSpace;
 408 struct Context * ctx;
 409 };
 410 struct Expression * expression;
 411 struct Specifier * _class;
 412 struct TemplateParameter * templateParameter;
 413 };
 414 };
 415
 416 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
 417
 418 struct Identifier
 419 {
 420 struct Identifier * prev;
 421 struct Identifier * next;
 422 struct Location loc;
 423 struct Symbol * classSym;
 424 struct Specifier * _class;
 425 char *  string;
 426 struct Identifier * badID;
 427 };
 428
 429 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Pointer;
 430
 431 struct Pointer;
 432
 433 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
 434
 435 struct Declarator
 436 {
 437 struct Declarator * prev;
 438 struct Declarator * next;
 439 struct Location loc;
 440 int type;
 441 struct Symbol * symbol;
 442 struct Declarator * declarator;
 443 union
 444 {
 445 struct Identifier * identifier;
 446 struct
 447 {
 448 struct Expression * exp;
 449 struct Expression * posExp;
 450 char * attrib;
 451 } structDecl;
 452 struct
 453 {
 454 struct Expression * exp;
 455 struct Specifier * enumClass;
 456 } array;
 457 struct
 458 {
 459 struct __ecereNameSpace__ecere__sys__OldList * parameters;
 460 } function;
 461 struct
 462 {
 463 struct Pointer * pointer;
 464 } pointer;
 465 struct
 466 {
 467 char * extended;
 468 } extended;
 469 };
 470 };
 471
 472 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
 473
 474 struct FunctionDefinition;
 475
 476 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
 477
 478 struct DBTableDef;
 479
 480 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
 481
 482 struct External
 483 {
 484 struct External * prev;
 485 struct External * next;
 486 struct Location loc;
 487 int type;
 488 struct Symbol * symbol;
 489 union
 490 {
 491 struct FunctionDefinition * function;
 492 struct ClassDefinition * _class;
 493 struct Declaration * declaration;
 494 char *  importString;
 495 struct Identifier * id;
 496 struct DBTableDef * table;
 497 };
 498 int importType;
 499 };
 500
 501 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
 502
 503 struct ModuleImport;
 504
 505 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
 506
 507 struct ClassImport;
 508
 509 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
 510
 511 struct Symbol
 512 {
 513 char *  string;
 514 struct Symbol * parent;
 515 struct Symbol * left;
 516 struct Symbol * right;
 517 int depth;
 518 struct Type * type;
 519 union
 520 {
 521 struct __ecereNameSpace__ecere__com__Method * method;
 522 struct __ecereNameSpace__ecere__com__Property * _property;
 523 struct __ecereNameSpace__ecere__com__Class * registered;
 524 };
 525 int id;
 526 int idCode;
 527 union
 528 {
 529 struct
 530 {
 531 struct External * pointerExternal;
 532 struct External * structExternal;
 533 };
 534 struct
 535 {
 536 struct External * externalGet;
 537 struct External * externalSet;
 538 struct External * externalPtr;
 539 struct External * externalIsSet;
 540 };
 541 struct
 542 {
 543 struct External * methodExternal;
 544 struct External * methodCodeExternal;
 545 };
 546 };
 547 unsigned int imported;
 548 unsigned int declaredStructSym;
 549 struct __ecereNameSpace__ecere__com__Class * _class;
 550 unsigned int declaredStruct;
 551 unsigned int needConstructor;
 552 unsigned int needDestructor;
 553 char *  constructorName;
 554 char *  structName;
 555 char *  className;
 556 char *  destructorName;
 557 struct ModuleImport * module;
 558 struct ClassImport * _import;
 559 struct Location nameLoc;
 560 unsigned int isParam;
 561 unsigned int isRemote;
 562 unsigned int isStruct;
 563 unsigned int fireWatchersDone;
 564 int declaring;
 565 unsigned int classData;
 566 unsigned int isStatic;
 567 char *  shortName;
 568 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
 569 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
 570 struct Context * ctx;
 571 int isIterator;
 572 };
 573
 574 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
 575
 576 struct Type
 577 {
 578 struct Type * prev;
 579 struct Type * next;
 580 int refCount;
 581 union
 582 {
 583 struct Symbol * _class;
 584 struct
 585 {
 586 struct __ecereNameSpace__ecere__sys__OldList members;
 587 char *  enumName;
 588 };
 589 struct
 590 {
 591 struct Type * returnType;
 592 struct __ecereNameSpace__ecere__sys__OldList params;
 593 struct Symbol * thisClass;
 594 unsigned int staticMethod;
 595 struct TemplateParameter * thisClassTemplate;
 596 };
 597 struct
 598 {
 599 struct __ecereNameSpace__ecere__com__Method * method;
 600 struct __ecereNameSpace__ecere__com__Class * methodClass;
 601 struct __ecereNameSpace__ecere__com__Class * usedClass;
 602 };
 603 struct
 604 {
 605 struct Type * arrayType;
 606 int arraySize;
 607 struct Expression * arraySizeExp;
 608 unsigned int freeExp;
 609 struct Symbol * enumClass;
 610 };
 611 struct Type * type;
 612 struct TemplateParameter * templateParameter;
 613 };
 614 unsigned int isSigned;
 615 int kind;
 616 unsigned int constant;
 617 unsigned int size;
 618 char *  name;
 619 char *  typeName;
 620 unsigned int count;
 621 unsigned int truth;
 622 int classObjectType;
 623 unsigned int byReference;
 624 unsigned int extraParam;
 625 int alignment;
 626 unsigned int directClassAccess;
 627 unsigned int computing;
 628 unsigned int dllExport;
 629 unsigned int offset;
 630 unsigned int keepCast;
 631 unsigned int passAsTemplate;
 632 int bitFieldCount;
 633 };
 634
 635 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
 636
 637 struct __ecereNameSpace__ecere__com__Class
 638 {
 639 struct __ecereNameSpace__ecere__com__Class * prev;
 640 struct __ecereNameSpace__ecere__com__Class * next;
 641 char *  name;
 642 int offset;
 643 int structSize;
 644 int (* *  _vTbl)();
 645 int vTblSize;
 646 int (*  Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
 647 void (*  Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
 648 int offsetClass;
 649 int sizeClass;
 650 struct __ecereNameSpace__ecere__com__Class * base;
 651 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
 652 struct __ecereNameSpace__ecere__sys__BinaryTree members;
 653 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
 654 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
 655 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
 656 struct __ecereNameSpace__ecere__sys__OldList derivatives;
 657 int memberID;
 658 int startMemberID;
 659 int type;
 660 struct __ecereNameSpace__ecere__com__Instance * module;
 661 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
 662 char *  dataTypeString;
 663 struct Type * dataType;
 664 int typeSize;
 665 int defaultAlignment;
 666 void (*  Initialize)();
 667 int memberOffset;
 668 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
 669 char *  designerClass;
 670 unsigned int noExpansion;
 671 char *  defaultProperty;
 672 unsigned int comRedefinition;
 673 int count;
 674 unsigned int isRemote;
 675 unsigned int internalDecl;
 676 void *  data;
 677 unsigned int computeSize;
 678 int structAlignment;
 679 int destructionWatchOffset;
 680 unsigned int fixed;
 681 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
 682 int inheritanceAccess;
 683 char *  fullName;
 684 void *  symbol;
 685 struct __ecereNameSpace__ecere__sys__OldList conversions;
 686 struct __ecereNameSpace__ecere__sys__OldList templateParams;
 687 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
 688 struct __ecereNameSpace__ecere__com__Class * templateClass;
 689 struct __ecereNameSpace__ecere__sys__OldList templatized;
 690 int numParams;
 691 };
 692
 693 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
 694
 695 struct __ecereNameSpace__ecere__com__Instance
 696 {
 697 int (* *  _vTbl)();
 698 struct __ecereNameSpace__ecere__com__Class * _class;
 699 int _refCount;
 700 };
 701
 702 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
 703
 704 struct __ecereNameSpace__ecere__com__DataMember
 705 {
 706 struct __ecereNameSpace__ecere__com__DataMember * prev;
 707 struct __ecereNameSpace__ecere__com__DataMember * next;
 708 char *  name;
 709 unsigned int isProperty;
 710 int memberAccess;
 711 int id;
 712 struct __ecereNameSpace__ecere__com__Class * _class;
 713 char *  dataTypeString;
 714 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 715 struct Type * dataType;
 716 int type;
 717 int offset;
 718 int memberID;
 719 struct __ecereNameSpace__ecere__sys__OldList members;
 720 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 721 int memberOffset;
 722 int structAlignment;
 723 };
 724
 725 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
 726
 727 struct __ecereNameSpace__ecere__com__SerialBuffer
 728 {
 729 unsigned char *  _buffer;
 730 unsigned int count;
 731 unsigned int _size;
 732 unsigned int pos;
 733 };
 734
 735 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
 736
 737 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 738 {
 739 union
 740 {
 741 struct
 742 {
 743 char *  dataTypeString;
 744 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 745 };
 746 struct __ecereNameSpace__ecere__com__DataValue expression;
 747 struct
 748 {
 749 char *  memberString;
 750 union
 751 {
 752 struct __ecereNameSpace__ecere__com__DataMember * member;
 753 struct __ecereNameSpace__ecere__com__Property * prop;
 754 struct __ecereNameSpace__ecere__com__Method * method;
 755 };
 756 };
 757 };
 758 };
 759
 760 enum yytokentype
 761 {
 762 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, EXT_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
 763 };
 764
 765 typedef union YYSTYPE
 766 {
 767 int specifierType;
 768 int i;
 769 int declMode;
 770 struct Identifier * id;
 771 struct Expression * exp;
 772 struct Specifier * specifier;
 773 struct __ecereNameSpace__ecere__sys__OldList * list;
 774 struct Enumerator * enumerator;
 775 struct Declarator * declarator;
 776 struct Pointer * pointer;
 777 struct Initializer * initializer;
 778 struct InitDeclarator * initDeclarator;
 779 struct TypeName * typeName;
 780 struct Declaration * declaration;
 781 struct Statement * stmt;
 782 struct FunctionDefinition * function;
 783 struct External * external;
 784 struct Context * context;
 785 struct AsmField * asmField;
 786 struct Instantiation * instance;
 787 struct MembersInit * membersInit;
 788 struct MemberInit * memberInit;
 789 struct ClassFunction * classFunction;
 790 struct ClassDefinition * _class;
 791 struct ClassDef * classDef;
 792 struct PropertyDef * prop;
 793 char * string;
 794 struct Symbol * symbol;
 795 struct PropertyWatch * propertyWatch;
 796 struct TemplateParameter * templateParameter;
 797 struct TemplateArgument * templateArgument;
 798 struct TemplateDatatype * templateDatatype;
 799 struct DBTableEntry * dbtableEntry;
 800 struct DBIndexItem * dbindexItem;
 801 struct DBTableDef * dbtableDef;
 802 } YYSTYPE;
 803
 804 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Enumerator;
 805
 806 struct Enumerator;
 807
 808 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_InitDeclarator;
 809
 810 struct InitDeclarator;
 811
 812 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_AsmField;
 813
 814 struct AsmField;
 815
 816 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassFunction;
 817
 818 struct ClassFunction
 819 {
 820 struct ClassFunction * prev;
 821 struct ClassFunction * next;
 822 struct Location loc;
 823 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 824 struct Declarator * declarator;
 825 struct __ecereNameSpace__ecere__sys__OldList *  declarations;
 826 struct Statement * body;
 827 struct __ecereNameSpace__ecere__com__Class * _class;
 828 struct __ecereNameSpace__ecere__sys__OldList attached;
 829 int declMode;
 830 struct Type * type;
 831 struct Symbol * propSet;
 832 unsigned int isVirtual;
 833 unsigned int isConstructor;
 834 unsigned int isDestructor;
 835 unsigned int dontMangle;
 836 int id;
 837 int idCode;
 838 };
 839
 840 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MembersInit;
 841
 842 struct MembersInit;
 843
 844 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MemberInit;
 845
 846 struct MemberInit;
 847
 848 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyDef;
 849
 850 struct PropertyDef
 851 {
 852 struct PropertyDef * prev;
 853 struct PropertyDef * next;
 854 struct Location loc;
 855 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 856 struct Declarator * declarator;
 857 struct Identifier * id;
 858 struct Statement * getStmt;
 859 struct Statement * setStmt;
 860 struct Statement * issetStmt;
 861 struct Symbol * symbol;
 862 unsigned int conversion;
 863 unsigned int isWatchable;
 864 char *  category;
 865 };
 866
 867 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyWatch;
 868
 869 struct PropertyWatch;
 870
 871 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDef;
 872
 873 struct ClassDef
 874 {
 875 struct ClassDef * prev;
 876 struct ClassDef * next;
 877 struct Location loc;
 878 int type;
 879 union
 880 {
 881 struct Declaration * decl;
 882 struct ClassFunction * function;
 883 struct __ecereNameSpace__ecere__sys__OldList *  defProperties;
 884 struct PropertyDef * propertyDef;
 885 struct PropertyWatch * propertyWatch;
 886 char *  designer;
 887 struct Identifier * defaultProperty;
 888 struct
 889 {
 890 struct Identifier * id;
 891 struct Initializer * initializer;
 892 };
 893 };
 894 int memberAccess;
 895 void *  object;
 896 };
 897
 898 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableEntry;
 899
 900 struct DBTableEntry;
 901
 902 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBIndexItem;
 903
 904 struct DBIndexItem;
 905
 906 extern YYSTYPE yylval;
 907
 908 extern struct Location yylloc;
 909
 910 extern struct Identifier * GetDeclId(struct Declarator * decl);
 911
 912 extern void ProcessExpressionType(struct Expression * exp);
 913
 914 extern void ComputeExpression(struct Expression * exp);
 915
 916 extern int strtol(char * , char * * , int base);
 917
 918 extern void FreeExpression(struct Expression * exp);
 919
 920 extern struct Type * ProcessType(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl);
 921
 922 extern void PrintType(struct Type * type, char *  string, unsigned int printName, unsigned int fullName);
 923
 924 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__BitMember;
 925
 926 struct __ecereNameSpace__ecere__com__BitMember
 927 {
 928 struct __ecereNameSpace__ecere__com__BitMember * prev;
 929 struct __ecereNameSpace__ecere__com__BitMember * next;
 930 char *  name;
 931 unsigned int isProperty;
 932 int memberAccess;
 933 int id;
 934 struct __ecereNameSpace__ecere__com__Class * _class;
 935 char *  dataTypeString;
 936 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 937 struct Type * dataType;
 938 int type;
 939 int size;
 940 int pos;
 941 uint64 mask;
 942 };
 943
 944 extern struct __ecereNameSpace__ecere__com__BitMember * __ecereNameSpace__ecere__com__eClass_AddBitMember(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, int bitSize, int bitPos, int declMode);
 945
 946 extern void Compiler_Error(char *  format, ...);
 947
 948 extern void FreeType(struct Type * type);
 949
 950 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eMember_AddDataMember(struct __ecereNameSpace__ecere__com__DataMember * member, char *  name, char *  type, unsigned int size, unsigned int alignment, int declMode);
 951
 952 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eClass_AddDataMember(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, unsigned int size, unsigned int alignment, int declMode);
 953
 954 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eMember_New(int type, int declMode);
 955
 956 extern unsigned int __ecereNameSpace__ecere__com__eMember_AddMember(struct __ecereNameSpace__ecere__com__DataMember * addTo, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
 957
 958 extern unsigned int __ecereNameSpace__ecere__com__eClass_AddMember(struct __ecereNameSpace__ecere__com__Class * _class, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
 959
 960 extern struct __ecereNameSpace__ecere__sys__OldList *  MkListOne(void *  item);
 961
 962 extern struct Declarator * MkDeclaratorIdentifier(struct Identifier * id);
 963
 964 extern char *  StringFromSpecDecl(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl);
 965
 966 extern struct __ecereNameSpace__ecere__com__Property * __ecereNameSpace__ecere__com__eClass_AddProperty(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  dataType, void *  setStmt, void *  getStmt, int declMode);
 967
 968 extern unsigned int inCompiler;
 969
 970 extern char *  __ecereNameSpace__ecere__sys__CopyString(char *  string);
 971
 972 extern void ReadString(char *  output, char *  string);
 973
 974 extern void __ecereNameSpace__ecere__com__eProperty_Watchable(struct __ecereNameSpace__ecere__com__Property * _property);
 975
 976 extern int printf(char * , ...);
 977
 978 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassProperty;
 979
 980 struct __ecereNameSpace__ecere__com__ClassProperty;
 981
 982 extern struct __ecereNameSpace__ecere__com__ClassProperty * __ecereNameSpace__ecere__com__eClass_AddClassProperty(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  dataType, void *  setStmt, void *  getStmt);
 983
 984 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
 985
 986 static void AddDefinitions(struct __ecereNameSpace__ecere__com__Class * regClass, struct __ecereNameSpace__ecere__com__DataMember * member, struct __ecereNameSpace__ecere__sys__OldList * definitions)
 987 {
 988 void * __ecereTemp1;
 989
 990 if(definitions != (((void *)0)))
 991 {
 992 struct ClassDef * def;
 993
 994 for(def = definitions->first; def; def = def->next)
 995 {
 996 if(def->type == 2)
 997 {
 998 struct Declaration * decl = def->decl;
 999 struct __ecereNameSpace__ecere__com__DataMember * dataMember;
1000 struct Type * dataType;
1001
1002 if(decl->type == 0)
1003 {
1004 struct Declarator * d;
1005
1006 if(decl->declarators)
1007 {
1008 for(d = (*decl->declarators).first; d; d = d->next)
1009 {
1010 struct Identifier * declId = GetDeclId(d);
1011
1012 if(declId)
1013 {
1014 if(regClass && regClass->type == 2)
1015 {
1016 struct Expression * sizeExp = d->structDecl.exp, * posExp = d->structDecl.posExp;
1017 int bitSize = 0, bitPos = -1;
1018 char dataTypeString[1024] = "";
1019
1020 if(sizeExp)
1021 {
1022 ProcessExpressionType(sizeExp);
1023 ComputeExpression(sizeExp);
1024 if(sizeExp->isConstant)
1025 bitSize = strtol(sizeExp->constant, (((void *)0)), 0);
1026 FreeExpression(sizeExp);
1027 }
1028 if(posExp)
1029 {
1030 ProcessExpressionType(posExp);
1031 ComputeExpression(posExp);
1032 if(posExp->isConstant)
1033 bitPos = strtol(posExp->constant, (((void *)0)), 0);
1034 FreeExpression(posExp);
1035 }
1036 d->structDecl.posExp = (((void *)0));
1037 d->structDecl.exp = (((void *)0));
1038 dataType = ProcessType(decl->specifiers, d);
1039 PrintType(dataType, dataTypeString, 0x0, 0x1);
1040 {
1041 struct __ecereNameSpace__ecere__com__BitMember * member = __ecereNameSpace__ecere__com__eClass_AddBitMember(regClass, declId->string, dataTypeString, 0, 0, def->memberAccess);
1042
1043 if(member)
1044 {
1045 member->size = bitSize;
1046 member->pos = bitPos;
1047 }
1048 dataMember = (struct __ecereNameSpace__ecere__com__DataMember *)member;
1049 }
1050 if(dataMember)
1051 dataMember->dataType = dataType;
1052 else
1053 {
1054 Compiler_Error("Member with same name already exists %s in class %s\n", declId->string, regClass->name);
1055 FreeType(dataType);
1056 }
1057 }
1058 else
1059 {
1060 {
1061 char typeString[1024] = "";
1062
1063 dataType = ProcessType(decl->specifiers, d);
1064 PrintType(dataType, typeString, 0x0, 0x1);
1065 if(member)
1066 {
1067 dataMember = __ecereNameSpace__ecere__com__eMember_AddDataMember(member, declId->string, typeString, 0, 0, def->memberAccess);
1068 if(!dataMember)
1069 Compiler_Error("Member with same name already exists %s in member %s\n", declId->string, member->name);
1070 }
1071 else
1072 {
1073 dataMember = __ecereNameSpace__ecere__com__eClass_AddDataMember(regClass, declId->string, typeString, 0, 0, def->memberAccess);
1074 if(!dataMember)
1075 Compiler_Error("Member with same name already exists %s in class %s\n", declId->string, regClass->name);
1076 }
1077 if(dataMember)
1078 dataMember->dataType = dataType;
1079 else
1080 FreeType(dataType);
1081 }
1082 }
1083 }
1084 }
1085 }
1086 else if(decl->specifiers)
1087 {
1088 struct Specifier * spec;
1089
1090 for(spec = (*decl->specifiers).first; spec; spec = spec->next)
1091 {
1092 if(spec->type == 3 || spec->type == 4)
1093 {
1094 if(spec->definitions && !spec->id)
1095 {
1096 struct __ecereNameSpace__ecere__com__DataMember * dataMember = __ecereNameSpace__ecere__com__eMember_New((spec->type == 4) ? 1 : 2, def->memberAccess);
1097
1098 AddDefinitions((((void *)0)), dataMember, spec->definitions);
1099 if(member)
1100 {
1101 __ecereNameSpace__ecere__com__eMember_AddMember(member, dataMember);
1102 }
1103 else
1104 {
1105 __ecereNameSpace__ecere__com__eClass_AddMember(regClass, dataMember);
1106 }
1107 }
1108 else if(spec->definitions && spec->id)
1109 {
1110 {
1111 struct Identifier * id = spec->id;
1112 char typeString[1024] = "";
1113
1114 spec->id = (((void *)0));
1115 decl->declarators = MkListOne(MkDeclaratorIdentifier(id));
1116 dataType = ProcessType(decl->specifiers, (((void *)0)));
1117 PrintType(dataType, typeString, 0x0, 0x1);
1118 if(member)
1119 {
1120 dataMember = __ecereNameSpace__ecere__com__eMember_AddDataMember(member, id->string, typeString, 0, 0, def->memberAccess);
1121 if(!dataMember)
1122 Compiler_Error("Member with same name already exists %s in member %s\n", id->string, member->name);
1123 }
1124 else
1125 {
1126 dataMember = __ecereNameSpace__ecere__com__eClass_AddDataMember(regClass, id->string, typeString, 0, 0, def->memberAccess);
1127 if(!dataMember)
1128 Compiler_Error("Member with same name already exists %s in class %s\n", id->string, regClass->name);
1129 }
1130 if(dataMember)
1131 dataMember->dataType = dataType;
1132 else
1133 FreeType(dataType);
1134 }
1135 }
1136 }
1137 }
1138 }
1139 }
1140 else if(decl->type == 2)
1141 {
1142 struct Instantiation * inst = decl->inst;
1143 struct Expression * exp = inst->exp;
1144
1145 if(exp)
1146 {
1147 char * string = exp->identifier->string;
1148
1149 {
1150 struct Type * dataType = (dataType = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type), dataType->kind = 8, dataType->_class = inst->_class->symbol, dataType->refCount = 1, dataType);
1151
1152 if(member)
1153 {
1154 dataMember = __ecereNameSpace__ecere__com__eMember_AddDataMember(member, string, inst->_class->name, 0, 0, def->memberAccess);
1155 if(!dataMember)
1156 Compiler_Error("Member with same name already exists %s in member %s\n", string, member->name);
1157 }
1158 else
1159 {
1160 dataMember = __ecereNameSpace__ecere__com__eClass_AddDataMember(regClass, string, inst->_class->name, 0, 0, def->memberAccess);
1161 if(!dataMember)
1162 Compiler_Error("Member with same name already exists %s in class %s\n", string, regClass->name);
1163 }
1164 if(dataMember)
1165 dataMember->dataType = dataType;
1166 else
1167 FreeType(dataType);
1168 }
1169 }
1170 }
1171 }
1172 else if(def->type == 3 && def->propertyDef)
1173 {
1174 struct PropertyDef * propertyDef = def->propertyDef;
1175 struct __ecereNameSpace__ecere__com__Property * prop;
1176 char * dataTypeString = StringFromSpecDecl(propertyDef->specifiers, propertyDef->declarator);
1177
1178 prop = __ecereNameSpace__ecere__com__eClass_AddProperty(regClass, propertyDef->conversion ? (((void *)0)) : propertyDef->id->string, dataTypeString, inCompiler ? propertyDef->setStmt : (((void *)0)), inCompiler ? propertyDef->getStmt : (((void *)0)), def->memberAccess);
1179 (__ecereNameSpace__ecere__com__eSystem_Delete(dataTypeString), dataTypeString = 0);
1180 if(prop)
1181 {
1182 if(inCompiler)
1183 prop->IsSet = (void *)propertyDef->issetStmt;
1184 prop->compiled = 0x0;
1185 prop->symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(propertyDef->symbol->string), ((struct Symbol *)__ecereTemp1)->id = propertyDef->symbol->id, ((struct Symbol *)__ecereTemp1)->type = propertyDef->symbol->type, ((struct Symbol *)__ecereTemp1));
1186 if(propertyDef->category)
1187 {
1188 char temp[1024];
1189
1190 ReadString(temp, propertyDef->category);
1191 prop->category = __ecereNameSpace__ecere__sys__CopyString(temp);
1192 }
1193 if(propertyDef->isWatchable)
1194 __ecereNameSpace__ecere__com__eProperty_Watchable(prop);
1195 }
1196 else
1197 printf("");
1198 propertyDef->symbol->_property = prop;
1199 if(propertyDef->symbol->type)
1200 propertyDef->symbol->type->refCount++;
1201 }
1202 else if(def->type == 10 && def->propertyDef)
1203 {
1204 struct PropertyDef * propertyDef = def->propertyDef;
1205 struct __ecereNameSpace__ecere__com__ClassProperty * prop;
1206 char * dataTypeString = StringFromSpecDecl(propertyDef->specifiers, propertyDef->declarator);
1207
1208 prop = __ecereNameSpace__ecere__com__eClass_AddClassProperty(regClass, propertyDef->id->string, dataTypeString, inCompiler ? propertyDef->setStmt : (((void *)0)), inCompiler ? propertyDef->getStmt : (((void *)0)));
1209 (__ecereNameSpace__ecere__com__eSystem_Delete(dataTypeString), dataTypeString = 0);
1210 }
1211 }
1212 }
1213 }
1214
1215 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_FindClass(struct __ecereNameSpace__ecere__com__Instance * module, char *  name);
1216
1217 extern struct __ecereNameSpace__ecere__com__Instance * privateModule;
1218
1219 extern struct Context * globalContext;
1220
1221 extern struct __ecereNameSpace__ecere__sys__OldList *  excludedSymbols;
1222
1223 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_RegisterClass(int type, char *  name, char *  baseName, int size, int sizeClass, unsigned int (* )(void * ), void (* )(void * ), struct __ecereNameSpace__ecere__com__Instance * module, int declMode, int inheritanceAccess);
1224
1225 extern unsigned int buildingECERECOMModule;
1226
1227 extern struct Declarator * GetFuncDecl(struct Declarator * decl);
1228
1229 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_AddVirtualMethod(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, void *  function, int declMode);
1230
1231 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_AddMethod(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, void *  function, int declMode);
1232
1233 extern char *  strcpy(char * , const char * );
1234
1235 extern char *  strcat(char * , const char * );
1236
1237 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_OpTable;
1238
1239 struct OpTable
1240 {
1241 unsigned int (*  Add)(struct Expression *, struct Operand *, struct Operand *);
1242 unsigned int (*  Sub)(struct Expression *, struct Operand *, struct Operand *);
1243 unsigned int (*  Mul)(struct Expression *, struct Operand *, struct Operand *);
1244 unsigned int (*  Div)(struct Expression *, struct Operand *, struct Operand *);
1245 unsigned int (*  Mod)(struct Expression *, struct Operand *, struct Operand *);
1246 unsigned int (*  Neg)(struct Expression *, struct Operand *);
1247 unsigned int (*  Inc)(struct Expression *, struct Operand *);
1248 unsigned int (*  Dec)(struct Expression *, struct Operand *);
1249 unsigned int (*  Asign)(struct Expression *, struct Operand *, struct Operand *);
1250 unsigned int (*  AddAsign)(struct Expression *, struct Operand *, struct Operand *);
1251 unsigned int (*  SubAsign)(struct Expression *, struct Operand *, struct Operand *);
1252 unsigned int (*  MulAsign)(struct Expression *, struct Operand *, struct Operand *);
1253 unsigned int (*  DivAsign)(struct Expression *, struct Operand *, struct Operand *);
1254 unsigned int (*  ModAsign)(struct Expression *, struct Operand *, struct Operand *);
1255 unsigned int (*  BitAnd)(struct Expression *, struct Operand *, struct Operand *);
1256 unsigned int (*  BitOr)(struct Expression *, struct Operand *, struct Operand *);
1257 unsigned int (*  BitXor)(struct Expression *, struct Operand *, struct Operand *);
1258 unsigned int (*  LShift)(struct Expression *, struct Operand *, struct Operand *);
1259 unsigned int (*  RShift)(struct Expression *, struct Operand *, struct Operand *);
1260 unsigned int (*  BitNot)(struct Expression *, struct Operand *);
1261 unsigned int (*  AndAsign)(struct Expression *, struct Operand *, struct Operand *);
1262 unsigned int (*  OrAsign)(struct Expression *, struct Operand *, struct Operand *);
1263 unsigned int (*  XorAsign)(struct Expression *, struct Operand *, struct Operand *);
1264 unsigned int (*  LShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
1265 unsigned int (*  RShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
1266 unsigned int (*  Not)(struct Expression *, struct Operand *);
1267 unsigned int (*  Equ)(struct Expression *, struct Operand *, struct Operand *);
1268 unsigned int (*  Nqu)(struct Expression *, struct Operand *, struct Operand *);
1269 unsigned int (*  And)(struct Expression *, struct Operand *, struct Operand *);
1270 unsigned int (*  Or)(struct Expression *, struct Operand *, struct Operand *);
1271 unsigned int (*  Grt)(struct Expression *, struct Operand *, struct Operand *);
1272 unsigned int (*  Sma)(struct Expression *, struct Operand *, struct Operand *);
1273 unsigned int (*  GrtEqu)(struct Expression *, struct Operand *, struct Operand *);
1274 unsigned int (*  SmaEqu)(struct Expression *, struct Operand *, struct Operand *);
1275 unsigned int (*  Cond)(struct Expression *, struct Operand *, struct Operand *, struct Operand *);
1276 };
1277
1278 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Operand;
1279
1280 struct Operand
1281 {
1282 int kind;
1283 struct Type * type;
1284 unsigned int ptrSize;
1285 union
1286 {
1287 char c;
1288 unsigned char uc;
1289 short s;
1290 unsigned short us;
1291 int i;
1292 unsigned int ui;
1293 float f;
1294 double d;
1295 unsigned char *  p;
1296 long long i64;
1297 uint64 ui64;
1298 };
1299 struct OpTable ops;
1300 };
1301
1302 extern struct Operand GetOperand(struct Expression * exp);
1303
1304 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateParameter;
1305
1306 struct __ecereNameSpace__ecere__com__ClassTemplateParameter;
1307
1308 extern struct __ecereNameSpace__ecere__com__ClassTemplateParameter * __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, int type, void *  info, struct __ecereNameSpace__ecere__com__ClassTemplateArgument * defaultArg);
1309
1310 extern void __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(struct __ecereNameSpace__ecere__com__Class * base);
1311
1312 void __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1313
1314 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
1315
1316 static void ProcessClass(int classType, struct __ecereNameSpace__ecere__sys__OldList * definitions, struct Symbol * symbol, struct __ecereNameSpace__ecere__sys__OldList * baseSpecs, struct __ecereNameSpace__ecere__sys__OldList * enumValues, struct Location * loc, struct __ecereNameSpace__ecere__sys__OldList * defs, void * after, struct __ecereNameSpace__ecere__sys__OldList * initDeclarators, int declMode)
1317 {
1318 void * __ecereTemp1;
1319 struct __ecereNameSpace__ecere__com__Class * regClass;
1320 struct ClassDef * def;
1321 unsigned int redefinition = 0x0;
1322
1323 regClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, symbol->string);
1324 if(regClass && !regClass->internalDecl)
1325 {
1326 if(symbol->parent || (struct Symbol *)globalContext->classes.root == symbol)
1327 {
1328 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalContext->classes, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol);
1329 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
1330 }
1331 redefinition = 0x1;
1332 if(inCompiler)
1333 {
1334 yylloc = *loc;
1335 Compiler_Error("redefinition of class %s\n", symbol->string);
1336 return ;
1337 }
1338 }
1339 else
1340 {
1341 char baseName[1024] = "";
1342 unsigned int unitType = 0x0;
1343 unsigned int wouldBeEnum = 0x0;
1344 int inheritanceAccess = 1;
1345
1346 if(baseSpecs != (((void *)0)))
1347 {
1348 struct Type * baseType = ProcessType(baseSpecs, (((void *)0)));
1349
1350 PrintType(baseType, baseName, 0x0, 0x1);
1351 if(baseType->kind == 8)
1352 {
1353 if(baseType->_class->registered && classType == 0)
1354 {
1355 if(baseType->_class->registered->type == 3)
1356 classType = 3;
1357 else if(baseType->_class->registered->type == 2)
1358 classType = 2;
1359 else if(baseType->_class->registered->type == 5)
1360 classType = 5;
1361 else if(baseType->_class->registered->type == 4)
1362 {
1363 wouldBeEnum = 0x1;
1364 }
1365 }
1366 }
1367 else if(baseType->kind == 9 || baseType->kind == 10)
1368 {
1369 classType = 5;
1370 baseName[0] = '\0';
1371 }
1372 else
1373 unitType = 0x1;
1374 FreeType(baseType);
1375 if(((struct Specifier *)baseSpecs->first)->type == 0 && ((struct Specifier *)baseSpecs->first)->specifier == PRIVATE)
1376 inheritanceAccess = 2;
1377 }
1378 if(classType == 0)
1379 {
1380 if(unitType)
1381 classType = 3;
1382 if(definitions != (((void *)0)))
1383 {
1384 for(def = definitions->first; def; def = def->next)
1385 {
1386 if(def->type == 2)
1387 {
1388 struct Declaration * decl = def->decl;
1389
1390 if(decl->type == 0)
1391 {
1392 if(unitType)
1393 {
1394 classType = 2;
1395 break;
1396 }
1397 if(decl->declarators)
1398 {
1399 struct Declarator * d;
1400
1401 for(d = (*decl->declarators).first; d; d = d->next)
1402 {
1403 if(d->structDecl.exp)
1404 {
1405 classType = 2;
1406 break;
1407 }
1408 }
1409 if(d)
1410 break;
1411 }
1412 }
1413 }
1414 }
1415 }
1416 }
1417 if(classType == 0 && wouldBeEnum)
1418 classType = 4;
1419 regClass = symbol->registered = __ecereNameSpace__ecere__com__eSystem_RegisterClass((classType == 6) ? 1 : classType, symbol->string, baseName[0] ? baseName : (((void *)0)), 0, 0, (((void *)0)), (((void *)0)), privateModule, buildingECERECOMModule ? 4 : declMode, inheritanceAccess);
1420 if(regClass)
1421 regClass->symbol = symbol;
1422 }
1423 if(!redefinition)
1424 {
1425 if(classType == 6)
1426 {
1427 struct __ecereNameSpace__ecere__com__DataMember * unionMember = __ecereNameSpace__ecere__com__eMember_New(1, 1);
1428
1429 AddDefinitions(regClass, unionMember, definitions);
1430 __ecereNameSpace__ecere__com__eClass_AddMember(regClass, unionMember);
1431 }
1432 else
1433 AddDefinitions(regClass, (((void *)0)), definitions);
1434 }
1435 if(definitions != (((void *)0)))
1436 {
1437 for(def = definitions->first; def; def = def->next)
1438 {
1439 if(def->type == 0 && def->function->declarator)
1440 {
1441 struct ClassFunction * func = def->function;
1442
1443 func->_class = regClass;
1444 if(!redefinition && !func->dontMangle)
1445 {
1446 struct Declarator * funcDecl = GetFuncDecl(func->declarator);
1447 struct Identifier * id = GetDeclId(funcDecl);
1448 struct __ecereNameSpace__ecere__com__Method * method;
1449
1450 if(func->isVirtual)
1451 {
1452 char * typeString = StringFromSpecDecl(func->specifiers, func->declarator);
1453
1454 method = __ecereNameSpace__ecere__com__eClass_AddVirtualMethod(regClass, id->string, typeString, inCompiler ? func->declarator->symbol : (((void *)0)), def->memberAccess);
1455 (__ecereNameSpace__ecere__com__eSystem_Delete(typeString), typeString = 0);
1456 }
1457 else
1458 {
1459 char * typeString = StringFromSpecDecl(func->specifiers, func->declarator);
1460
1461 method = __ecereNameSpace__ecere__com__eClass_AddMethod(regClass, id->string, typeString, inCompiler ? func->declarator->symbol : (((void *)0)), def->memberAccess);
1462 if(!method)
1463 Compiler_Error("Redefinition of method %s in class %s\n", id->string, regClass->name);
1464 (__ecereNameSpace__ecere__com__eSystem_Delete(typeString), typeString = 0);
1465 }
1466 if(method && (method->type != 1 || method->_class == regClass))
1467 {
1468 method->symbol = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString(func->declarator->symbol->string), ((struct Symbol *)__ecereTemp1)->id = func->declarator->symbol->id, ((struct Symbol *)__ecereTemp1)->type = func->declarator->symbol->type, ((struct Symbol *)__ecereTemp1)->method = method, ((struct Symbol *)__ecereTemp1));
1469 if(func->declarator->symbol->type)
1470 func->declarator->symbol->type->refCount++;
1471 func->declarator->symbol->method = method;
1472 }
1473 else
1474 {
1475 func->declarator->symbol->method = method;
1476 }
1477 }
1478 }
1479 }
1480 }
1481 if(regClass && symbol->templateParams)
1482 {
1483 struct TemplateParameter * param;
1484
1485 for(param = (*symbol->templateParams).first; param; param = param->next)
1486 {
1487 struct __ecereNameSpace__ecere__com__ClassTemplateArgument defaultArg =
1488 {
1489 0, 0, 0, 0, 0
1490 };
1491
1492 if(param->defaultArgument)
1493 {
1494 switch(param->type)
1495 {
1496 case 0:
1497 defaultArg.dataTypeString = StringFromSpecDecl(param->defaultArgument->templateDatatype->specifiers, param->defaultArgument->templateDatatype->decl);
1498 break;
1499 case 1:
1500 {
1501 char memberString[1024];
1502
1503 memberString[0] = '\0';
1504 if(param->defaultArgument->identifier->_class && param->defaultArgument->identifier->_class->name)
1505 {
1506 if(param->defaultArgument->identifier->_class->type == 8)
1507 strcpy(memberString, param->defaultArgument->identifier->_class->templateParameter->identifier->string);
1508 else
1509 strcpy(memberString, param->defaultArgument->identifier->_class->name);
1510 }
1511 if(memberString[0])
1512 {
1513 strcat(memberString, "::");
1514 }
1515 strcat(memberString, param->defaultArgument->identifier->string);
1516 defaultArg.memberString = __ecereNameSpace__ecere__sys__CopyString(memberString);
1517 break;
1518 }
1519 case 2:
1520 {
1521 struct Operand op;
1522
1523 param->defaultArgument->expression->destType = ProcessType(param->dataType->specifiers, param->dataType->decl);
1524 ProcessExpressionType(param->defaultArgument->expression);
1525 ComputeExpression(param->defaultArgument->expression);
1526 op = GetOperand(param->defaultArgument->expression);
1527 defaultArg.expression.ui64 = op.ui64;
1528 break;
1529 }
1530 }
1531 }
1532 if(param->type == 1)
1533 {
1534 __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(regClass, param->identifier->string, 1, (void *)param->memberType, &defaultArg);
1535 }
1536 else
1537 {
1538 char * typeString = param->dataType ? StringFromSpecDecl(param->dataType->specifiers, param->dataType->decl) : (((void *)0));
1539
1540 __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(regClass, param->identifier->string, param->type, typeString, &defaultArg);
1541 (__ecereNameSpace__ecere__com__eSystem_Delete(typeString), typeString = 0);
1542 }
1543 if(param->type == 0 || param->type == 1)
1544 (__ecereNameSpace__ecere__com__eSystem_Delete(defaultArg.dataTypeString), defaultArg.dataTypeString = 0);
1545 }
1546 __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(regClass);
1547 }
1548 }
1549
1550 extern struct External * curExternal;
1551
1552 extern struct __ecereNameSpace__ecere__sys__OldList *  ast;
1553
1554 extern struct Symbol * FindType(struct Context * ctx, char *  name);
1555
1556 extern struct Symbol * FindClass(char *  name);
1557
1558 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldLink;
1559
1560 struct __ecereNameSpace__ecere__sys__OldLink
1561 {
1562 struct __ecereNameSpace__ecere__sys__OldLink * prev;
1563 struct __ecereNameSpace__ecere__sys__OldLink * next;
1564 void *  data;
1565 };
1566
1567 extern struct ModuleImport * mainModule;
1568
1569 void PrePreProcessClassDefinitions()
1570 {
1571 struct External * external, * next;
1572
1573 curExternal = (((void *)0));
1574 if(ast)
1575 {
1576 for(external = (*ast).first; external; external = next)
1577 {
1578 next = external->next;
1579 curExternal = external;
1580 if(external->type == 2)
1581 {
1582 struct ClassDefinition * _class = external->_class;
1583
1584 if(_class->definitions && (!_class->symbol->registered || !inCompiler))
1585 {
1586 ProcessClass(0, _class->definitions, _class->symbol, _class->baseSpecs, (((void *)0)), &_class->loc, ast, external->prev, (((void *)0)), _class->declMode);
1587 _class->symbol->isStatic = _class->declMode == 3;
1588 }
1589 }
1590 else if(external->type == 1)
1591 {
1592 struct Declaration * declaration = external->declaration;
1593
1594 if(declaration->type == 1)
1595 {
1596 if(declaration->specifiers)
1597 {
1598 struct Specifier * specifier;
1599
1600 for(specifier = (*declaration->specifiers).first; specifier; specifier = specifier->next)
1601 {
1602 if((specifier->type == 2 || specifier->type == 3 || specifier->type == 4) && specifier->id && specifier->id->string && (declaration->declMode || specifier->baseSpecs || (specifier->type == 2 && specifier->definitions)))
1603 {
1604 struct Symbol * type = FindType(globalContext, specifier->id->string);
1605 struct Symbol * symbol = FindClass(specifier->id->string);
1606
1607 if(type)
1608 {
1609 declaration->declMode = 0;
1610 if(symbol)
1611 {
1612 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalContext->classes, (struct __ecereNameSpace__ecere__sys__BTNode *)symbol);
1613 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*excludedSymbols), symbol);
1614 }
1615 }
1616 else if(symbol && !symbol->registered)
1617 {
1618 int classType;
1619
1620 if(specifier->type == 2)
1621 classType = 4;
1622 else if(specifier->type == 4)
1623 classType = 6;
1624 else
1625 classType = 1;
1626 ProcessClass(classType, specifier->definitions, symbol, specifier->baseSpecs, specifier->list, &specifier->loc, ast, external->prev, declaration->declarators, declaration->declMode);
1627 symbol->isStatic = declaration->declMode == 3;
1628 }
1629 }
1630 }
1631 }
1632 }
1633 }
1634 else if(external->type == 3)
1635 {
1636 }
1637 }
1638 {
1639 for(external = (*ast).first; external; external = external->next)
1640 {
1641 if(external->type == 2)
1642 {
1643 struct ClassDefinition * _class = external->_class;
1644
1645 if(_class->symbol)
1646 {
1647 struct __ecereNameSpace__ecere__sys__OldLink * link;
1648
1649 for(link = _class->symbol->templatedClasses.first; link; link = link->next)
1650 {
1651 struct Symbol * symbol = link->data;
1652
1653 symbol->registered = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, symbol->string);
1654 }
1655 }
1656 }
1657 else if(external->type == 1)
1658 {
1659 struct Declaration * declaration = external->declaration;
1660
1661 if(declaration->type == 1)
1662 {
1663 if(declaration->specifiers)
1664 {
1665 struct Specifier * specifier;
1666
1667 for(specifier = (*declaration->specifiers).first; specifier; specifier = specifier->next)
1668 {
1669 if((specifier->type == 2 || specifier->type == 3 || specifier->type == 4) && specifier->id && specifier->id->string && (declaration->declMode || specifier->baseSpecs || (specifier->type == 2 && specifier->definitions)))
1670 {
1671 struct Symbol * type = FindType(globalContext, specifier->id->string);
1672 struct Symbol * symbol = FindClass(specifier->id->string);
1673
1674 if(type)
1675 {
1676 }
1677 else if(symbol)
1678 {
1679 struct __ecereNameSpace__ecere__sys__OldLink * link;
1680
1681 for(link = symbol->templatedClasses.first; link; link = link->next)
1682 {
1683 struct Symbol * tplSymbol = link->data;
1684
1685 tplSymbol->registered = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, tplSymbol->string);
1686 tplSymbol->module = symbol->module ? symbol->module : mainModule;
1687 }
1688 }
1689 }
1690 }
1691 }
1692 }
1693 }
1694 }
1695 }
1696 }
1697 }
1698
1699 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
1700
1701 struct __ecereNameSpace__ecere__com__GlobalFunction;
1702
1703 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);
1704
1705 void __ecereRegisterModule_firstPass(struct __ecereNameSpace__ecere__com__Instance * module)
1706 {
1707 struct __ecereNameSpace__ecere__com__Class * class;
1708
1709 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("PrePreProcessClassDefinitions", "void PrePreProcessClassDefinitions(void)", PrePreProcessClassDefinitions, module, 1);
1710 }
1711
1712 void __ecereUnregisterModule_firstPass(struct __ecereNameSpace__ecere__com__Instance * module)
1713 {
1714
1715 }
1716