The Ecere SDK - sdk/blob - compiler/bootstrap/ecc/bootstrap/ecc.c

   1 #if defined(__GNUC__)
   2 typedef long long int64;
   3 typedef unsigned long long uint64;
   4 #elif defined(__TINYC__)
   5 #include <stdarg.h>
   6 #define __builtin_va_list va_list
   7 #define __builtin_va_start va_start
   8 #define __builtin_va_end va_end
   9 #ifdef _WIN32
  10 #define strcasecmp stricmp
  11 #define strncasecmp strnicmp
  12 #define __declspec(x) __attribute__((x))
  13 #endif
  14 typedef long long int64;
  15 typedef unsigned long long uint64;
  16 #else
  17 typedef __int64 int64;
  18 typedef unsigned __int64 uint64;
  19 #endif
  20 #ifdef __BIG_ENDIAN__
  21 #define __ENDIAN_PAD(x) (8 - (x))
  22 #else
  23 #define __ENDIAN_PAD(x) 0
  24 #endif
  25 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
  26
  27 struct __ecereNameSpace__ecere__sys__BTNode;
  28
  29 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
  30
  31 struct __ecereNameSpace__ecere__sys__BinaryTree
  32 {
  33 struct __ecereNameSpace__ecere__sys__BTNode * root;
  34 int count;
  35 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, unsigned int a, unsigned int b);
  36 void (*  FreeKey)(void *  key);
  37 };
  38
  39 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
  40
  41 struct __ecereNameSpace__ecere__sys__OldList
  42 {
  43 void *  first;
  44 void *  last;
  45 int count;
  46 unsigned int offset;
  47 unsigned int circ;
  48 };
  49
  50 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
  51
  52 struct __ecereNameSpace__ecere__com__Method
  53 {
  54 char *  name;
  55 struct __ecereNameSpace__ecere__com__Method * parent;
  56 struct __ecereNameSpace__ecere__com__Method * left;
  57 struct __ecereNameSpace__ecere__com__Method * right;
  58 int depth;
  59 int (*  function)();
  60 int vid;
  61 int type;
  62 struct __ecereNameSpace__ecere__com__Class * _class;
  63 void *  symbol;
  64 char *  dataTypeString;
  65 struct Type * dataType;
  66 int memberAccess;
  67 };
  68
  69 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
  70
  71 struct __ecereNameSpace__ecere__com__Property
  72 {
  73 struct __ecereNameSpace__ecere__com__Property * prev;
  74 struct __ecereNameSpace__ecere__com__Property * next;
  75 char *  name;
  76 unsigned int isProperty;
  77 int memberAccess;
  78 int id;
  79 struct __ecereNameSpace__ecere__com__Class * _class;
  80 char *  dataTypeString;
  81 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
  82 struct Type * dataType;
  83 void (*  Set)();
  84 int (*  Get)();
  85 unsigned int (*  IsSet)();
  86 void *  data;
  87 void *  symbol;
  88 int vid;
  89 unsigned int conversion;
  90 unsigned int watcherOffset;
  91 char *  category;
  92 unsigned int compiled;
  93 unsigned int selfWatchable;
  94 unsigned int isWatchable;
  95 };
  96
  97 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_CodePosition;
  98
  99 struct CodePosition
 100 {
 101 int line;
 102 int charPos;
 103 int pos;
 104 unsigned int included;
 105 };
 106
 107 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Location;
 108
 109 struct Location
 110 {
 111 struct CodePosition start;
 112 struct CodePosition end;
 113 };
 114
 115 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDefinition;
 116
 117 struct ClassDefinition;
 118
 119 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
 120
 121 struct Context
 122 {
 123 struct Context * parent;
 124 struct __ecereNameSpace__ecere__sys__BinaryTree types;
 125 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
 126 struct __ecereNameSpace__ecere__sys__BinaryTree symbols;
 127 struct __ecereNameSpace__ecere__sys__BinaryTree structSymbols;
 128 int nextID;
 129 int simpleID;
 130 struct __ecereNameSpace__ecere__sys__BinaryTree templateTypes;
 131 struct ClassDefinition * classDef;
 132 unsigned int templateTypesOnly;
 133 unsigned int hasNameSpace;
 134 };
 135
 136 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
 137
 138 struct Instantiation;
 139
 140 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
 141
 142 struct Declaration;
 143
 144 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
 145
 146 struct Statement;
 147
 148 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
 149
 150 struct TypeName;
 151
 152 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
 153
 154 struct Initializer;
 155
 156 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
 157
 158 struct __ecereNameSpace__ecere__com__DataValue
 159 {
 160 union
 161 {
 162 char c;
 163 unsigned char uc;
 164 short s;
 165 unsigned short us;
 166 int i;
 167 unsigned int ui;
 168 void *  p;
 169 float f;
 170 double d;
 171 long long i64;
 172 uint64 ui64;
 173 };
 174 };
 175
 176 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
 177
 178 struct Expression;
 179
 180 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
 181
 182 struct TemplateDatatype;
 183
 184 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
 185
 186 struct TemplateArgument;
 187
 188 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
 189
 190 struct TemplateParameter;
 191
 192 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
 193
 194 struct Specifier;
 195
 196 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
 197
 198 struct Identifier;
 199
 200 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
 201
 202 struct Declarator;
 203
 204 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
 205
 206 struct FunctionDefinition;
 207
 208 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
 209
 210 struct DBTableDef;
 211
 212 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
 213
 214 struct External;
 215
 216 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
 217
 218 struct ModuleImport
 219 {
 220 struct ModuleImport * prev;
 221 struct ModuleImport * next;
 222 char *  name;
 223 struct __ecereNameSpace__ecere__sys__OldList classes;
 224 struct __ecereNameSpace__ecere__sys__OldList functions;
 225 int importType;
 226 int importAccess;
 227 };
 228
 229 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
 230
 231 struct ClassImport
 232 {
 233 struct ClassImport * prev;
 234 struct ClassImport * next;
 235 char *  name;
 236 struct __ecereNameSpace__ecere__sys__OldList methods;
 237 struct __ecereNameSpace__ecere__sys__OldList properties;
 238 unsigned int itself;
 239 unsigned int isRemote;
 240 };
 241
 242 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
 243
 244 struct Symbol
 245 {
 246 char *  string;
 247 struct Symbol * parent;
 248 struct Symbol * left;
 249 struct Symbol * right;
 250 int depth;
 251 struct Type * type;
 252 union
 253 {
 254 struct __ecereNameSpace__ecere__com__Method * method;
 255 struct __ecereNameSpace__ecere__com__Property * _property;
 256 struct __ecereNameSpace__ecere__com__Class * registered;
 257 };
 258 int id;
 259 int idCode;
 260 union
 261 {
 262 struct
 263 {
 264 struct External * pointerExternal;
 265 struct External * structExternal;
 266 };
 267 struct
 268 {
 269 struct External * externalGet;
 270 struct External * externalSet;
 271 struct External * externalPtr;
 272 struct External * externalIsSet;
 273 };
 274 struct
 275 {
 276 struct External * methodExternal;
 277 struct External * methodCodeExternal;
 278 };
 279 };
 280 unsigned int imported;
 281 unsigned int declaredStructSym;
 282 struct __ecereNameSpace__ecere__com__Class * _class;
 283 unsigned int declaredStruct;
 284 unsigned int needConstructor;
 285 unsigned int needDestructor;
 286 char *  constructorName;
 287 char *  structName;
 288 char *  className;
 289 char *  destructorName;
 290 struct ModuleImport * module;
 291 struct ClassImport * _import;
 292 struct Location nameLoc;
 293 unsigned int isParam;
 294 unsigned int isRemote;
 295 unsigned int isStruct;
 296 unsigned int fireWatchersDone;
 297 int declaring;
 298 unsigned int classData;
 299 unsigned int isStatic;
 300 char *  shortName;
 301 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
 302 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
 303 struct Context * ctx;
 304 int isIterator;
 305 struct Expression * propCategory;
 306 };
 307
 308 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
 309
 310 struct Type;
 311
 312 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
 313
 314 struct __ecereNameSpace__ecere__com__Class
 315 {
 316 struct __ecereNameSpace__ecere__com__Class * prev;
 317 struct __ecereNameSpace__ecere__com__Class * next;
 318 char *  name;
 319 int offset;
 320 int structSize;
 321 int (* *  _vTbl)();
 322 int vTblSize;
 323 int (*  Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
 324 void (*  Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
 325 int offsetClass;
 326 int sizeClass;
 327 struct __ecereNameSpace__ecere__com__Class * base;
 328 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
 329 struct __ecereNameSpace__ecere__sys__BinaryTree members;
 330 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
 331 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
 332 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
 333 struct __ecereNameSpace__ecere__sys__OldList derivatives;
 334 int memberID;
 335 int startMemberID;
 336 int type;
 337 struct __ecereNameSpace__ecere__com__Instance * module;
 338 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
 339 char *  dataTypeString;
 340 struct Type * dataType;
 341 int typeSize;
 342 int defaultAlignment;
 343 void (*  Initialize)();
 344 int memberOffset;
 345 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
 346 char *  designerClass;
 347 unsigned int noExpansion;
 348 char *  defaultProperty;
 349 unsigned int comRedefinition;
 350 int count;
 351 unsigned int isRemote;
 352 unsigned int internalDecl;
 353 void *  data;
 354 unsigned int computeSize;
 355 int structAlignment;
 356 int destructionWatchOffset;
 357 unsigned int fixed;
 358 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
 359 int inheritanceAccess;
 360 char *  fullName;
 361 void *  symbol;
 362 struct __ecereNameSpace__ecere__sys__OldList conversions;
 363 struct __ecereNameSpace__ecere__sys__OldList templateParams;
 364 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
 365 struct __ecereNameSpace__ecere__com__Class * templateClass;
 366 struct __ecereNameSpace__ecere__sys__OldList templatized;
 367 int numParams;
 368 };
 369
 370 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
 371
 372 struct __ecereNameSpace__ecere__com__Instance
 373 {
 374 int (* *  _vTbl)();
 375 struct __ecereNameSpace__ecere__com__Class * _class;
 376 int _refCount;
 377 };
 378
 379 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
 380
 381 struct __ecereNameSpace__ecere__com__DataMember
 382 {
 383 struct __ecereNameSpace__ecere__com__DataMember * prev;
 384 struct __ecereNameSpace__ecere__com__DataMember * next;
 385 char *  name;
 386 unsigned int isProperty;
 387 int memberAccess;
 388 int id;
 389 struct __ecereNameSpace__ecere__com__Class * _class;
 390 char *  dataTypeString;
 391 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 392 struct Type * dataType;
 393 int type;
 394 int offset;
 395 int memberID;
 396 struct __ecereNameSpace__ecere__sys__OldList members;
 397 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 398 int memberOffset;
 399 int structAlignment;
 400 };
 401
 402 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
 403
 404 struct __ecereNameSpace__ecere__com__SerialBuffer
 405 {
 406 unsigned char *  _buffer;
 407 unsigned int count;
 408 unsigned int _size;
 409 unsigned int pos;
 410 };
 411
 412 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
 413
 414 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 415 {
 416 union
 417 {
 418 struct
 419 {
 420 char *  dataTypeString;
 421 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 422 };
 423 struct __ecereNameSpace__ecere__com__DataValue expression;
 424 struct
 425 {
 426 char *  memberString;
 427 union
 428 {
 429 struct __ecereNameSpace__ecere__com__DataMember * member;
 430 struct __ecereNameSpace__ecere__com__Property * prop;
 431 struct __ecereNameSpace__ecere__com__Method * method;
 432 };
 433 };
 434 };
 435 };
 436
 437 typedef __builtin_va_list __gnuc_va_list;
 438
 439 typedef __gnuc_va_list va_list;
 440
 441 static struct Context * globalContext;
 442
 443 static struct __ecereNameSpace__ecere__com__Instance * privateModule;
 444
 445 static struct ModuleImport * mainModule;
 446
 447 struct __ecereNameSpace__ecere__sys__OldList _excludedSymbols =
 448 {
 449 0, 0, 0, (unsigned int)&((struct Symbol *)(void *)0)->left, 0
 450 };
 451
 452 static struct __ecereNameSpace__ecere__sys__OldList defines, imports;
 453
 454 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__NameSpace;
 455
 456 struct __ecereNameSpace__ecere__com__NameSpace
 457 {
 458 char *  name;
 459 struct __ecereNameSpace__ecere__com__NameSpace *  btParent;
 460 struct __ecereNameSpace__ecere__com__NameSpace *  left;
 461 struct __ecereNameSpace__ecere__com__NameSpace *  right;
 462 int depth;
 463 struct __ecereNameSpace__ecere__com__NameSpace *  parent;
 464 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
 465 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
 466 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
 467 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
 468 };
 469
 470 static struct __ecereNameSpace__ecere__com__NameSpace globalData;
 471
 472 static struct __ecereNameSpace__ecere__sys__OldList _precompDefines;
 473
 474 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpen(char *  fileName, int mode);
 475
 476 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MethodImport;
 477
 478 struct MethodImport
 479 {
 480 struct MethodImport * prev;
 481 struct MethodImport * next;
 482 char *  name;
 483 unsigned int isVirtual;
 484 };
 485
 486 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyImport;
 487
 488 struct PropertyImport
 489 {
 490 struct PropertyImport * prev;
 491 struct PropertyImport * next;
 492 char *  name;
 493 unsigned int isVirtual;
 494 unsigned int hasSet;
 495 unsigned int hasGet;
 496 };
 497
 498 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionImport;
 499
 500 struct FunctionImport
 501 {
 502 struct FunctionImport * prev;
 503 struct FunctionImport * next;
 504 char *  name;
 505 };
 506
 507 int __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(struct __ecereNameSpace__ecere__com__Instance * this, char *  format, ...);
 508
 509 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
 510
 511 static void OutputImports(char * fileName)
 512 {
 513 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__sys__FileOpen(fileName, 2);
 514
 515 if(f)
 516 {
 517 if(imports.first)
 518 {
 519 struct ModuleImport * module;
 520
 521 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "[Imported Modules]\n");
 522 for(module = imports.first; module; module = module->next)
 523 {
 524 struct ClassImport * _class;
 525 struct FunctionImport * function;
 526
 527 if(module->name)
 528 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   %s\n", module->name);
 529 else
 530 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   [This]\n");
 531 if(module->importType == 1)
 532 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Static]\n");
 533 else if(module->importType == 2)
 534 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Remote]\n");
 535 if(module->importAccess == 2)
 536 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Private]\n");
 537 else
 538 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Public]\n");
 539 if(module->classes.first)
 540 {
 541 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Imported Classes]\n");
 542 for(_class = module->classes.first; _class; _class = _class->next)
 543 {
 544 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         %s\n", _class->name);
 545 if(_class->itself)
 546 {
 547 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            [Instantiated]\n");
 548 }
 549 if(_class->isRemote)
 550 {
 551 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            [Remote]\n");
 552 }
 553 if(_class->methods.first)
 554 {
 555 struct MethodImport * method;
 556
 557 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            [Imported Methods]\n");
 558 for(method = _class->methods.first; method; method = method->next)
 559 {
 560 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "               %s\n", method->name);
 561 if(method->isVirtual)
 562 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "                  [Virtual]\n");
 563 }
 564 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "               .\n");
 565 }
 566 if(_class->properties.first)
 567 {
 568 struct PropertyImport * prop;
 569
 570 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            [Imported Properties]\n");
 571 for(prop = _class->properties.first; prop; prop = prop->next)
 572 {
 573 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "               %s\n", prop->name);
 574 if(prop->isVirtual)
 575 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "                  [Virtual]\n");
 576 if(prop->hasSet)
 577 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "                  [Set]\n");
 578 if(prop->hasGet)
 579 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "                  [Get]\n");
 580 }
 581 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "               .\n");
 582 }
 583 }
 584 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "        .\n");
 585 }
 586 if(module->functions.first)
 587 {
 588 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Imported Functions]\n");
 589 for(function = module->functions.first; function; function = function->next)
 590 {
 591 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         %s\n", function->name);
 592 }
 593 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "        .\n");
 594 }
 595 }
 596 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   .\n");
 597 }
 598 }
 599 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
 600 }
 601
 602 static struct __ecereNameSpace__ecere__com__Class * __ecereClass_CompilerApp;
 603
 604 extern int __ecereNameSpace__ecere__com__GetRuntimePlatform(void);
 605
 606 extern void SetSymbolsDir(char *  s);
 607
 608 extern int strcmp(const char * , const char * );
 609
 610 extern int strlen(const char * );
 611
 612 extern char *  strcpy(char * , const char * );
 613
 614 extern void SetBuildingEcereCom(unsigned int b);
 615
 616 extern void SetBuildingEcereComModule(unsigned int b);
 617
 618 extern char *  __ecereNameSpace__ecere__sys__CopyString(char *  string);
 619
 620 extern char *  GetOutputFile(void);
 621
 622 extern void SetOutputFile(char *  s);
 623
 624 extern char *  GetSourceFile(void);
 625
 626 extern void SetSourceFile(char *  s);
 627
 628 extern void SetMemoryGuard(unsigned int b);
 629
 630 extern void SetDefaultNameSpace(char *  s);
 631
 632 extern void SetStrictNameSpaces(unsigned int b);
 633
 634 extern void SetOutputLineNumbers(unsigned int value);
 635
 636 extern char *  __ecereNameSpace__ecere__sys__PathCat(char *  string, char *  addedPath);
 637
 638 extern char *  __ecereNameSpace__ecere__sys__ChangeExtension(char *  string, char *  ext, char *  output);
 639
 640 extern int printf(char * , ...);
 641
 642 extern char *  __ecereNameSpace__ecere__GetTranslatedString(struct __ecereNameSpace__ecere__com__Instance * module, char *  string, char *  stringAndContext);
 643
 644 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
 645
 646 extern void SetGlobalData(struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace);
 647
 648 extern void SetExcludedSymbols(struct __ecereNameSpace__ecere__sys__OldList *  list);
 649
 650 extern void SetGlobalContext(struct Context * context);
 651
 652 extern void SetCurrentContext(struct Context * context);
 653
 654 extern void SetTopContext(struct Context * context);
 655
 656 extern void SetDefines(struct __ecereNameSpace__ecere__sys__OldList *  list);
 657
 658 extern void SetImports(struct __ecereNameSpace__ecere__sys__OldList *  list);
 659
 660 extern void SetInCompiler(unsigned int b);
 661
 662 extern void SetTargetPlatform(int platform);
 663
 664 extern void SetEchoOn(unsigned int b);
 665
 666 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__com____ecere_COM_Initialize(unsigned int guiApp, int argc, char *  argv[]);
 667
 668 extern void SetPrivateModule(struct __ecereNameSpace__ecere__com__Instance * module);
 669
 670 extern struct Type * ProcessTypeString(char *  string, unsigned int staticMethod);
 671
 672 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_GlobalData;
 673
 674 struct GlobalData
 675 {
 676 unsigned int key;
 677 struct __ecereNameSpace__ecere__sys__BTNode * parent;
 678 struct __ecereNameSpace__ecere__sys__BTNode * left;
 679 struct __ecereNameSpace__ecere__sys__BTNode * right;
 680 int depth;
 681 struct __ecereNameSpace__ecere__com__Instance * module;
 682 char *  dataTypeString;
 683 struct Type * dataType;
 684 void *  symbol;
 685 char *  fullName;
 686 char __ecere_padding[20];
 687 };
 688
 689 extern int sprintf(char * , char * , ...);
 690
 691 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__DualPipeOpen(unsigned int mode, char *  commandLine);
 692
 693 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__TempFile;
 694
 695 struct __ecereNameSpace__ecere__sys__TempFile
 696 {
 697 char __ecere_padding[24];
 698 };
 699
 700 extern void SetFileInput(struct __ecereNameSpace__ecere__com__Instance * file);
 701
 702 extern void SetMainModule(struct ModuleImport * moduleImport);
 703
 704 extern char *  __ecereNameSpace__ecere__sys__GetLastDirectory(char *  string, char *  output);
 705
 706 extern unsigned int __ecereNameSpace__ecere__sys__StripExtension(char *  string);
 707
 708 extern void resetScanner(void);
 709
 710 extern char *  GetSymbolsDir(void);
 711
 712 extern unsigned int LoadSymbols(char *  fileName, int importType, unsigned int loadDllOnly);
 713
 714 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ImportedModule;
 715
 716 struct ImportedModule
 717 {
 718 struct ImportedModule * prev;
 719 struct ImportedModule * next;
 720 char *  name;
 721 int type;
 722 int importType;
 723 unsigned int globalInstance;
 724 unsigned int dllOnly;
 725 int importAccess;
 726 };
 727
 728 extern int strcasecmp(const char * , const char * );
 729
 730 extern unsigned int GetEcereImported(void);
 731
 732 extern unsigned int GetBuildingEcereCom(void);
 733
 734 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__com__eModule_LoadStrict(struct __ecereNameSpace__ecere__com__Instance * fromModule, char *  name, int importAccess);
 735
 736 extern void ParseEc(void);
 737
 738 extern void CheckDataRedefinitions(void);
 739
 740 extern void SetYydebug(unsigned int b);
 741
 742 extern void SetCurrentNameSpace(char *  s);
 743
 744 extern void SetDeclMode(int accessMode);
 745
 746 extern struct __ecereNameSpace__ecere__sys__OldList *  GetAST(void);
 747
 748 extern void ProcessDBTableDefinitions(void);
 749
 750 extern void PrePreProcessClassDefinitions(void);
 751
 752 extern void ComputeModuleClasses(struct __ecereNameSpace__ecere__com__Instance * module);
 753
 754 extern void PreProcessClassDefinitions(void);
 755
 756 extern void ProcessClassDefinitions(void);
 757
 758 extern void ComputeDataTypes(void);
 759
 760 extern void ProcessInstantiations(void);
 761
 762 extern void ProcessMemberAccess(void);
 763
 764 extern void ProcessInstanceDeclarations(void);
 765
 766 extern void OutputTree(struct __ecereNameSpace__ecere__sys__OldList * ast, struct __ecereNameSpace__ecere__com__Instance * f);
 767
 768 extern void FreeASTTree(struct __ecereNameSpace__ecere__sys__OldList * ast);
 769
 770 extern void FreeContext(struct Context * context);
 771
 772 extern void FreeExcludedSymbols(struct __ecereNameSpace__ecere__sys__OldList * excludedSymbols);
 773
 774 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Definition;
 775
 776 struct Definition;
 777
 778 extern void FreeModuleDefine(struct Definition * def);
 779
 780 extern void FreeModuleImport(struct ModuleImport * imp);
 781
 782 extern void FreeTypeData(struct __ecereNameSpace__ecere__com__Instance * privateModule);
 783
 784 extern void FreeIncludeFiles(void);
 785
 786 extern void FreeGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * globalDataList);
 787
 788 extern void OutputIntlStrings(void);
 789
 790 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
 791
 792 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Application;
 793
 794 struct __ecereNameSpace__ecere__com__Application
 795 {
 796 int argc;
 797 char * *  argv;
 798 int exitCode;
 799 unsigned int isGUIApp;
 800 struct __ecereNameSpace__ecere__sys__OldList allModules;
 801 char *  parsedCommand;
 802 struct __ecereNameSpace__ecere__com__NameSpace systemNameSpace;
 803 };
 804
 805 char *  __ecereProp___ecereNameSpace__ecere__com__Platform_Get_char__PTR_(int this);
 806
 807 int __ecereProp___ecereNameSpace__ecere__com__Platform_Set_char__PTR_(char *  value);
 808
 809 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__Platform_char__PTR_;
 810
 811 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
 812
 813 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 814
 815 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 816
 817 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof;
 818
 819 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Read;
 820
 821 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Write;
 822
 823 int __ecereMethod___ecereNameSpace__ecere__sys__DualPipe_GetExitCode();
 824
 825 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek;
 826
 827 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Delete(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 828
 829 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(struct __ecereNameSpace__ecere__sys__OldList * this, void (*  freeFn)(void * ));
 830
 831 void __ecereMethod_CompilerApp_Main(struct __ecereNameSpace__ecere__com__Instance * this)
 832 {
 833 void * __ecereTemp1;
 834 char * cppCommand = (((void *)0));
 835 char * cppOptions = (((void *)0));
 836 int cppOptionsLen = 0;
 837 int c;
 838 unsigned int valid = 0x1;
 839 char defaultOutputFile[797];
 840 int targetPlatform = __ecereNameSpace__ecere__com__GetRuntimePlatform();
 841
 842 SetSymbolsDir("");
 843 for(c = 1; c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc; c++)
 844 {
 845 char * arg = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c];
 846
 847 if(arg[0] == '-')
 848 {
 849 if(!strcmp(arg + 1, "m32"))
 850 {
 851 int argLen = strlen(arg);
 852 int newLen = cppOptionsLen + 1 + argLen;
 853
 854 cppOptions = __ecereNameSpace__ecere__com__eSystem_Renew(cppOptions, sizeof(char) * (newLen + 1));
 855 cppOptions[cppOptionsLen] = ' ';
 856 strcpy(cppOptions + cppOptionsLen + 1, arg);
 857 cppOptionsLen = newLen;
 858 }
 859 else if(arg[1] == 'D')
 860 {
 861 int argLen = strlen(arg);
 862 int newLen = cppOptionsLen + 1 + argLen;
 863
 864 cppOptions = __ecereNameSpace__ecere__com__eSystem_Renew(cppOptions, sizeof(char) * (newLen + 1));
 865 cppOptions[cppOptionsLen] = ' ';
 866 strcpy(cppOptions + cppOptionsLen + 1, arg);
 867 cppOptionsLen = newLen;
 868 if(!strcmp(arg, "-DBUILDING_ECERE_COM"))
 869 SetBuildingEcereCom(0x1);
 870 else if(!strcmp(arg, "-DECERE_COM_MODULE"))
 871 SetBuildingEcereComModule(0x1);
 872 }
 873 else if(arg[1] == 'I')
 874 {
 875 int argLen = strlen(arg);
 876 int newLen = cppOptionsLen + argLen + 3;
 877
 878 cppOptions = __ecereNameSpace__ecere__com__eSystem_Renew(cppOptions, sizeof(char) * (newLen + 1));
 879 cppOptions[cppOptionsLen] = ' ';
 880 cppOptions[cppOptionsLen + 1] = '-';
 881 cppOptions[cppOptionsLen + 2] = 'I';
 882 cppOptions[cppOptionsLen + 3] = '"';
 883 strcpy(cppOptions + cppOptionsLen + 4, arg + 2);
 884 cppOptions[newLen - 1] = '\"';
 885 cppOptions[newLen] = '\0';
 886 cppOptionsLen = newLen;
 887 }
 888 else if(!strcmp(arg + 1, "t"))
 889 {
 890 if(++c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 891 targetPlatform = __ecereProp___ecereNameSpace__ecere__com__Platform_Set_char__PTR_(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c]);
 892 else
 893 valid = 0x0;
 894 }
 895 else if(!strcmp(arg + 1, "cpp"))
 896 {
 897 if(++c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 898 cppCommand = __ecereNameSpace__ecere__sys__CopyString(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c]);
 899 else
 900 valid = 0x0;
 901 }
 902 else if(!strcmp(arg + 1, "o"))
 903 {
 904 if(!GetOutputFile() && c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 905 {
 906 SetOutputFile(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c + 1]);
 907 c++;
 908 }
 909 else
 910 valid = 0x0;
 911 }
 912 else if(!strcmp(arg + 1, "c"))
 913 {
 914 if(!GetSourceFile() && c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 915 {
 916 SetSourceFile(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c + 1]);
 917 c++;
 918 }
 919 else
 920 valid = 0x0;
 921 }
 922 else if(!strcmp(arg + 1, "isystem") || !strcmp(arg + 1, "isysroot"))
 923 {
 924 if(c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 925 {
 926 int argLen = strlen(arg);
 927 int arg1Len = strlen(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c + 1]);
 928 int newLen = cppOptionsLen + argLen + arg1Len + 4;
 929
 930 cppOptions = __ecereNameSpace__ecere__com__eSystem_Renew(cppOptions, sizeof(char) * (newLen + 1));
 931 cppOptions[cppOptionsLen] = ' ';
 932 strcpy(cppOptions + cppOptionsLen + 1, arg);
 933 cppOptions[cppOptionsLen + argLen + 1] = ' ';
 934 cppOptions[cppOptionsLen + argLen + 2] = '"';
 935 arg = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[++c];
 936 strcpy(cppOptions + cppOptionsLen + argLen + 3, arg);
 937 cppOptions[newLen - 1] = '\"';
 938 cppOptions[newLen] = '\0';
 939 cppOptionsLen = newLen;
 940 }
 941 else
 942 valid = 0x0;
 943 }
 944 else if(!strcmp(arg + 1, "symbols"))
 945 {
 946 if(c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 947 {
 948 SetSymbolsDir(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c + 1]);
 949 c++;
 950 }
 951 else
 952 valid = 0x0;
 953 }
 954 else if(!strcmp(arg + 1, "memguard"))
 955 {
 956 SetMemoryGuard(0x1);
 957 }
 958 else if(!strcmp(arg + 1, "defaultns"))
 959 {
 960 if(c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 961 {
 962 SetDefaultNameSpace(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c + 1]);
 963 c++;
 964 }
 965 else
 966 valid = 0x0;
 967 }
 968 else if(!strcmp(arg + 1, "strictns"))
 969 {
 970 SetStrictNameSpaces(0x1);
 971 }
 972 else if(!strcmp(arg + 1, "nolinenumbers"))
 973 {
 974 SetOutputLineNumbers(0x0);
 975 }
 976 }
 977 else
 978 valid = 0x0;
 979 }
 980 if(valid)
 981 {
 982 if(!cppCommand)
 983 cppCommand = __ecereNameSpace__ecere__sys__CopyString("gcc");
 984 if(!GetSourceFile())
 985 valid = 0x0;
 986 else if(!GetOutputFile())
 987 {
 988 strcpy(defaultOutputFile, "");
 989 __ecereNameSpace__ecere__sys__PathCat(defaultOutputFile, GetSourceFile());
 990 __ecereNameSpace__ecere__sys__ChangeExtension(defaultOutputFile, "c", defaultOutputFile);
 991 SetOutputFile(defaultOutputFile);
 992 }
 993 }
 994 if(!valid)
 995 printf(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Syntax:\n   ecc [-t <target platform>] [-cpp <c preprocessor>] [-o <output>] [-symbols <outputdir>] [-I<includedir>]* [-isystem <sysincludedir>]* [-D<definition>]* -c <input>\n", (((void *)0))));
 996 else
 997 {
 998 struct __ecereNameSpace__ecere__com__Instance * cppOutput;
 999 char command[1024];
1000
1001 SetGlobalData(&globalData);
1002 SetExcludedSymbols(&_excludedSymbols);
1003 SetGlobalContext(globalContext);
1004 SetCurrentContext(globalContext);
1005 SetTopContext(globalContext);
1006 SetDefines(&defines);
1007 SetImports(&imports);
1008 SetInCompiler(0x1);
1009 SetTargetPlatform(targetPlatform);
1010 SetEchoOn(0x0);
1011 privateModule = (struct __ecereNameSpace__ecere__com__Instance *)__ecereNameSpace__ecere__com____ecere_COM_Initialize(0x1, 1, (((void *)0)));
1012 SetPrivateModule(privateModule);
1013 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->types, (struct __ecereNameSpace__ecere__sys__BTNode *)(__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString("uint"), ((struct Symbol *)__ecereTemp1)->type = ProcessTypeString("unsigned int", 0x0), ((struct Symbol *)__ecereTemp1)));
1014 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->types, (struct __ecereNameSpace__ecere__sys__BTNode *)(__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString("uint64"), ((struct Symbol *)__ecereTemp1)->type = ProcessTypeString("unsigned int64", 0x0), ((struct Symbol *)__ecereTemp1)));
1015 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->types, (struct __ecereNameSpace__ecere__sys__BTNode *)(__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString("uint32"), ((struct Symbol *)__ecereTemp1)->type = ProcessTypeString("unsigned int", 0x0), ((struct Symbol *)__ecereTemp1)));
1016 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->types, (struct __ecereNameSpace__ecere__sys__BTNode *)(__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString("uint16"), ((struct Symbol *)__ecereTemp1)->type = ProcessTypeString("unsigned short", 0x0), ((struct Symbol *)__ecereTemp1)));
1017 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->types, (struct __ecereNameSpace__ecere__sys__BTNode *)(__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString("byte"), ((struct Symbol *)__ecereTemp1)->type = ProcessTypeString("unsigned char", 0x0), ((struct Symbol *)__ecereTemp1)));
1018 {
1019 struct GlobalData * data = (data = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_GlobalData), data->fullName = __ecereNameSpace__ecere__sys__CopyString("__thisModule"), data->dataTypeString = __ecereNameSpace__ecere__sys__CopyString("Module"), data->module = privateModule, data);
1020
1021 data->key = (unsigned int)data->fullName;
1022 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalData.functions, (struct __ecereNameSpace__ecere__sys__BTNode *)data);
1023 }
1024 sprintf(command, "%s%s -x c -E \"%s\"", cppCommand, cppOptions ? cppOptions : "", GetSourceFile());
1025 if((cppOutput = __ecereNameSpace__ecere__sys__DualPipeOpen((((unsigned int)(0x1))), command)))
1026 {
1027 char impFile[797];
1028 struct ImportedModule * module;
1029 char mainModuleName[274];
1030 int exitCode;
1031 struct __ecereNameSpace__ecere__sys__OldList * ast;
1032 struct __ecereNameSpace__ecere__com__Instance * fileInput = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__sys__TempFile);
1033
1034 SetFileInput(fileInput);
1035 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&imports, (mainModule = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ModuleImport)));
1036 SetMainModule(mainModule);
1037 __ecereNameSpace__ecere__sys__GetLastDirectory(GetSourceFile(), mainModuleName);
1038 __ecereNameSpace__ecere__sys__StripExtension(mainModuleName);
1039 module = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule), ((struct ImportedModule *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(mainModuleName), ((struct ImportedModule *)__ecereTemp1)->type = 0, ((struct ImportedModule *)__ecereTemp1));
1040 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&defines, module);
1041 resetScanner();
1042 while(!((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))cppOutput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof])(cppOutput))
1043 {
1044 char junk[4096];
1045 int count = ((int (*)(struct __ecereNameSpace__ecere__com__Instance *, void *  buffer, unsigned int size, unsigned int count))cppOutput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Read])(cppOutput, junk, 1, 4096);
1046
1047 ((int (*)(struct __ecereNameSpace__ecere__com__Instance *, void *  buffer, unsigned int size, unsigned int count))fileInput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Write])(fileInput, junk, 1, count);
1048 }
1049 exitCode = __ecereMethod___ecereNameSpace__ecere__sys__DualPipe_GetExitCode(cppOutput);
1050 (__ecereNameSpace__ecere__com__eInstance_DecRef(cppOutput), cppOutput = 0);
1051 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, int pos, int mode))fileInput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek])(fileInput, 0, 0);
1052 {
1053 char symFile[274];
1054 char symLocation[797];
1055 struct ImportedModule * module, * next;
1056
1057 __ecereNameSpace__ecere__sys__GetLastDirectory(GetSourceFile(), symFile);
1058 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
1059 strcpy(symLocation, GetSymbolsDir());
1060 __ecereNameSpace__ecere__sys__PathCat(symLocation, symFile);
1061 LoadSymbols(symLocation, 3, 0x0);
1062 for(module = defines.first; module; module = next)
1063 {
1064 next = module->next;
1065 if(module->type == 0 && (strcasecmp)(module->name, mainModuleName))
1066 {
1067 (__ecereNameSpace__ecere__com__eSystem_Delete(module->name), module->name = 0);
1068 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Delete(&defines, module);
1069 }
1070 }
1071 if(!GetEcereImported() && !GetBuildingEcereCom())
1072 __ecereNameSpace__ecere__com__eModule_LoadStrict(privateModule, "ecereCOM", 1);
1073 }
1074 ParseEc();
1075 CheckDataRedefinitions();
1076 SetYydebug(0x0);
1077 SetCurrentNameSpace((((void *)0)));
1078 SetDefaultNameSpace((((void *)0)));
1079 SetDeclMode(2);
1080 (__ecereNameSpace__ecere__com__eInstance_DecRef(fileInput), fileInput = 0);
1081 SetFileInput((((void *)0)));
1082 ast = GetAST();
1083 if(!exitCode)
1084 {
1085 ProcessDBTableDefinitions();
1086 PrePreProcessClassDefinitions();
1087 ComputeModuleClasses(privateModule);
1088 PreProcessClassDefinitions();
1089 ComputeModuleClasses(privateModule);
1090 ProcessClassDefinitions();
1091 ComputeDataTypes();
1092 ProcessInstantiations();
1093 ProcessMemberAccess();
1094 ProcessInstanceDeclarations();
1095 strcpy(impFile, GetSymbolsDir());
1096 {
1097 char fileName[274];
1098
1099 __ecereNameSpace__ecere__sys__GetLastDirectory(GetSourceFile(), fileName);
1100 __ecereNameSpace__ecere__sys__PathCat(impFile, fileName);
1101 __ecereNameSpace__ecere__sys__ChangeExtension(impFile, "imp", impFile);
1102 }
1103 if(imports.first)
1104 OutputImports(impFile);
1105 if(!((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->exitCode)
1106 {
1107 struct __ecereNameSpace__ecere__com__Instance * output = __ecereNameSpace__ecere__sys__FileOpen(GetOutputFile(), 2);
1108
1109 if(output)
1110 {
1111 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#if defined(__GNUC__)\n");
1112 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef long long int64;\n");
1113 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef unsigned long long uint64;\n");
1114 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#elif defined(__TINYC__)\n");
1115 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#include <stdarg.h>\n");
1116 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __builtin_va_list va_list\n");
1117 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __builtin_va_start va_start\n");
1118 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __builtin_va_end va_end\n");
1119 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#ifdef _WIN32\n");
1120 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define strcasecmp stricmp\n");
1121 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define strncasecmp strnicmp\n");
1122 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __declspec(x) __attribute__((x))\n");
1123 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#endif\n");
1124 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef long long int64;\n");
1125 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef unsigned long long uint64;\n");
1126 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#else\n");
1127 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef __int64 int64;\n");
1128 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef unsigned __int64 uint64;\n");
1129 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#endif\n");
1130 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#ifdef __BIG_ENDIAN__\n");
1131 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __ENDIAN_PAD(x) (8 - (x))\n");
1132 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#else\n");
1133 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __ENDIAN_PAD(x) 0\n");
1134 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#endif\n");
1135 if(ast)
1136 OutputTree(ast, output);
1137 (__ecereNameSpace__ecere__com__eInstance_DecRef(output), output = 0);
1138 }
1139 }
1140 }
1141 else
1142 ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->exitCode = exitCode;
1143 if(ast)
1144 {
1145 FreeASTTree(ast);
1146 }
1147 }
1148 FreeContext(globalContext);
1149 FreeExcludedSymbols(&_excludedSymbols);
1150 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&defines, FreeModuleDefine);
1151 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&imports, FreeModuleImport);
1152 FreeTypeData(privateModule);
1153 FreeIncludeFiles();
1154 FreeGlobalData(&globalData);
1155 (__ecereNameSpace__ecere__com__eInstance_DecRef(privateModule), privateModule = 0);
1156 }
1157 (__ecereNameSpace__ecere__com__eSystem_Delete(cppCommand), cppCommand = 0);
1158 (__ecereNameSpace__ecere__com__eSystem_Delete(cppOptions), cppOptions = 0);
1159 SetSymbolsDir((((void *)0)));
1160 OutputIntlStrings();
1161 }
1162
1163 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_RegisterClass(int type, char *  name, char *  baseName, int size, int sizeClass, unsigned int (* )(void * ), void (* )(void * ), struct __ecereNameSpace__ecere__com__Instance * module, int declMode, int inheritanceAccess);
1164
1165 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
1166
1167 struct __ecereNameSpace__ecere__com__Module
1168 {
1169 struct __ecereNameSpace__ecere__com__Instance * application;
1170 struct __ecereNameSpace__ecere__sys__OldList classes;
1171 struct __ecereNameSpace__ecere__sys__OldList defines;
1172 struct __ecereNameSpace__ecere__sys__OldList functions;
1173 struct __ecereNameSpace__ecere__sys__OldList modules;
1174 struct __ecereNameSpace__ecere__com__Instance * prev;
1175 struct __ecereNameSpace__ecere__com__Instance * next;
1176 char *  name;
1177 void *  library;
1178 void *  Unload;
1179 int importType;
1180 int origImportType;
1181 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
1182 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
1183 };
1184
1185 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_AddMethod(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, void *  function, int declMode);
1186
1187 void __ecereRegisterModule_ecc(struct __ecereNameSpace__ecere__com__Instance * module)
1188 {
1189 struct __ecereNameSpace__ecere__com__Class * class;
1190
1191 class = __ecereNameSpace__ecere__com__eSystem_RegisterClass(0, "CompilerApp", "ecere::com::Application", 0, 0, 0, 0, module, 2, 1);
1192 if(((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + 12)))->application == ((struct __ecereNameSpace__ecere__com__Module *)(((char *)__thisModule + 12)))->application && class)
1193 __ecereClass_CompilerApp = class;
1194 __ecereNameSpace__ecere__com__eClass_AddMethod(class, "Main", 0, __ecereMethod_CompilerApp_Main, 1);
1195 }
1196
1197 void __ecereUnregisterModule_ecc(struct __ecereNameSpace__ecere__com__Instance * module)
1198 {
1199
1200 }
1201
1202 int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, char *  a, char *  b);
1203
1204 void __ecereCreateModuleInstances_ecc()
1205 {
1206 globalContext = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1207 (globalData.classes.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString, globalData.defines.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString, globalData.functions.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString, globalData.nameSpaces.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString);
1208 }
1209
1210 void __ecereDestroyModuleInstances_ecc()
1211 {
1212 ((globalContext ? (__ecereClass_Context->Destructor ? __ecereClass_Context->Destructor(globalContext) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(globalContext)) : 0), globalContext = 0);
1213 }
1214