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

   1 #if defined(__GNUC__)
   2 typedef long long int64;
   3 typedef unsigned long long uint64;
   4 #ifndef _WIN32
   5 #define __declspec(x)
   6 #endif
   7 #elif defined(__TINYC__)
   8 #include <stdarg.h>
   9 #define __builtin_va_list va_list
  10 #define __builtin_va_start va_start
  11 #define __builtin_va_end va_end
  12 #ifdef _WIN32
  13 #define strcasecmp stricmp
  14 #define strncasecmp strnicmp
  15 #define __declspec(x) __attribute__((x))
  16 #else
  17 #define __declspec(x)
  18 #endif
  19 typedef long long int64;
  20 typedef unsigned long long uint64;
  21 #else
  22 typedef __int64 int64;
  23 typedef unsigned __int64 uint64;
  24 #endif
  25 #ifdef __BIG_ENDIAN__
  26 #define __ENDIAN_PAD(x) (8 - (x))
  27 #else
  28 #define __ENDIAN_PAD(x) 0
  29 #endif
  30 #include <stdint.h>
  31 #include <sys/types.h>
  32 extern void *  __ecereNameSpace__ecere__com__eSystem_New(unsigned int size);
  33
  34 extern void *  __ecereNameSpace__ecere__com__eSystem_New0(unsigned int size);
  35
  36 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew(void *  memory, unsigned int size);
  37
  38 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew0(void *  memory, unsigned int size);
  39
  40 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
  41
  42 struct __ecereNameSpace__ecere__sys__BTNode;
  43
  44 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
  45
  46 struct __ecereNameSpace__ecere__sys__BinaryTree
  47 {
  48 struct __ecereNameSpace__ecere__sys__BTNode * root;
  49 int count;
  50 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
  51 void (*  FreeKey)(void *  key);
  52 } __attribute__ ((gcc_struct));
  53
  54 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
  55
  56 struct __ecereNameSpace__ecere__sys__OldList
  57 {
  58 void *  first;
  59 void *  last;
  60 int count;
  61 unsigned int offset;
  62 unsigned int circ;
  63 } __attribute__ ((gcc_struct));
  64
  65 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
  66
  67 struct __ecereNameSpace__ecere__com__Method
  68 {
  69 char *  name;
  70 struct __ecereNameSpace__ecere__com__Method * parent;
  71 struct __ecereNameSpace__ecere__com__Method * left;
  72 struct __ecereNameSpace__ecere__com__Method * right;
  73 int depth;
  74 int (*  function)();
  75 int vid;
  76 int type;
  77 struct __ecereNameSpace__ecere__com__Class * _class;
  78 void *  symbol;
  79 char *  dataTypeString;
  80 struct Type * dataType;
  81 int memberAccess;
  82 } __attribute__ ((gcc_struct));
  83
  84 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
  85
  86 struct __ecereNameSpace__ecere__com__Property
  87 {
  88 struct __ecereNameSpace__ecere__com__Property * prev;
  89 struct __ecereNameSpace__ecere__com__Property * next;
  90 char *  name;
  91 unsigned int isProperty;
  92 int memberAccess;
  93 int id;
  94 struct __ecereNameSpace__ecere__com__Class * _class;
  95 char *  dataTypeString;
  96 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
  97 struct Type * dataType;
  98 void (*  Set)(void * , int);
  99 int (*  Get)(void * );
 100 unsigned int (*  IsSet)(void * );
 101 void *  data;
 102 void *  symbol;
 103 int vid;
 104 unsigned int conversion;
 105 unsigned int watcherOffset;
 106 char *  category;
 107 unsigned int compiled;
 108 unsigned int selfWatchable;
 109 unsigned int isWatchable;
 110 } __attribute__ ((gcc_struct));
 111
 112 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_CodePosition;
 113
 114 struct CodePosition
 115 {
 116 int line;
 117 int charPos;
 118 int pos;
 119 int included;
 120 } __attribute__ ((gcc_struct));
 121
 122 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Location;
 123
 124 struct Location
 125 {
 126 struct CodePosition start;
 127 struct CodePosition end;
 128 } __attribute__ ((gcc_struct));
 129
 130 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attrib;
 131
 132 struct Attrib
 133 {
 134 struct Location loc;
 135 int type;
 136 struct __ecereNameSpace__ecere__sys__OldList *  attribs;
 137 } __attribute__ ((gcc_struct));
 138
 139 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ExtDecl;
 140
 141 struct ExtDecl
 142 {
 143 struct Location loc;
 144 int type;
 145 union
 146 {
 147 char * s;
 148 struct Attrib * attr;
 149 } __attribute__ ((gcc_struct));
 150 } __attribute__ ((gcc_struct));
 151
 152 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDefinition;
 153
 154 struct ClassDefinition
 155 {
 156 struct ClassDefinition * prev;
 157 struct ClassDefinition * next;
 158 struct Location loc;
 159 struct Specifier * _class;
 160 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
 161 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 162 struct Symbol * symbol;
 163 struct Location blockStart;
 164 struct Location nameLoc;
 165 int endid;
 166 int declMode;
 167 unsigned int deleteWatchable;
 168 } __attribute__ ((gcc_struct));
 169
 170 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
 171
 172 struct Context;
 173
 174 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
 175
 176 struct Instantiation
 177 {
 178 struct Instantiation * prev;
 179 struct Instantiation * next;
 180 struct Location loc;
 181 struct Specifier * _class;
 182 struct Expression * exp;
 183 struct __ecereNameSpace__ecere__sys__OldList *  members;
 184 struct Symbol * symbol;
 185 unsigned int fullSet;
 186 unsigned int isConstant;
 187 unsigned char *  data;
 188 struct Location nameLoc;
 189 struct Location insideLoc;
 190 unsigned int built;
 191 } __attribute__ ((gcc_struct));
 192
 193 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
 194
 195 struct Declaration
 196 {
 197 struct Declaration * prev;
 198 struct Declaration * next;
 199 struct Location loc;
 200 int type;
 201 union
 202 {
 203 struct
 204 {
 205 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 206 struct __ecereNameSpace__ecere__sys__OldList *  declarators;
 207 } __attribute__ ((gcc_struct));
 208 struct Instantiation * inst;
 209 struct
 210 {
 211 struct Identifier * id;
 212 struct Expression * exp;
 213 } __attribute__ ((gcc_struct));
 214 } __attribute__ ((gcc_struct));
 215 struct Specifier * extStorage;
 216 struct Symbol * symbol;
 217 int declMode;
 218 } __attribute__ ((gcc_struct));
 219
 220 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
 221
 222 struct Statement
 223 {
 224 struct Statement * prev;
 225 struct Statement * next;
 226 struct Location loc;
 227 int type;
 228 union
 229 {
 230 struct __ecereNameSpace__ecere__sys__OldList *  expressions;
 231 struct
 232 {
 233 struct Identifier * id;
 234 struct Statement * stmt;
 235 } __attribute__ ((gcc_struct)) labeled;
 236 struct
 237 {
 238 struct Expression * exp;
 239 struct Statement * stmt;
 240 } __attribute__ ((gcc_struct)) caseStmt;
 241 struct
 242 {
 243 struct __ecereNameSpace__ecere__sys__OldList * declarations;
 244 struct __ecereNameSpace__ecere__sys__OldList * statements;
 245 struct Context * context;
 246 unsigned int isSwitch;
 247 } __attribute__ ((gcc_struct)) compound;
 248 struct
 249 {
 250 struct __ecereNameSpace__ecere__sys__OldList * exp;
 251 struct Statement * stmt;
 252 struct Statement * elseStmt;
 253 } __attribute__ ((gcc_struct)) ifStmt;
 254 struct
 255 {
 256 struct __ecereNameSpace__ecere__sys__OldList * exp;
 257 struct Statement * stmt;
 258 } __attribute__ ((gcc_struct)) switchStmt;
 259 struct
 260 {
 261 struct __ecereNameSpace__ecere__sys__OldList * exp;
 262 struct Statement * stmt;
 263 } __attribute__ ((gcc_struct)) whileStmt;
 264 struct
 265 {
 266 struct __ecereNameSpace__ecere__sys__OldList * exp;
 267 struct Statement * stmt;
 268 } __attribute__ ((gcc_struct)) doWhile;
 269 struct
 270 {
 271 struct Statement * init;
 272 struct Statement * check;
 273 struct __ecereNameSpace__ecere__sys__OldList * increment;
 274 struct Statement * stmt;
 275 } __attribute__ ((gcc_struct)) forStmt;
 276 struct
 277 {
 278 struct Identifier * id;
 279 } __attribute__ ((gcc_struct)) gotoStmt;
 280 struct
 281 {
 282 struct Specifier * spec;
 283 char * statements;
 284 struct __ecereNameSpace__ecere__sys__OldList * inputFields;
 285 struct __ecereNameSpace__ecere__sys__OldList * outputFields;
 286 struct __ecereNameSpace__ecere__sys__OldList * clobberedFields;
 287 } __attribute__ ((gcc_struct)) asmStmt;
 288 struct
 289 {
 290 struct Expression * watcher;
 291 struct Expression * object;
 292 struct __ecereNameSpace__ecere__sys__OldList * watches;
 293 } __attribute__ ((gcc_struct)) _watch;
 294 struct
 295 {
 296 struct Identifier * id;
 297 struct __ecereNameSpace__ecere__sys__OldList * exp;
 298 struct __ecereNameSpace__ecere__sys__OldList * filter;
 299 struct Statement * stmt;
 300 } __attribute__ ((gcc_struct)) forEachStmt;
 301 struct Declaration * decl;
 302 } __attribute__ ((gcc_struct));
 303 } __attribute__ ((gcc_struct));
 304
 305 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
 306
 307 struct TypeName
 308 {
 309 struct TypeName * prev;
 310 struct TypeName * next;
 311 struct Location loc;
 312 struct __ecereNameSpace__ecere__sys__OldList *  qualifiers;
 313 struct Declarator * declarator;
 314 int classObjectType;
 315 struct Expression * bitCount;
 316 } __attribute__ ((gcc_struct));
 317
 318 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
 319
 320 struct Initializer
 321 {
 322 struct Initializer * prev;
 323 struct Initializer * next;
 324 struct Location loc;
 325 int type;
 326 union
 327 {
 328 struct Expression * exp;
 329 struct __ecereNameSpace__ecere__sys__OldList *  list;
 330 } __attribute__ ((gcc_struct));
 331 unsigned int isConstant;
 332 } __attribute__ ((gcc_struct));
 333
 334 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
 335
 336 struct __ecereNameSpace__ecere__com__DataValue
 337 {
 338 union
 339 {
 340 char c;
 341 unsigned char uc;
 342 short s;
 343 unsigned short us;
 344 int i;
 345 unsigned int ui;
 346 void *  p;
 347 float f;
 348 double d;
 349 long long i64;
 350 uint64 ui64;
 351 } __attribute__ ((gcc_struct));
 352 } __attribute__ ((gcc_struct));
 353
 354 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
 355
 356 struct Expression
 357 {
 358 struct Expression * prev;
 359 struct Expression * next;
 360 struct Location loc;
 361 int type;
 362 union
 363 {
 364 struct
 365 {
 366 char *  constant;
 367 struct Identifier * identifier;
 368 } __attribute__ ((gcc_struct));
 369 struct Statement * compound;
 370 struct Instantiation * instance;
 371 char *  string;
 372 struct __ecereNameSpace__ecere__sys__OldList *  list;
 373 struct
 374 {
 375 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
 376 struct Declarator * decl;
 377 } __attribute__ ((gcc_struct)) _classExp;
 378 struct
 379 {
 380 struct Identifier * id;
 381 } __attribute__ ((gcc_struct)) classData;
 382 struct
 383 {
 384 struct Expression * exp;
 385 struct __ecereNameSpace__ecere__sys__OldList * arguments;
 386 struct Location argLoc;
 387 } __attribute__ ((gcc_struct)) call;
 388 struct
 389 {
 390 struct Expression * exp;
 391 struct __ecereNameSpace__ecere__sys__OldList * index;
 392 } __attribute__ ((gcc_struct)) index;
 393 struct
 394 {
 395 struct Expression * exp;
 396 struct Identifier * member;
 397 int memberType;
 398 unsigned int thisPtr;
 399 } __attribute__ ((gcc_struct)) member;
 400 struct
 401 {
 402 int op;
 403 struct Expression * exp1;
 404 struct Expression * exp2;
 405 } __attribute__ ((gcc_struct)) op;
 406 struct TypeName * typeName;
 407 struct Specifier * _class;
 408 struct
 409 {
 410 struct TypeName * typeName;
 411 struct Expression * exp;
 412 } __attribute__ ((gcc_struct)) cast;
 413 struct
 414 {
 415 struct Expression * cond;
 416 struct __ecereNameSpace__ecere__sys__OldList * exp;
 417 struct Expression * elseExp;
 418 } __attribute__ ((gcc_struct)) cond;
 419 struct
 420 {
 421 struct TypeName * typeName;
 422 struct Expression * size;
 423 } __attribute__ ((gcc_struct)) _new;
 424 struct
 425 {
 426 struct TypeName * typeName;
 427 struct Expression * size;
 428 struct Expression * exp;
 429 } __attribute__ ((gcc_struct)) _renew;
 430 struct
 431 {
 432 char * table;
 433 struct Identifier * id;
 434 } __attribute__ ((gcc_struct)) db;
 435 struct
 436 {
 437 struct Expression * ds;
 438 struct Expression * name;
 439 } __attribute__ ((gcc_struct)) dbopen;
 440 struct
 441 {
 442 struct TypeName * typeName;
 443 struct Initializer * initializer;
 444 } __attribute__ ((gcc_struct)) initializer;
 445 struct
 446 {
 447 struct Expression * exp;
 448 struct TypeName * typeName;
 449 } __attribute__ ((gcc_struct)) vaArg;
 450 } __attribute__ ((gcc_struct));
 451 unsigned int debugValue;
 452 struct __ecereNameSpace__ecere__com__DataValue val;
 453 uint64 address;
 454 unsigned int hasAddress;
 455 struct Type * expType;
 456 struct Type * destType;
 457 unsigned int usage;
 458 int tempCount;
 459 unsigned int byReference;
 460 unsigned int isConstant;
 461 unsigned int addedThis;
 462 unsigned int needCast;
 463 unsigned int thisPtr;
 464 } __attribute__ ((gcc_struct));
 465
 466 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
 467
 468 struct TemplateDatatype
 469 {
 470 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 471 struct Declarator * decl;
 472 } __attribute__ ((gcc_struct));
 473
 474 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
 475
 476 struct TemplateArgument;
 477
 478 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
 479
 480 struct TemplateParameter
 481 {
 482 struct TemplateParameter * prev;
 483 struct TemplateParameter * next;
 484 struct Location loc;
 485 int type;
 486 struct Identifier * identifier;
 487 union
 488 {
 489 struct TemplateDatatype * dataType;
 490 int memberType;
 491 } __attribute__ ((gcc_struct));
 492 struct TemplateArgument * defaultArgument;
 493 char *  dataTypeString;
 494 struct Type * baseType;
 495 } __attribute__ ((gcc_struct));
 496
 497 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
 498
 499 struct Specifier
 500 {
 501 struct Specifier * prev;
 502 struct Specifier * next;
 503 struct Location loc;
 504 int type;
 505 union
 506 {
 507 int specifier;
 508 struct
 509 {
 510 struct ExtDecl * extDecl;
 511 char *  name;
 512 struct Symbol * symbol;
 513 struct __ecereNameSpace__ecere__sys__OldList *  templateArgs;
 514 } __attribute__ ((gcc_struct));
 515 struct
 516 {
 517 struct Identifier * id;
 518 struct __ecereNameSpace__ecere__sys__OldList *  list;
 519 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
 520 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 521 unsigned int addNameSpace;
 522 struct Context * ctx;
 523 struct ExtDecl * extDeclStruct;
 524 } __attribute__ ((gcc_struct));
 525 struct Expression * expression;
 526 struct Specifier * _class;
 527 struct TemplateParameter * templateParameter;
 528 } __attribute__ ((gcc_struct));
 529 } __attribute__ ((gcc_struct));
 530
 531 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
 532
 533 struct Identifier
 534 {
 535 struct Identifier * prev;
 536 struct Identifier * next;
 537 struct Location loc;
 538 struct Symbol * classSym;
 539 struct Specifier * _class;
 540 char *  string;
 541 struct Identifier * badID;
 542 } __attribute__ ((gcc_struct));
 543
 544 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Pointer;
 545
 546 struct Pointer
 547 {
 548 struct Pointer * prev;
 549 struct Pointer * next;
 550 struct Location loc;
 551 struct __ecereNameSpace__ecere__sys__OldList *  qualifiers;
 552 struct Pointer * pointer;
 553 } __attribute__ ((gcc_struct));
 554
 555 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
 556
 557 struct Declarator
 558 {
 559 struct Declarator * prev;
 560 struct Declarator * next;
 561 struct Location loc;
 562 int type;
 563 struct Symbol * symbol;
 564 struct Declarator * declarator;
 565 union
 566 {
 567 struct Identifier * identifier;
 568 struct
 569 {
 570 struct Expression * exp;
 571 struct Expression * posExp;
 572 struct Attrib * attrib;
 573 } __attribute__ ((gcc_struct)) structDecl;
 574 struct
 575 {
 576 struct Expression * exp;
 577 struct Specifier * enumClass;
 578 } __attribute__ ((gcc_struct)) array;
 579 struct
 580 {
 581 struct __ecereNameSpace__ecere__sys__OldList * parameters;
 582 } __attribute__ ((gcc_struct)) function;
 583 struct
 584 {
 585 struct Pointer * pointer;
 586 } __attribute__ ((gcc_struct)) pointer;
 587 struct
 588 {
 589 struct ExtDecl * extended;
 590 } __attribute__ ((gcc_struct)) extended;
 591 } __attribute__ ((gcc_struct));
 592 } __attribute__ ((gcc_struct));
 593
 594 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
 595
 596 struct FunctionDefinition
 597 {
 598 struct FunctionDefinition * prev;
 599 struct FunctionDefinition * next;
 600 struct Location loc;
 601 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 602 struct Declarator * declarator;
 603 struct __ecereNameSpace__ecere__sys__OldList *  declarations;
 604 struct Statement * body;
 605 struct __ecereNameSpace__ecere__com__Class * _class;
 606 struct __ecereNameSpace__ecere__sys__OldList attached;
 607 int declMode;
 608 struct Type * type;
 609 struct Symbol * propSet;
 610 int tempCount;
 611 unsigned int propertyNoThis;
 612 } __attribute__ ((gcc_struct));
 613
 614 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
 615
 616 struct DBTableDef;
 617
 618 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
 619
 620 struct External
 621 {
 622 struct External * prev;
 623 struct External * next;
 624 struct Location loc;
 625 int type;
 626 struct Symbol * symbol;
 627 union
 628 {
 629 struct FunctionDefinition * function;
 630 struct ClassDefinition * _class;
 631 struct Declaration * declaration;
 632 char *  importString;
 633 struct Identifier * id;
 634 struct DBTableDef * table;
 635 } __attribute__ ((gcc_struct));
 636 int importType;
 637 } __attribute__ ((gcc_struct));
 638
 639 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
 640
 641 struct ModuleImport;
 642
 643 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
 644
 645 struct ClassImport;
 646
 647 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
 648
 649 struct Symbol
 650 {
 651 char *  string;
 652 struct Symbol * parent;
 653 struct Symbol * left;
 654 struct Symbol * right;
 655 int depth;
 656 struct Type * type;
 657 union
 658 {
 659 struct __ecereNameSpace__ecere__com__Method * method;
 660 struct __ecereNameSpace__ecere__com__Property * _property;
 661 struct __ecereNameSpace__ecere__com__Class * registered;
 662 } __attribute__ ((gcc_struct));
 663 int id;
 664 int idCode;
 665 union
 666 {
 667 struct
 668 {
 669 struct External * pointerExternal;
 670 struct External * structExternal;
 671 } __attribute__ ((gcc_struct));
 672 struct
 673 {
 674 struct External * externalGet;
 675 struct External * externalSet;
 676 struct External * externalPtr;
 677 struct External * externalIsSet;
 678 } __attribute__ ((gcc_struct));
 679 struct
 680 {
 681 struct External * methodExternal;
 682 struct External * methodCodeExternal;
 683 } __attribute__ ((gcc_struct));
 684 } __attribute__ ((gcc_struct));
 685 unsigned int imported;
 686 unsigned int declaredStructSym;
 687 struct __ecereNameSpace__ecere__com__Class * _class;
 688 unsigned int declaredStruct;
 689 unsigned int needConstructor;
 690 unsigned int needDestructor;
 691 char *  constructorName;
 692 char *  structName;
 693 char *  className;
 694 char *  destructorName;
 695 struct ModuleImport * module;
 696 struct ClassImport * _import;
 697 struct Location nameLoc;
 698 unsigned int isParam;
 699 unsigned int isRemote;
 700 unsigned int isStruct;
 701 unsigned int fireWatchersDone;
 702 int declaring;
 703 unsigned int classData;
 704 unsigned int isStatic;
 705 char *  shortName;
 706 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
 707 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
 708 struct Context * ctx;
 709 int isIterator;
 710 struct Expression * propCategory;
 711 } __attribute__ ((gcc_struct));
 712
 713 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
 714
 715 struct Type
 716 {
 717 struct Type * prev;
 718 struct Type * next;
 719 int refCount;
 720 union
 721 {
 722 struct Symbol * _class;
 723 struct
 724 {
 725 struct __ecereNameSpace__ecere__sys__OldList members;
 726 char *  enumName;
 727 } __attribute__ ((gcc_struct));
 728 struct
 729 {
 730 struct Type * returnType;
 731 struct __ecereNameSpace__ecere__sys__OldList params;
 732 struct Symbol * thisClass;
 733 unsigned int staticMethod;
 734 struct TemplateParameter * thisClassTemplate;
 735 } __attribute__ ((gcc_struct));
 736 struct
 737 {
 738 struct __ecereNameSpace__ecere__com__Method * method;
 739 struct __ecereNameSpace__ecere__com__Class * methodClass;
 740 struct __ecereNameSpace__ecere__com__Class * usedClass;
 741 } __attribute__ ((gcc_struct));
 742 struct
 743 {
 744 struct Type * arrayType;
 745 int arraySize;
 746 struct Expression * arraySizeExp;
 747 unsigned int freeExp;
 748 struct Symbol * enumClass;
 749 } __attribute__ ((gcc_struct));
 750 struct Type * type;
 751 struct TemplateParameter * templateParameter;
 752 } __attribute__ ((gcc_struct));
 753 int kind;
 754 unsigned int size;
 755 char *  name;
 756 char *  typeName;
 757 int classObjectType;
 758 int alignment;
 759 unsigned int offset;
 760 int bitFieldCount;
 761 int count;
 762 unsigned int isSigned : 1;
 763 unsigned int constant : 1;
 764 unsigned int truth : 1;
 765 unsigned int byReference : 1;
 766 unsigned int extraParam : 1;
 767 unsigned int directClassAccess : 1;
 768 unsigned int computing : 1;
 769 unsigned int keepCast : 1;
 770 unsigned int passAsTemplate : 1;
 771 unsigned int dllExport : 1;
 772 unsigned int attrStdcall : 1;
 773 } __attribute__ ((gcc_struct));
 774
 775 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
 776
 777 struct __ecereNameSpace__ecere__com__Class
 778 {
 779 struct __ecereNameSpace__ecere__com__Class * prev;
 780 struct __ecereNameSpace__ecere__com__Class * next;
 781 char *  name;
 782 int offset;
 783 int structSize;
 784 int (* *  _vTbl)();
 785 int vTblSize;
 786 int (*  Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
 787 void (*  Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
 788 int offsetClass;
 789 int sizeClass;
 790 struct __ecereNameSpace__ecere__com__Class * base;
 791 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
 792 struct __ecereNameSpace__ecere__sys__BinaryTree members;
 793 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
 794 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
 795 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
 796 struct __ecereNameSpace__ecere__sys__OldList derivatives;
 797 int memberID;
 798 int startMemberID;
 799 int type;
 800 struct __ecereNameSpace__ecere__com__Instance * module;
 801 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
 802 char *  dataTypeString;
 803 struct Type * dataType;
 804 int typeSize;
 805 int defaultAlignment;
 806 void (*  Initialize)();
 807 int memberOffset;
 808 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
 809 char *  designerClass;
 810 unsigned int noExpansion;
 811 char *  defaultProperty;
 812 unsigned int comRedefinition;
 813 int count;
 814 unsigned int isRemote;
 815 unsigned int internalDecl;
 816 void *  data;
 817 unsigned int computeSize;
 818 int structAlignment;
 819 int destructionWatchOffset;
 820 unsigned int fixed;
 821 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
 822 int inheritanceAccess;
 823 char *  fullName;
 824 void *  symbol;
 825 struct __ecereNameSpace__ecere__sys__OldList conversions;
 826 struct __ecereNameSpace__ecere__sys__OldList templateParams;
 827 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
 828 struct __ecereNameSpace__ecere__com__Class * templateClass;
 829 struct __ecereNameSpace__ecere__sys__OldList templatized;
 830 int numParams;
 831 unsigned int isInstanceClass;
 832 } __attribute__ ((gcc_struct));
 833
 834 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, char *  name);
 835
 836 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
 837
 838 struct __ecereNameSpace__ecere__com__Instance
 839 {
 840 int (* *  _vTbl)();
 841 struct __ecereNameSpace__ecere__com__Class * _class;
 842 int _refCount;
 843 } __attribute__ ((gcc_struct));
 844
 845 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
 846
 847 struct __ecereNameSpace__ecere__com__DataMember
 848 {
 849 struct __ecereNameSpace__ecere__com__DataMember * prev;
 850 struct __ecereNameSpace__ecere__com__DataMember * next;
 851 char *  name;
 852 unsigned int isProperty;
 853 int memberAccess;
 854 int id;
 855 struct __ecereNameSpace__ecere__com__Class * _class;
 856 char *  dataTypeString;
 857 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 858 struct Type * dataType;
 859 int type;
 860 int offset;
 861 int memberID;
 862 struct __ecereNameSpace__ecere__sys__OldList members;
 863 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 864 int memberOffset;
 865 int structAlignment;
 866 } __attribute__ ((gcc_struct));
 867
 868 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
 869
 870 struct __ecereNameSpace__ecere__com__SerialBuffer
 871 {
 872 unsigned char *  _buffer;
 873 unsigned int count;
 874 unsigned int _size;
 875 unsigned int pos;
 876 } __attribute__ ((gcc_struct));
 877
 878 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
 879
 880 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 881 {
 882 union
 883 {
 884 struct
 885 {
 886 char *  dataTypeString;
 887 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 888 } __attribute__ ((gcc_struct));
 889 struct __ecereNameSpace__ecere__com__DataValue expression;
 890 struct
 891 {
 892 char *  memberString;
 893 union
 894 {
 895 struct __ecereNameSpace__ecere__com__DataMember * member;
 896 struct __ecereNameSpace__ecere__com__Property * prop;
 897 struct __ecereNameSpace__ecere__com__Method * method;
 898 } __attribute__ ((gcc_struct));
 899 } __attribute__ ((gcc_struct));
 900 } __attribute__ ((gcc_struct));
 901 } __attribute__ ((gcc_struct));
 902
 903 enum yytokentype
 904 {
 905 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
 906 };
 907
 908 typedef union YYSTYPE
 909 {
 910 int specifierType;
 911 int i;
 912 int declMode;
 913 struct Identifier * id;
 914 struct Expression * exp;
 915 struct Specifier * specifier;
 916 struct __ecereNameSpace__ecere__sys__OldList * list;
 917 struct Enumerator * enumerator;
 918 struct Declarator * declarator;
 919 struct Pointer * pointer;
 920 struct Initializer * initializer;
 921 struct InitDeclarator * initDeclarator;
 922 struct TypeName * typeName;
 923 struct Declaration * declaration;
 924 struct Statement * stmt;
 925 struct FunctionDefinition * function;
 926 struct External * external;
 927 struct Context * context;
 928 struct AsmField * asmField;
 929 struct Attrib * attrib;
 930 struct ExtDecl * extDecl;
 931 struct Attribute * attribute;
 932 struct Instantiation * instance;
 933 struct MembersInit * membersInit;
 934 struct MemberInit * memberInit;
 935 struct ClassFunction * classFunction;
 936 struct ClassDefinition * _class;
 937 struct ClassDef * classDef;
 938 struct PropertyDef * prop;
 939 char * string;
 940 struct Symbol * symbol;
 941 struct PropertyWatch * propertyWatch;
 942 struct TemplateParameter * templateParameter;
 943 struct TemplateArgument * templateArgument;
 944 struct TemplateDatatype * templateDatatype;
 945 struct DBTableEntry * dbtableEntry;
 946 struct DBIndexItem * dbindexItem;
 947 struct DBTableDef * dbtableDef;
 948 } __attribute__ ((gcc_struct)) YYSTYPE;
 949
 950 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Enumerator;
 951
 952 struct Enumerator
 953 {
 954 struct Enumerator * prev;
 955 struct Enumerator * next;
 956 struct Location loc;
 957 struct Identifier * id;
 958 struct Expression * exp;
 959 } __attribute__ ((gcc_struct));
 960
 961 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_InitDeclarator;
 962
 963 struct InitDeclarator
 964 {
 965 struct InitDeclarator * prev;
 966 struct InitDeclarator * next;
 967 struct Location loc;
 968 struct Declarator * declarator;
 969 struct Initializer * initializer;
 970 } __attribute__ ((gcc_struct));
 971
 972 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_AsmField;
 973
 974 struct AsmField
 975 {
 976 struct AsmField * prev;
 977 struct AsmField * next;
 978 struct Location loc;
 979 char *  command;
 980 struct Expression * expression;
 981 } __attribute__ ((gcc_struct));
 982
 983 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attribute;
 984
 985 struct Attribute
 986 {
 987 struct Attribute * prev;
 988 struct Attribute * next;
 989 struct Location loc;
 990 char * attr;
 991 struct Expression * exp;
 992 } __attribute__ ((gcc_struct));
 993
 994 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassFunction;
 995
 996 struct ClassFunction
 997 {
 998 struct ClassFunction * prev;
 999 struct ClassFunction * next;
1000 struct Location loc;
1001 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
1002 struct Declarator * declarator;
1003 struct __ecereNameSpace__ecere__sys__OldList *  declarations;
1004 struct Statement * body;
1005 struct __ecereNameSpace__ecere__com__Class * _class;
1006 struct __ecereNameSpace__ecere__sys__OldList attached;
1007 int declMode;
1008 struct Type * type;
1009 struct Symbol * propSet;
1010 unsigned int isVirtual;
1011 unsigned int isConstructor;
1012 unsigned int isDestructor;
1013 unsigned int dontMangle;
1014 int id;
1015 int idCode;
1016 } __attribute__ ((gcc_struct));
1017
1018 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MembersInit;
1019
1020 struct MembersInit
1021 {
1022 struct MembersInit * prev;
1023 struct MembersInit * next;
1024 struct Location loc;
1025 int type;
1026 union
1027 {
1028 struct __ecereNameSpace__ecere__sys__OldList *  dataMembers;
1029 struct ClassFunction * function;
1030 } __attribute__ ((gcc_struct));
1031 } __attribute__ ((gcc_struct));
1032
1033 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MemberInit;
1034
1035 struct MemberInit
1036 {
1037 struct MemberInit * prev;
1038 struct MemberInit * next;
1039 struct Location loc;
1040 struct Location realLoc;
1041 struct __ecereNameSpace__ecere__sys__OldList *  identifiers;
1042 struct Initializer * initializer;
1043 unsigned int used;
1044 unsigned int variable;
1045 unsigned int takeOutExp;
1046 } __attribute__ ((gcc_struct));
1047
1048 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyDef;
1049
1050 struct PropertyDef;
1051
1052 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyWatch;
1053
1054 struct PropertyWatch;
1055
1056 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDef;
1057
1058 struct ClassDef
1059 {
1060 struct ClassDef * prev;
1061 struct ClassDef * next;
1062 struct Location loc;
1063 int type;
1064 union
1065 {
1066 struct Declaration * decl;
1067 struct ClassFunction * function;
1068 struct __ecereNameSpace__ecere__sys__OldList *  defProperties;
1069 struct PropertyDef * propertyDef;
1070 struct PropertyWatch * propertyWatch;
1071 char *  designer;
1072 struct Identifier * defaultProperty;
1073 struct
1074 {
1075 struct Identifier * id;
1076 struct Initializer * initializer;
1077 } __attribute__ ((gcc_struct));
1078 } __attribute__ ((gcc_struct));
1079 int memberAccess;
1080 void *  object;
1081 } __attribute__ ((gcc_struct));
1082
1083 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableEntry;
1084
1085 struct DBTableEntry;
1086
1087 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBIndexItem;
1088
1089 struct DBIndexItem;
1090
1091 extern YYSTYPE yylval;
1092
1093 extern struct Location yylloc;
1094
1095 int outputLine;
1096
1097 unsigned int memoryGuard = 0x0;
1098
1099 void SetMemoryGuard(unsigned int b)
1100 {
1101 memoryGuard = b;
1102 }
1103
1104 unsigned int GetMemoryGuard()
1105 {
1106 return memoryGuard;
1107 }
1108
1109 extern int strcmp(const char * , const char * );
1110
1111 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts;
1112
1113 static void OutputIdentifier(struct Identifier * id, struct __ecereNameSpace__ecere__com__Instance * f)
1114 {
1115 if(id)
1116 {
1117 if(id->_class)
1118 {
1119 if(id->_class->type == 8)
1120 {
1121 if(id->_class->templateParameter && id->_class->templateParameter->identifier && id->_class->templateParameter->identifier->string)
1122 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, id->_class->templateParameter->identifier->string);
1123 }
1124 else
1125 {
1126 if(id->_class->name)
1127 {
1128 if(!strcmp(id->_class->name, "class"))
1129 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "typed_object");
1130 else
1131 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, id->_class->name);
1132 }
1133 }
1134 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "::");
1135 }
1136 }
1137 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, (id && id->string) ? id->string : "(null identifier)");
1138 }
1139
1140 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Putc;
1141
1142 static void OutputOperator(int op, struct __ecereNameSpace__ecere__com__Instance * f)
1143 {
1144 switch(op)
1145 {
1146 case INC_OP:
1147 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "++");
1148 break;
1149 case DEC_OP:
1150 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "--");
1151 break;
1152 case SIZEOF:
1153 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "sizeof ");
1154 break;
1155 case LEFT_OP:
1156 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "<<");
1157 break;
1158 case RIGHT_OP:
1159 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ">>");
1160 break;
1161 case LE_OP:
1162 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "<=");
1163 break;
1164 case GE_OP:
1165 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ">=");
1166 break;
1167 case EQ_OP:
1168 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "==");
1169 break;
1170 case NE_OP:
1171 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "!=");
1172 break;
1173 case AND_OP:
1174 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "&&");
1175 break;
1176 case OR_OP:
1177 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "||");
1178 break;
1179 case MUL_ASSIGN:
1180 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "*=");
1181 break;
1182 case DIV_ASSIGN:
1183 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "/=");
1184 break;
1185 case MOD_ASSIGN:
1186 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "%=");
1187 break;
1188 case ADD_ASSIGN:
1189 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "+=");
1190 break;
1191 case SUB_ASSIGN:
1192 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "-=");
1193 break;
1194 case LEFT_ASSIGN:
1195 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "<<=");
1196 break;
1197 case RIGHT_ASSIGN:
1198 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ">>=");
1199 break;
1200 case AND_ASSIGN:
1201 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "&=");
1202 break;
1203 case XOR_ASSIGN:
1204 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "^=");
1205 break;
1206 case OR_ASSIGN:
1207 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "|=");
1208 break;
1209 case '&':
1210 case '*':
1211 case '+':
1212 case '-':
1213 case '~':
1214 case '!':
1215 case '/':
1216 case '%':
1217 case '<':
1218 case '>':
1219 case '|':
1220 case '^':
1221 case '=':
1222 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, char ch))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Putc])(f, (char)op);
1223 break;
1224 case DELETE:
1225 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "delete ");
1226 break;
1227 }
1228 }
1229
1230 static void OutputSpecifier(struct Specifier * spec, struct __ecereNameSpace__ecere__com__Instance * f, unsigned int typeName);
1231
1232 static void OutputDeclarator(struct Declarator * decl, struct __ecereNameSpace__ecere__com__Instance * f);
1233
1234 void OutputTypeName(struct TypeName * type, struct __ecereNameSpace__ecere__com__Instance * f, unsigned int typeName)
1235 {
1236 if(type->qualifiers)
1237 {
1238 struct Specifier * spec;
1239
1240 for(spec = (*type->qualifiers).first; spec; spec = spec->next)
1241 {
1242 OutputSpecifier(spec, f, typeName);
1243 if(spec->next)
1244 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1245 }
1246 }
1247 if(type->declarator)
1248 {
1249 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1250 OutputDeclarator(type->declarator, f);
1251 }
1252 if(!type->qualifiers && !type->declarator)
1253 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "...");
1254 }
1255
1256 static void OutputStatement(struct Statement * stmt, struct __ecereNameSpace__ecere__com__Instance * f);
1257
1258 static void OutputInstance(struct Instantiation * inst, struct __ecereNameSpace__ecere__com__Instance * f);
1259
1260 extern int printf(char * , ...);
1261
1262 static void OutputInitializer(struct Initializer * initializer, struct __ecereNameSpace__ecere__com__Instance * f);
1263
1264 void OutputExpression(struct Expression * exp, struct __ecereNameSpace__ecere__com__Instance * f)
1265 {
1266 switch(exp->type)
1267 {
1268 case 26:
1269 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "class(");
1270 if(exp->_classExp.specifiers)
1271 {
1272 struct Specifier * spec;
1273
1274 for(spec = (*exp->_classExp.specifiers).first; spec; spec = spec->next)
1275 {
1276 OutputSpecifier(spec, f, 0x0);
1277 if(spec->next)
1278 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1279 }
1280 if(exp->_classExp.decl)
1281 {
1282 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1283 OutputDeclarator(exp->_classExp.decl, f);
1284 }
1285 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
1286 }
1287 break;
1288 case 25:
1289 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "__extension__ (");
1290 OutputStatement(exp->compound, f);
1291 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
1292 break;
1293 case 13:
1294 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "new ");
1295 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1296 OutputTypeName(exp->_renew.typeName, f, 0x0);
1297 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "[");
1298 OutputExpression(exp->_renew.size, f);
1299 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "]");
1300 break;
1301 case 28:
1302 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "new0 ");
1303 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1304 OutputTypeName(exp->_renew.typeName, f, 0x0);
1305 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "[");
1306 OutputExpression(exp->_renew.size, f);
1307 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "]");
1308 break;
1309 case 14:
1310 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "renew ");
1311 OutputExpression(exp->_renew.exp, f);
1312 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1313 OutputTypeName(exp->_renew.typeName, f, 0x0);
1314 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "[");
1315 OutputExpression(exp->_renew.size, f);
1316 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "]");
1317 break;
1318 case 29:
1319 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "renew0 ");
1320 OutputExpression(exp->_renew.exp, f);
1321 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1322 OutputTypeName(exp->_renew.typeName, f, 0x0);
1323 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "[");
1324 OutputExpression(exp->_renew.size, f);
1325 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "]");
1326 break;
1327 case 0:
1328 if(exp->identifier)
1329 OutputIdentifier(exp->identifier, f);
1330 break;
1331 case 1:
1332 if(exp->instance)
1333 OutputInstance(exp->instance, f);
1334 break;
1335 case 2:
1336 if(exp->constant)
1337 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, exp->constant);
1338 else
1339 printf("");
1340 break;
1341 case 3:
1342 if(exp->string)
1343 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, exp->string);
1344 break;
1345 case 4:
1346 if(exp->op.exp1)
1347 {
1348 OutputExpression(exp->op.exp1, f);
1349 if(exp->op.exp2)
1350 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1351 }
1352 OutputOperator(exp->op.op, f);
1353 if(exp->op.exp2)
1354 {
1355 if(exp->op.exp1 || (exp->op.exp2->type == 4 && !exp->op.exp2->op.exp1 && exp->op.exp2->op.op == exp->op.op))
1356 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1357 OutputExpression(exp->op.exp2, f);
1358 }
1359 break;
1360 case 34:
1361 case 5:
1362 {
1363 struct Expression * expression;
1364
1365 if(exp->type == 34)
1366 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "__extension__ (");
1367 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "(");
1368 if(exp->list)
1369 {
1370 for(expression = (*exp->list).first; expression; expression = expression->next)
1371 {
1372 OutputExpression(expression, f);
1373 if(expression->next)
1374 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1375 }
1376 }
1377 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
1378 break;
1379 }
1380 case 6:
1381 {
1382 struct Expression * expression;
1383
1384 if(exp->index.exp)
1385 OutputExpression(exp->index.exp, f);
1386 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "[");
1387 if(exp->index.index)
1388 for(expression = (*exp->index.index).first; expression; expression = expression->next)
1389 {
1390 OutputExpression(expression, f);
1391 if(expression->next)
1392 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1393 }
1394 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "]");
1395 break;
1396 }
1397 case 7:
1398 {
1399 OutputExpression(exp->call.exp, f);
1400 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "(");
1401 if(exp->call.arguments)
1402 {
1403 struct Expression * expression;
1404
1405 for(expression = (*exp->call.arguments).first; expression; expression = expression->next)
1406 {
1407 OutputExpression(expression, f);
1408 if(expression->next)
1409 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1410 }
1411 }
1412 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
1413 break;
1414 }
1415 case 8:
1416 if(exp->member.exp)
1417 OutputExpression(exp->member.exp, f);
1418 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ".");
1419 if(exp->member.member)
1420 OutputIdentifier(exp->member.member, f);
1421 break;
1422 case 9:
1423 OutputExpression(exp->member.exp, f);
1424 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "->");
1425 OutputIdentifier(exp->member.member, f);
1426 break;
1427 case 10:
1428 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "sizeof(");
1429 OutputTypeName(exp->typeName, f, 0x0);
1430 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
1431 break;
1432 case 38:
1433 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "__alignof__(");
1434 OutputTypeName(exp->typeName, f, 0x0);
1435 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
1436 break;
1437 case 35:
1438 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "__extension__ (");
1439 if(exp->initializer.typeName)
1440 OutputTypeName(exp->initializer.typeName, f, 0x0);
1441 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
1442 if(exp->initializer.initializer)
1443 OutputInitializer(exp->initializer.initializer, f);
1444 break;
1445 case 11:
1446 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "(");
1447 OutputTypeName(exp->cast.typeName, f, 0x0);
1448 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
1449 if(exp->cast.exp)
1450 OutputExpression(exp->cast.exp, f);
1451 break;
1452 case 12:
1453 OutputExpression(exp->cond.cond, f);
1454 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ? ");
1455 {
1456 struct Expression * expression;
1457
1458 for(expression = (*exp->cond.exp).first; expression; expression = expression->next)
1459 {
1460 OutputExpression(expression, f);
1461 if(expression->next)
1462 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1463 }
1464 }
1465 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " : ");
1466 OutputExpression(exp->cond.elseExp, f);
1467 break;
1468 case 36:
1469 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "__builtin_va_arg(");
1470 OutputExpression(exp->vaArg.exp, f);
1471 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1472 OutputTypeName(exp->vaArg.typeName, f, 0x0);
1473 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
1474 break;
1475 case 37:
1476 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "[");
1477 if(exp->list)
1478 {
1479 struct Expression * expression;
1480
1481 for(expression = (*exp->list).first; expression; expression = expression->next)
1482 {
1483 OutputExpression(expression, f);
1484 if(expression->next)
1485 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1486 }
1487 }
1488 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "]");
1489 break;
1490 }
1491 }
1492
1493 static void OutputAsmField(struct AsmField * field, struct __ecereNameSpace__ecere__com__Instance * f)
1494 {
1495 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, field->command);
1496 if(field->expression)
1497 {
1498 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "(");
1499 OutputExpression(field->expression, f);
1500 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
1501 }
1502 }
1503
1504 extern char *  strchr(const char * , int);
1505
1506 extern char *  __ecereNameSpace__ecere__sys__StripLastDirectory(char *  string, char *  output);
1507
1508 extern char *  sourceFile;
1509
1510 extern char *  __ecereNameSpace__ecere__sys__PathCat(char *  string, char *  addedPath);
1511
1512 extern void __ecereNameSpace__ecere__sys__ChangeCh(char *  string, char ch1, char ch2);
1513
1514 static void GetSourceName(char * name, const char * src)
1515 {
1516 name[0] = (char)0;
1517 if(src)
1518 {
1519 if(!strchr(src, '/') && !strchr(src, '\\'))
1520 __ecereNameSpace__ecere__sys__StripLastDirectory(sourceFile, name);
1521 __ecereNameSpace__ecere__sys__PathCat(name, src);
1522 }
1523 else if(sourceFile)
1524 __ecereNameSpace__ecere__sys__PathCat(name, sourceFile);
1525 __ecereNameSpace__ecere__sys__ChangeCh(name, '\\', '/');
1526 }
1527
1528 extern unsigned int inCompiler;
1529
1530 extern char *  GetIncludeFileFromID(int id);
1531
1532 extern char *  outputFile;
1533
1534 extern unsigned int outputLineNumbers;
1535
1536 static void OutputDeclaration(struct Declaration * decl, struct __ecereNameSpace__ecere__com__Instance * f);
1537
1538 extern struct __ecereNameSpace__ecere__sys__OldList *  MkList(void);
1539
1540 extern struct Declarator * SpecDeclFromString(char *  string, struct __ecereNameSpace__ecere__sys__OldList *  specs, struct Declarator * baseDecl);
1541
1542 extern struct Declarator * MkDeclaratorIdentifier(struct Identifier * id);
1543
1544 extern struct Identifier * MkIdentifier(char *  string);
1545
1546 extern struct __ecereNameSpace__ecere__sys__OldList *  CopyList(struct __ecereNameSpace__ecere__sys__OldList *  source, void *  (*  CopyFunction)(void * ));
1547
1548 extern struct Specifier * CopySpecifier(struct Specifier * spec);
1549
1550 extern struct Declarator * PlugDeclarator(struct Declarator * decl, struct Declarator * baseDecl);
1551
1552 extern void ListAdd(struct __ecereNameSpace__ecere__sys__OldList * list, void *  item);
1553
1554 extern struct Specifier * MkSpecifierName(char *  name);
1555
1556 extern void PrintTypeNoConst(struct Type * type, char *  string, unsigned int printName, unsigned int fullName);
1557
1558 extern struct TypeName * MkTypeName(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Declarator * declarator);
1559
1560 extern void InstDeclPassTypeName(struct TypeName * type, unsigned int param);
1561
1562 extern void FreeTypeName(struct TypeName * typeName);
1563
1564 int __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(struct __ecereNameSpace__ecere__com__Instance * this, char *  format, ...);
1565
1566 static void OutputStatement(struct Statement * stmt, struct __ecereNameSpace__ecere__com__Instance * f)
1567 {
1568 char name[274] = "";
1569 char origName[274] = "";
1570
1571 if(inCompiler)
1572 {
1573 GetSourceName(name, stmt->loc.start.included ? GetIncludeFileFromID(stmt->loc.start.included) : (((void *)0)));
1574 __ecereNameSpace__ecere__sys__PathCat(origName, outputFile);
1575 __ecereNameSpace__ecere__sys__ChangeCh(origName, '\\', '/');
1576 }
1577 if(inCompiler && outputLineNumbers && stmt->loc.start.line)
1578 {
1579 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n#line %d \"%s\"\n", stmt->loc.start.line, name);
1580 outputLine += 2;
1581 }
1582 switch(stmt->type)
1583 {
1584 case 14:
1585 OutputDeclaration(stmt->decl, f);
1586 break;
1587 case 0:
1588 OutputIdentifier(stmt->labeled.id, f);
1589 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ":\n");
1590 outputLine++;
1591 OutputStatement(stmt->labeled.stmt, f);
1592 break;
1593 case 1:
1594 if(stmt->caseStmt.exp)
1595 {
1596 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "case ");
1597 OutputExpression(stmt->caseStmt.exp, f);
1598 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ":\n");
1599 outputLine++;
1600 }
1601 else
1602 {
1603 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "default:\n");
1604 outputLine++;
1605 }
1606 if(stmt->caseStmt.stmt)
1607 OutputStatement(stmt->caseStmt.stmt, f);
1608 break;
1609 case 2:
1610 {
1611 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "{\n");
1612 outputLine++;
1613 if(stmt->compound.declarations)
1614 {
1615 struct Declaration * decl;
1616
1617 for(decl = (*stmt->compound.declarations).first; decl; decl = decl->next)
1618 {
1619 OutputDeclaration(decl, f);
1620 }
1621 }
1622 if(stmt->compound.statements)
1623 {
1624 struct Statement * statement;
1625
1626 if(stmt->compound.declarations)
1627 {
1628 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
1629 outputLine++;
1630 }
1631 for(statement = (*stmt->compound.statements).first; statement; statement = statement->next)
1632 {
1633 OutputStatement(statement, f);
1634 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
1635 outputLine++;
1636 }
1637 }
1638 if(inCompiler && outputLineNumbers && stmt->loc.end.line)
1639 {
1640 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n#line %d \"%s\"\n", stmt->loc.end.line, name);
1641 outputLine += 2;
1642 }
1643 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "}");
1644 break;
1645 }
1646 case 3:
1647 {
1648 if(stmt->expressions)
1649 {
1650 struct Expression * exp;
1651
1652 for(exp = (*stmt->expressions).first; exp; exp = exp->next)
1653 {
1654 OutputExpression(exp, f);
1655 if(exp->next)
1656 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1657 }
1658 }
1659 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ";");
1660 break;
1661 }
1662 case 4:
1663 {
1664 struct Expression * exp;
1665
1666 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "if(");
1667 for(exp = (*stmt->ifStmt.exp).first; exp; exp = exp->next)
1668 {
1669 OutputExpression(exp, f);
1670 if(exp->next)
1671 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1672 }
1673 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")\n");
1674 outputLine++;
1675 if(stmt->ifStmt.stmt)
1676 OutputStatement(stmt->ifStmt.stmt, f);
1677 if(stmt->ifStmt.elseStmt)
1678 {
1679 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
1680 outputLine++;
1681 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "else");
1682 if(stmt->ifStmt.elseStmt->type != 4)
1683 {
1684 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
1685 outputLine++;
1686 }
1687 else
1688 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1689 OutputStatement(stmt->ifStmt.elseStmt, f);
1690 }
1691 break;
1692 }
1693 case 5:
1694 {
1695 struct Expression * exp;
1696
1697 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "switch(");
1698 for(exp = (*stmt->switchStmt.exp).first; exp; exp = exp->next)
1699 {
1700 OutputExpression(exp, f);
1701 if(exp->next)
1702 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1703 }
1704 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")\n");
1705 outputLine++;
1706 OutputStatement(stmt->switchStmt.stmt, f);
1707 break;
1708 }
1709 case 6:
1710 {
1711 struct Expression * exp;
1712
1713 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "while(");
1714 for(exp = (*stmt->switchStmt.exp).first; exp; exp = exp->next)
1715 {
1716 OutputExpression(exp, f);
1717 if(exp->next)
1718 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1719 }
1720 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")\n");
1721 outputLine++;
1722 OutputStatement(stmt->whileStmt.stmt, f);
1723 break;
1724 }
1725 case 7:
1726 {
1727 struct Expression * exp;
1728
1729 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "do\n");
1730 outputLine++;
1731 OutputStatement(stmt->whileStmt.stmt, f);
1732 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "while(");
1733 for(exp = (*stmt->switchStmt.exp).first; exp; exp = exp->next)
1734 {
1735 OutputExpression(exp, f);
1736 if(exp->next)
1737 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1738 }
1739 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ");");
1740 break;
1741 }
1742 case 8:
1743 {
1744 struct Expression * exp;
1745
1746 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "for(");
1747 OutputStatement(stmt->forStmt.init, f);
1748 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1749 OutputStatement(stmt->forStmt.check, f);
1750 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1751 if(stmt->forStmt.increment)
1752 {
1753 if(inCompiler && outputLineNumbers && stmt->loc.end.line)
1754 {
1755 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n#line %d \"%s\"\n", stmt->loc.end.line, name);
1756 outputLine += 2;
1757 }
1758 for(exp = (*stmt->forStmt.increment).first; exp; exp = exp->next)
1759 {
1760 OutputExpression(exp, f);
1761 if(exp->next)
1762 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1763 }
1764 }
1765 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")\n");
1766 outputLine++;
1767 OutputStatement(stmt->forStmt.stmt, f);
1768 break;
1769 }
1770 case 9:
1771 {
1772 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "goto ");
1773 OutputIdentifier(stmt->gotoStmt.id, f);
1774 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ";");
1775 break;
1776 }
1777 case 10:
1778 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "continue;");
1779 break;
1780 case 11:
1781 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "break;");
1782 break;
1783 case 12:
1784 {
1785 struct Expression * exp;
1786
1787 if(inCompiler && memoryGuard)
1788 {
1789 struct Expression * exp = stmt->expressions ? (*stmt->expressions).last : (((void *)0));
1790
1791 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "{ ");
1792 if(exp && exp->expType)
1793 {
1794 char string[1024] = "";
1795 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1796 struct Declarator * decl;
1797 struct TypeName * typeName;
1798
1799 if(exp->expType->kind == 20)
1800 {
1801 if(exp->expType->templateParameter->dataTypeString)
1802 decl = SpecDeclFromString(exp->expType->templateParameter->dataTypeString, specs, MkDeclaratorIdentifier(MkIdentifier("__ecereReturnVal")));
1803 else if(exp->expType->templateParameter->dataType)
1804 {
1805 (__ecereNameSpace__ecere__com__eSystem_Delete(specs), specs = 0);
1806 specs = CopyList(exp->expType->templateParameter->dataType->specifiers, CopySpecifier);
1807 decl = PlugDeclarator(exp->expType->templateParameter->dataType->decl, MkDeclaratorIdentifier(MkIdentifier("__ecereReturnVal")));
1808 }
1809 else
1810 {
1811 ListAdd(specs, MkSpecifierName("uint64"));
1812 decl = MkDeclaratorIdentifier(MkIdentifier("__ecereReturnVal"));
1813 }
1814 }
1815 else
1816 {
1817 PrintTypeNoConst(exp->expType, string, exp->expType->kind == 18 ? 0x1 : 0x0, 0x1);
1818 decl = SpecDeclFromString(string, specs, MkDeclaratorIdentifier(MkIdentifier("__ecereReturnVal")));
1819 }
1820 typeName = MkTypeName(specs, decl);
1821 InstDeclPassTypeName(typeName, 0x0);
1822 OutputTypeName(typeName, f, 0x0);
1823 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";");
1824 FreeTypeName(typeName);
1825 }
1826 }
1827 if(!memoryGuard)
1828 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "return ");
1829 else
1830 {
1831 struct Expression * exp = stmt->expressions ? (*stmt->expressions).last : (((void *)0));
1832
1833 if(exp && exp->expType)
1834 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "__ecereReturnVal = ");
1835 }
1836 if(stmt->expressions)
1837 {
1838 for(exp = (*stmt->expressions).first; exp; exp = exp->next)
1839 {
1840 OutputExpression(exp, f);
1841 if(exp->next)
1842 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
1843 }
1844 }
1845 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ";");
1846 if(inCompiler && memoryGuard)
1847 {
1848 struct Expression * exp = stmt->expressions ? (struct Expression *)(*stmt->expressions).last : (((void *)0));
1849
1850 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " __ecereNameSpace__ecere__com__MemoryGuard_PopLoc();");
1851 if(exp && exp->expType)
1852 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "return __ecereReturnVal;");
1853 else
1854 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "return;");
1855 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "}");
1856 }
1857 break;
1858 }
1859 case 13:
1860 {
1861 struct AsmField * field;
1862
1863 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "__asm__ ");
1864 if(stmt->asmStmt.spec)
1865 OutputSpecifier(stmt->asmStmt.spec, f, 0x0);
1866 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "(");
1867 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, stmt->asmStmt.statements);
1868 if(stmt->asmStmt.inputFields || stmt->asmStmt.outputFields || stmt->asmStmt.clobberedFields)
1869 {
1870 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ":");
1871 if(stmt->asmStmt.inputFields)
1872 {
1873 for(field = (*stmt->asmStmt.inputFields).first; field; field = field->next)
1874 {
1875 if(field->prev)
1876 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ",");
1877 OutputAsmField(field, f);
1878 }
1879 }
1880 }
1881 if(stmt->asmStmt.outputFields || stmt->asmStmt.clobberedFields)
1882 {
1883 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ":");
1884 if(stmt->asmStmt.outputFields)
1885 {
1886 for(field = (*stmt->asmStmt.outputFields).first; field; field = field->next)
1887 {
1888 if(field->prev)
1889 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ",");
1890 OutputAsmField(field, f);
1891 }
1892 }
1893 }
1894 if(stmt->asmStmt.clobberedFields)
1895 {
1896 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ":");
1897 for(field = (*stmt->asmStmt.clobberedFields).first; field; field = field->next)
1898 {
1899 if(field->prev)
1900 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ",");
1901 OutputAsmField(field, f);
1902 }
1903 }
1904 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ");\n");
1905 outputLine++;
1906 break;
1907 }
1908 }
1909 if(inCompiler && outputLineNumbers && stmt->loc.start.line)
1910 {
1911 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n#line %d \"%s\"\n", outputLine + 2, origName);
1912 outputLine += 2;
1913 }
1914 }
1915
1916 static void OutputPointer(struct Pointer * ptr, struct __ecereNameSpace__ecere__com__Instance * f)
1917 {
1918 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "*");
1919 if(ptr->qualifiers)
1920 {
1921 struct Specifier * spec;
1922
1923 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1924 for(spec = (*ptr->qualifiers).first; spec; spec = spec->next)
1925 {
1926 OutputSpecifier(spec, f, 0x0);
1927 if(spec->next)
1928 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1929 }
1930 }
1931 if(ptr->pointer)
1932 {
1933 OutputPointer(ptr->pointer, f);
1934 }
1935 }
1936
1937 static void OutputAttrib(struct Attrib * attr, struct __ecereNameSpace__ecere__com__Instance * f);
1938
1939 static void OutputExtDecl(struct ExtDecl * extDecl, struct __ecereNameSpace__ecere__com__Instance * f);
1940
1941 extern void ProcessExpressionType(struct Expression * exp);
1942
1943 extern void ComputeExpression(struct Expression * exp);
1944
1945 static void OutputDeclarator(struct Declarator * decl, struct __ecereNameSpace__ecere__com__Instance * f)
1946 {
1947 switch(decl->type)
1948 {
1949 case 0:
1950 if(decl->declarator)
1951 {
1952 OutputDeclarator(decl->declarator, f);
1953 }
1954 if(decl->structDecl.exp)
1955 {
1956 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " : ");
1957 OutputExpression(decl->structDecl.exp, f);
1958 }
1959 if(decl->structDecl.posExp)
1960 {
1961 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " : ");
1962 OutputExpression(decl->structDecl.posExp, f);
1963 }
1964 if(decl->structDecl.attrib)
1965 {
1966 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1967 OutputAttrib(decl->structDecl.attrib, f);
1968 }
1969 break;
1970 case 1:
1971 OutputIdentifier(decl->identifier, f);
1972 break;
1973 case 2:
1974 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "(");
1975 OutputDeclarator(decl->declarator, f);
1976 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
1977 break;
1978 case 6:
1979 if(decl->extended.extended)
1980 OutputExtDecl(decl->extended.extended, f);
1981 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1982 OutputDeclarator(decl->declarator, f);
1983 break;
1984 case 7:
1985 OutputDeclarator(decl->declarator, f);
1986 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
1987 if(decl->extended.extended)
1988 OutputExtDecl(decl->extended.extended, f);
1989 break;
1990 case 3:
1991 if(decl->declarator)
1992 {
1993 OutputDeclarator(decl->declarator, f);
1994 }
1995 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "[");
1996 if(decl->array.exp)
1997 {
1998 ProcessExpressionType(decl->array.exp);
1999 ComputeExpression(decl->array.exp);
2000 OutputExpression(decl->array.exp, f);
2001 }
2002 else if(decl->array.enumClass)
2003 {
2004 struct Symbol * _class = decl->array.enumClass->symbol;
2005
2006 if(_class && _class->registered)
2007 {
2008 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "%d", (int)__ecereNameSpace__ecere__com__eClass_GetProperty(_class->registered, "enumSize"));
2009 }
2010 }
2011 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "]");
2012 break;
2013 case 4:
2014 {
2015 struct TypeName * param;
2016
2017 if(decl->declarator)
2018 OutputDeclarator(decl->declarator, f);
2019 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "(");
2020 if(decl->function.parameters && (*decl->function.parameters).first)
2021 {
2022 for(param = (*decl->function.parameters).first; param; param = param->next)
2023 {
2024 OutputTypeName(param, f, 0x0);
2025 if(param->next)
2026 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
2027 }
2028 }
2029 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
2030 break;
2031 }
2032 case 5:
2033 if(decl->pointer.pointer)
2034 OutputPointer(decl->pointer.pointer, f);
2035 if(decl->declarator)
2036 {
2037 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2038 OutputDeclarator(decl->declarator, f);
2039 }
2040 break;
2041 }
2042 }
2043
2044 static void OutputEnumerator(struct Enumerator * enumerator, struct __ecereNameSpace__ecere__com__Instance * f)
2045 {
2046 OutputIdentifier(enumerator->id, f);
2047 if(enumerator->exp)
2048 {
2049 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " = ");
2050 OutputExpression(enumerator->exp, f);
2051 }
2052 }
2053
2054 static void OutputAttribute(struct Attribute * attr, struct __ecereNameSpace__ecere__com__Instance * f)
2055 {
2056 if(attr->attr)
2057 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, attr->attr);
2058 if(attr->exp)
2059 {
2060 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2061 OutputExpression(attr->exp, f);
2062 }
2063 }
2064
2065 static void OutputAttrib(struct Attrib * attr, struct __ecereNameSpace__ecere__com__Instance * f)
2066 {
2067 switch(attr->type)
2068 {
2069 case ATTRIB:
2070 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "__attribute__((");
2071 break;
2072 case __ATTRIB:
2073 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "__attribute((");
2074 break;
2075 case ATTRIB_DEP:
2076 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "__attribute_deprecated__((");
2077 break;
2078 }
2079 if(attr->attribs)
2080 {
2081 struct Attribute * attrib;
2082
2083 for(attrib = (*attr->attribs).first; attrib; attrib = attrib->next)
2084 {
2085 if(attrib->prev)
2086 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2087 OutputAttribute(attrib, f);
2088 }
2089 }
2090 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "))");
2091 }
2092
2093 static void OutputExtDecl(struct ExtDecl * extDecl, struct __ecereNameSpace__ecere__com__Instance * f)
2094 {
2095 if(extDecl->type == 0 && extDecl->s)
2096 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, extDecl->s);
2097 else if(extDecl->type == 1)
2098 OutputAttrib(extDecl->attr, f);
2099 }
2100
2101 extern struct Symbol * FindClass(char *  name);
2102
2103 static void OutputClassDef(struct ClassDef * def, struct __ecereNameSpace__ecere__com__Instance * f);
2104
2105 static void OutputSpecifier(struct Specifier * spec, struct __ecereNameSpace__ecere__com__Instance * f, unsigned int typeName)
2106 {
2107 switch(spec->type)
2108 {
2109 case 0:
2110 switch(spec->specifier)
2111 {
2112 case TYPEDEF:
2113 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "typedef");
2114 break;
2115 case EXTERN:
2116 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "extern");
2117 break;
2118 case STATIC:
2119 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "static");
2120 break;
2121 case AUTO:
2122 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "auto");
2123 break;
2124 case REGISTER:
2125 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "register");
2126 break;
2127 case CONST:
2128 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "const");
2129 break;
2130 case VOLATILE:
2131 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "volatile");
2132 break;
2133 case VOID:
2134 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "void");
2135 break;
2136 case CHAR:
2137 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "char");
2138 break;
2139 case SHORT:
2140 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "short");
2141 break;
2142 case INT:
2143 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "int");
2144 break;
2145 case UINT:
2146 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, typeName ? "uint" : "unsigned int");
2147 break;
2148 case INT64:
2149 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, typeName ? "int64" : "long long");
2150 break;
2151 case VALIST:
2152 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "__builtin_va_list");
2153 break;
2154 case LONG:
2155 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "long");
2156 break;
2157 case FLOAT:
2158 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "float");
2159 break;
2160 case DOUBLE:
2161 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "double");
2162 break;
2163 case SIGNED:
2164 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "signed");
2165 break;
2166 case UNSIGNED:
2167 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "unsigned");
2168 break;
2169 case TYPED_OBJECT:
2170 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "typed_object");
2171 break;
2172 case ANY_OBJECT:
2173 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "any_object");
2174 break;
2175 case CLASS:
2176 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "class");
2177 break;
2178 case THISCLASS:
2179 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "thisclass");
2180 break;
2181 }
2182 break;
2183 case 5:
2184 if(spec->extDecl)
2185 OutputExtDecl(spec->extDecl, f);
2186 break;
2187 case 1:
2188 if(spec->name && !strcmp(spec->name, "class"))
2189 {
2190 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "typed_object");
2191 }
2192 else
2193 {
2194 struct Symbol * symbol = spec->symbol;
2195
2196 if(!symbol && spec->name)
2197 symbol = FindClass(spec->name);
2198 if(symbol)
2199 {
2200 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, symbol->string ? symbol->string : "(null)");
2201 }
2202 else if(spec->name)
2203 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, spec->name);
2204 }
2205 break;
2206 case 2:
2207 {
2208 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "enum");
2209 if(spec->id)
2210 {
2211 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2212 OutputIdentifier(spec->id, f);
2213 }
2214 if(spec->list)
2215 {
2216 struct Enumerator * enumerator;
2217
2218 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n{\n");
2219 outputLine += 2;
2220 for(enumerator = (*spec->list).first; enumerator; enumerator = enumerator->next)
2221 {
2222 OutputEnumerator(enumerator, f);
2223 if(enumerator->next)
2224 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
2225 }
2226 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n}");
2227 outputLine++;
2228 }
2229 break;
2230 }
2231 case 3:
2232 case 4:
2233 {
2234 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, (spec->type == 3) ? "struct" : "union");
2235 if(spec->extDeclStruct)
2236 {
2237 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2238 OutputExtDecl(spec->extDeclStruct, f);
2239 }
2240 if(spec->id)
2241 {
2242 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2243 OutputIdentifier(spec->id, f);
2244 }
2245 if(spec->definitions)
2246 {
2247 struct ClassDef * def;
2248
2249 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n{\n");
2250 outputLine += 2;
2251 for(def = (*spec->definitions).first; def; def = def->next)
2252 {
2253 OutputClassDef(def, f);
2254 }
2255 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "} __attribute__ ((gcc_struct))");
2256 }
2257 break;
2258 }
2259 case 6:
2260 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "__typeof(");
2261 OutputExpression(spec->expression, f);
2262 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
2263 break;
2264 case 7:
2265 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "subclass(");
2266 OutputSpecifier(spec->_class, f, 0x0);
2267 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ")");
2268 break;
2269 case 8:
2270 OutputIdentifier(spec->templateParameter->identifier, f);
2271 break;
2272 }
2273 }
2274
2275 static void OutputInitializer(struct Initializer * initializer, struct __ecereNameSpace__ecere__com__Instance * f)
2276 {
2277 char name[274] = "";
2278 char origName[274] = "";
2279
2280 if(inCompiler)
2281 {
2282 GetSourceName(name, initializer->loc.start.included ? GetIncludeFileFromID(initializer->loc.start.included) : (((void *)0)));
2283 __ecereNameSpace__ecere__sys__PathCat(origName, outputFile);
2284 __ecereNameSpace__ecere__sys__ChangeCh(origName, '\\', '/');
2285 }
2286 switch(initializer->type)
2287 {
2288 case 1:
2289 {
2290 struct Initializer * init;
2291
2292 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n{\n");
2293 outputLine += 2;
2294 if(inCompiler && outputLineNumbers && initializer->loc.start.line)
2295 {
2296 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n#line %d \"%s\"\n", initializer->loc.start.line, name);
2297 outputLine += 2;
2298 }
2299 for(init = (*initializer->list).first; init; init = init->next)
2300 {
2301 OutputInitializer(init, f);
2302 if(init->next)
2303 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
2304 }
2305 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n}");
2306 if(inCompiler && outputLineNumbers && initializer->loc.start.line)
2307 {
2308 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n#line %d \"%s\"\n", initializer->loc.start.line, name);
2309 outputLine += 2;
2310 }
2311 outputLine++;
2312 break;
2313 }
2314 case 0:
2315 if(initializer->exp)
2316 OutputExpression(initializer->exp, f);
2317 break;
2318 }
2319 }
2320
2321 static void OutputInitDeclarator(struct InitDeclarator * decl, struct __ecereNameSpace__ecere__com__Instance * f)
2322 {
2323 OutputDeclarator(decl->declarator, f);
2324 if(decl->initializer)
2325 {
2326 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " = ");
2327 OutputInitializer(decl->initializer, f);
2328 }
2329 }
2330
2331 static void OutputDeclaration(struct Declaration * decl, struct __ecereNameSpace__ecere__com__Instance * f)
2332 {
2333 struct Specifier * spec;
2334 char origName[274] = "";
2335
2336 switch(decl->type)
2337 {
2338 case 1:
2339 {
2340 struct InitDeclarator * d;
2341
2342 if(inCompiler)
2343 {
2344 __ecereNameSpace__ecere__sys__PathCat(origName, outputFile);
2345 __ecereNameSpace__ecere__sys__ChangeCh(origName, '\\', '/');
2346 }
2347 if(decl->declarators && (*decl->declarators).first)
2348 {
2349 for(d = (*decl->declarators).first; d; d = d->next)
2350 if(d->initializer)
2351 {
2352 char name[274] = "";
2353
2354 GetSourceName(name, decl->loc.start.included ? GetIncludeFileFromID(decl->loc.start.included) : (((void *)0)));
2355 if(inCompiler && outputLineNumbers && decl->loc.start.line)
2356 {
2357 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n#line %d \"%s\"\n", decl->loc.start.line, name);
2358 outputLine += 2;
2359 }
2360 break;
2361 }
2362 }
2363 if(decl->specifiers)
2364 {
2365 unsigned int inTypeDef = 0x0;
2366
2367 for(spec = (*decl->specifiers).first; spec; spec = spec->next)
2368 {
2369 if(spec->type == 0 && spec->specifier == TYPEDEF)
2370 inTypeDef = 0x1;
2371 OutputSpecifier(spec, f, inTypeDef && !spec->next);
2372 if(spec->next)
2373 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2374 }
2375 }
2376 if(decl->declarators && (*decl->declarators).first)
2377 {
2378 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2379 for(d = (*decl->declarators).first; d; d = d->next)
2380 {
2381 OutputInitDeclarator(d, f);
2382 if(d->next)
2383 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
2384 }
2385 }
2386 break;
2387 }
2388 case 0:
2389 {
2390 if(decl->specifiers)
2391 {
2392 for(spec = (*decl->specifiers).first; spec; spec = spec->next)
2393 {
2394 OutputSpecifier(spec, f, 0x0);
2395 if(spec->next)
2396 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2397 }
2398 }
2399 if(decl->declarators)
2400 {
2401 struct Declarator * d;
2402
2403 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2404 for(d = (*decl->declarators).first; d; d = d->next)
2405 {
2406 OutputDeclarator(d, f);
2407 if(d->next)
2408 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
2409 }
2410 }
2411 if(decl->extStorage)
2412 {
2413 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2414 OutputSpecifier(decl->extStorage, f, 0x0);
2415 }
2416 break;
2417 }
2418 case 2:
2419 if(decl->inst)
2420 {
2421 OutputInstance(decl->inst, f);
2422 }
2423 break;
2424 case 3:
2425 return ;
2426 }
2427 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ";\n");
2428 outputLine++;
2429 if(inCompiler && outputLineNumbers && decl->loc.start.line && decl->type == 1)
2430 {
2431 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n#line %d \"%s\"\n", outputLine + 2, origName);
2432 outputLine += 2;
2433 }
2434 }
2435
2436 static struct FunctionDefinition * curFunction;
2437
2438 extern struct Identifier * GetDeclId(struct Declarator * decl);
2439
2440 static void OutputFunction(struct FunctionDefinition * func, struct __ecereNameSpace__ecere__com__Instance * f)
2441 {
2442 struct FunctionDefinition * oldFunc = curFunction;
2443
2444 curFunction = func;
2445 if(func->specifiers)
2446 {
2447 struct Specifier * spec;
2448
2449 for(spec = (*func->specifiers).first; spec; spec = spec->next)
2450 {
2451 OutputSpecifier(spec, f, 0x0);
2452 if(spec->next)
2453 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2454 }
2455 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2456 }
2457 if(func->declarator)
2458 OutputDeclarator(func->declarator, f);
2459 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2460 outputLine++;
2461 if(func->declarations)
2462 {
2463 struct Declaration * decl;
2464
2465 for(decl = (*func->declarations).first; decl; decl = decl->next)
2466 {
2467 OutputDeclaration(decl, f);
2468 }
2469 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2470 outputLine++;
2471 }
2472 if(func->body)
2473 {
2474 if(inCompiler && memoryGuard)
2475 {
2476 char name[1024] = "";
2477 struct Identifier * id = GetDeclId(func->declarator);
2478
2479 GetSourceName(name, func->loc.start.included ? GetIncludeFileFromID(func->loc.start.included) : (((void *)0)));
2480 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "{\n");
2481 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereNameSpace__ecere__com__MemoryGuard_PushLoc(\"%s:%s\");\n", name, id->string);
2482 outputLine += 2;
2483 }
2484 OutputStatement(func->body, f);
2485 if(inCompiler && memoryGuard)
2486 {
2487 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereNameSpace__ecere__com__MemoryGuard_PopLoc();\n");
2488 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "}\n");
2489 outputLine += 2;
2490 }
2491 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2492 outputLine++;
2493 }
2494 curFunction = oldFunc;
2495 }
2496
2497 static void OutputMemberInit(struct MemberInit * init, struct __ecereNameSpace__ecere__com__Instance * f)
2498 {
2499 if(init->identifiers)
2500 {
2501 if((*init->identifiers).count > 1)
2502 {
2503 struct Identifier * id;
2504
2505 for(id = (*init->identifiers).first; id; id = id->next)
2506 {
2507 OutputIdentifier(id, f);
2508 if(id->next)
2509 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ".");
2510 }
2511 }
2512 else if((*init->identifiers).first)
2513 OutputIdentifier((*init->identifiers).first, f);
2514 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " = ");
2515 }
2516 if(init->initializer)
2517 OutputInitializer(init->initializer, f);
2518 }
2519
2520 static void OutputClassFunction(struct ClassFunction * func, struct __ecereNameSpace__ecere__com__Instance * f);
2521
2522 static void OutputMembersInit(struct MembersInit * init, struct __ecereNameSpace__ecere__com__Instance * f)
2523 {
2524 switch(init->type)
2525 {
2526 case 0:
2527 {
2528 struct MemberInit * member;
2529
2530 if(init->dataMembers)
2531 {
2532 for(member = (*init->dataMembers).first; member; member = member->next)
2533 {
2534 OutputMemberInit(member, f);
2535 if(member->next)
2536 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
2537 }
2538 }
2539 break;
2540 }
2541 case 1:
2542 OutputClassFunction(init->function, f);
2543 break;
2544 }
2545 }
2546
2547 static void OutputInstance(struct Instantiation * inst, struct __ecereNameSpace__ecere__com__Instance * f)
2548 {
2549 if(inst->_class)
2550 OutputSpecifier(inst->_class, f, 0x0);
2551 if(inst->exp)
2552 {
2553 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2554 OutputExpression(inst->exp, f);
2555 }
2556 if(inst->members && (*inst->members).count > 1)
2557 {
2558 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n{\n");
2559 outputLine += 2;
2560 }
2561 else if(inst->members)
2562 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " { ");
2563 else
2564 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "{");
2565 if(inst->members)
2566 {
2567 struct MembersInit * init;
2568
2569 for(init = (*inst->members).first; init; init = init->next)
2570 {
2571 OutputMembersInit(init, f);
2572 if(init->type == 0 && init->next)
2573 {
2574 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ";\n");
2575 outputLine++;
2576 }
2577 }
2578 }
2579 if(inst->members)
2580 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " }");
2581 else
2582 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "}");
2583 }
2584
2585 static void OutputClassFunction(struct ClassFunction * func, struct __ecereNameSpace__ecere__com__Instance * f)
2586 {
2587 if(func->specifiers)
2588 {
2589 struct Specifier * spec;
2590
2591 for(spec = (*func->specifiers).first; spec; spec = spec->next)
2592 {
2593 OutputSpecifier(spec, f, 0x0);
2594 if(spec->next)
2595 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2596 }
2597 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " ");
2598 }
2599 if(func->declarator)
2600 OutputDeclarator(func->declarator, f);
2601 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2602 outputLine++;
2603 if(func->declarations)
2604 {
2605 struct Declaration * decl;
2606
2607 for(decl = (*func->declarations).first; decl; decl = decl->next)
2608 {
2609 OutputDeclaration(decl, f);
2610 }
2611 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2612 outputLine++;
2613 }
2614 if(func->body)
2615 {
2616 OutputStatement(func->body, f);
2617 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2618 outputLine++;
2619 }
2620 else
2621 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ";");
2622 }
2623
2624 static void OutputClassDef(struct ClassDef * def, struct __ecereNameSpace__ecere__com__Instance * f)
2625 {
2626 switch(def->type)
2627 {
2628 case 2:
2629 if(def->decl)
2630 {
2631 OutputDeclaration(def->decl, f);
2632 if(def->next && def->next->type != 2)
2633 {
2634 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2635 outputLine++;
2636 }
2637 }
2638 break;
2639 case 1:
2640 {
2641 struct MemberInit * init;
2642
2643 for(init = (*def->defProperties).first; init; init = init->next)
2644 {
2645 OutputMemberInit(init, f);
2646 if(init->next)
2647 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ", ");
2648 }
2649 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ";\n\n");
2650 outputLine += 2;
2651 break;
2652 }
2653 case 0:
2654 OutputClassFunction(def->function, f);
2655 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2656 outputLine++;
2657 break;
2658 }
2659 }
2660
2661 static void OutputClass(struct ClassDefinition * _class, struct __ecereNameSpace__ecere__com__Instance * f)
2662 {
2663 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "class ");
2664 OutputSpecifier(_class->_class, f, 0x0);
2665 if(_class->baseSpecs)
2666 {
2667 struct Specifier * spec;
2668
2669 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, " : ");
2670 for(spec = (*_class->baseSpecs).first; spec; spec = spec->next)
2671 {
2672 OutputSpecifier(spec, f, 0x0);
2673 }
2674 }
2675 if(_class->definitions)
2676 {
2677 struct ClassDef * def;
2678
2679 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n{\n");
2680 outputLine += 2;
2681 for(def = (*_class->definitions).first; def; def = def->next)
2682 {
2683 OutputClassDef(def, f);
2684 }
2685 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "}\n");
2686 outputLine++;
2687 }
2688 else
2689 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, ";");
2690 }
2691
2692 void OutputTree(struct __ecereNameSpace__ecere__sys__OldList * ast, struct __ecereNameSpace__ecere__com__Instance * f)
2693 {
2694 struct External * external;
2695
2696 outputLine = 30;
2697 for(external = ast->first; external; external = external->next)
2698 {
2699 switch(external->type)
2700 {
2701 case 0:
2702 OutputFunction(external->function, f);
2703 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2704 outputLine++;
2705 break;
2706 case 1:
2707 OutputDeclaration(external->declaration, f);
2708 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2709 outputLine++;
2710 break;
2711 case 2:
2712 OutputClass(external->_class, f);
2713 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2714 outputLine++;
2715 break;
2716 }
2717 }
2718 }
2719
2720 extern char *  __ecereNameSpace__ecere__sys__TrimRSpaces(char *  string, char *  output);
2721
2722 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
2723
2724 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__TempFile;
2725
2726 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_GetSize;
2727
2728 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek;
2729
2730 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Read;
2731
2732 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
2733
2734 char * StringFromSpecDecl(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl)
2735 {
2736 char * string;
2737 struct TypeName * typeName = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_TypeName);
2738 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__sys__TempFile);
2739 unsigned int size;
2740
2741 typeName->qualifiers = specs;
2742 typeName->declarator = decl;
2743 OutputTypeName(typeName, f, 0x1);
2744 ((typeName ? (__ecereClass_TypeName->Destructor ? __ecereClass_TypeName->Destructor(typeName) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(typeName)) : 0), typeName = 0);
2745 size = ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_GetSize])(f);
2746 string = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (size + 1));
2747 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, int pos, int mode))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek])(f, 0, 0);
2748 ((int (*)(struct __ecereNameSpace__ecere__com__Instance *, void *  buffer, unsigned int size, unsigned int count))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Read])(f, string, 1, (unsigned int)size);
2749 string[size] = '\0';
2750 __ecereNameSpace__ecere__sys__TrimRSpaces(string, string);
2751 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
2752 return string;
2753 }
2754
2755 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
2756
2757 struct __ecereNameSpace__ecere__com__GlobalFunction;
2758
2759 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);
2760
2761 void __ecereRegisterModule_output(struct __ecereNameSpace__ecere__com__Instance * module)
2762 {
2763 struct __ecereNameSpace__ecere__com__Class * class;
2764
2765 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetMemoryGuard", "void SetMemoryGuard(bool b)", SetMemoryGuard, module, 1);
2766 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetMemoryGuard", "bool GetMemoryGuard(void)", GetMemoryGuard, module, 1);
2767 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("OutputTypeName", "void OutputTypeName(TypeName type, ecere::sys::File f, bool typeName)", OutputTypeName, module, 1);
2768 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("OutputExpression", "void OutputExpression(Expression exp, ecere::sys::File f)", OutputExpression, module, 1);
2769 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("OutputTree", "void OutputTree(ecere::sys::OldList ast, ecere::sys::File f)", OutputTree, module, 1);
2770 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("StringFromSpecDecl", "char * StringFromSpecDecl(ecere::sys::OldList specs, Declarator decl)", StringFromSpecDecl, module, 1);
2771 }
2772
2773 void __ecereUnregisterModule_output(struct __ecereNameSpace__ecere__com__Instance * module)
2774 {
2775
2776 }
2777