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

   1 /* Code generated from eC source file: ecs.ec */
   2 #if defined(_WIN32)
   3 #define __runtimePlatform 1
   4 #elif defined(__APPLE__)
   5 #define __runtimePlatform 3
   6 #else
   7 #define __runtimePlatform 2
   8 #endif
   9 #if defined(__GNUC__)
  10 typedef long long int64;
  11 typedef unsigned long long uint64;
  12 #ifndef _WIN32
  13 #define __declspec(x)
  14 #endif
  15 #elif defined(__TINYC__)
  16 #include <stdarg.h>
  17 #define __builtin_va_list va_list
  18 #define __builtin_va_start va_start
  19 #define __builtin_va_end va_end
  20 #ifdef _WIN32
  21 #define strcasecmp stricmp
  22 #define strncasecmp strnicmp
  23 #define __declspec(x) __attribute__((x))
  24 #else
  25 #define __declspec(x)
  26 #endif
  27 typedef long long int64;
  28 typedef unsigned long long uint64;
  29 #else
  30 typedef __int64 int64;
  31 typedef unsigned __int64 uint64;
  32 #endif
  33 #ifdef __BIG_ENDIAN__
  34 #define __ENDIAN_PAD(x) (8 - (x))
  35 #else
  36 #define __ENDIAN_PAD(x) 0
  37 #endif
  38 #if defined(_WIN32)
  39 #   if defined(__GNUC__) || defined(__TINYC__)
  40 #      define ecere_stdcall __attribute__((__stdcall__))
  41 #      define ecere_gcc_struct __attribute__((gcc_struct))
  42 #   else
  43 #      define ecere_stdcall __stdcall
  44 #      define ecere_gcc_struct
  45 #   endif
  46 #else
  47 #   define ecere_stdcall
  48 #   define ecere_gcc_struct
  49 #endif
  50 #include <stdint.h>
  51 #include <sys/types.h>
  52
  53 static unsigned int i18n;
  54
  55 static unsigned int outputPot;
  56
  57 static unsigned int disabledPooling;
  58
  59 static int targetPlatform;
  60
  61 static int targetBits;
  62
  63 static unsigned int isConsole;
  64
  65 static unsigned int isDynamicLibrary;
  66
  67 static unsigned int isStaticLibrary;
  68
  69 static struct Context * theGlobalContext;
  70
  71 static char mainModuleName[797];
  72
  73 static char projectName[797];
  74
  75 extern struct __ecereNameSpace__ecere__com__Property * __ecereProp___ecereNameSpace__ecere__sys__BinaryTree_first;
  76
  77 extern struct __ecereNameSpace__ecere__com__Property * __ecereProp___ecereNameSpace__ecere__sys__BTNode_next;
  78
  79 extern struct __ecereNameSpace__ecere__com__Property * __ecereProp___ecereNameSpace__ecere__com__Platform_char__PTR_;
  80
  81 extern struct __ecereNameSpace__ecere__com__Property * __ecereProp___ecereNameSpace__ecere__com__MapIterator_map;
  82
  83 extern struct __ecereNameSpace__ecere__com__Property * __ecereProp___ecereNameSpace__ecere__com__Iterator_data;
  84
  85 extern struct __ecereNameSpace__ecere__com__Property * __ecereProp___ecereNameSpace__ecere__com__MapIterator_key;
  86
  87 struct __ecereNameSpace__ecere__sys__OldList
  88 {
  89 void *  first;
  90 void *  last;
  91 int count;
  92 unsigned int offset;
  93 unsigned int circ;
  94 } ecere_gcc_struct;
  95
  96 struct __ecereNameSpace__ecere__com__DataValue
  97 {
  98 union
  99 {
 100 char c;
 101 unsigned char uc;
 102 short s;
 103 unsigned short us;
 104 int i;
 105 unsigned int ui;
 106 void *  p;
 107 float f;
 108 double d;
 109 long long i64;
 110 uint64 ui64;
 111 } ecere_gcc_struct __anon1;
 112 } ecere_gcc_struct;
 113
 114 struct __ecereNameSpace__ecere__com__SerialBuffer
 115 {
 116 unsigned char *  _buffer;
 117 unsigned int count;
 118 unsigned int _size;
 119 unsigned int pos;
 120 } ecere_gcc_struct;
 121
 122 extern void *  __ecereNameSpace__ecere__com__eSystem_New(unsigned int size);
 123
 124 extern void *  __ecereNameSpace__ecere__com__eSystem_New0(unsigned int size);
 125
 126 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew(void *  memory, unsigned int size);
 127
 128 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew0(void *  memory, unsigned int size);
 129
 130 extern void __ecereNameSpace__ecere__com__eSystem_Delete(void *  memory);
 131
 132 struct External;
 133
 134 struct CodePosition
 135 {
 136 int line;
 137 int charPos;
 138 int pos;
 139 int included;
 140 } ecere_gcc_struct;
 141
 142 struct Context;
 143
 144 struct Expression;
 145
 146 extern char *  __ecereNameSpace__ecere__sys__TrimLSpaces(const char *  string, char *  output);
 147
 148 extern int strcmp(const char * , const char * );
 149
 150 extern char *  __ecereNameSpace__ecere__sys__CopyString(const char *  string);
 151
 152 extern char *  __ecereNameSpace__ecere__sys__GetLastDirectory(const char *  string, char *  output);
 153
 154 extern unsigned int __ecereNameSpace__ecere__sys__StripExtension(char *  string);
 155
 156 extern char *  strcpy(char * , const char * );
 157
 158 extern void FixModuleName(char *  moduleName);
 159
 160 extern void FullClassNameCat(char *  output, const char *  className, unsigned int includeTemplateParams);
 161
 162 struct TemplateParameter;
 163
 164 extern int sprintf(char * , const char * , ...);
 165
 166 struct TypeName;
 167
 168 struct Declarator;
 169
 170 struct Identifier;
 171
 172 extern char *  strcat(char * , const char * );
 173
 174 extern int GetHostBits(void);
 175
 176 extern void SetSymbolsDir(const char *  s);
 177
 178 extern int printf(const char * , ...);
 179
 180 extern const char *  __ecereNameSpace__ecere__GetTranslatedString(const char * name, const char *  string, const char *  stringAndContext);
 181
 182 extern char *  __ecereNameSpace__ecere__sys__GetExtension(const char *  string, char *  output);
 183
 184 extern void SetTargetPlatform(int platform);
 185
 186 extern void SetTargetBits(int bits);
 187
 188 extern void SetInSymbolGen(unsigned int b);
 189
 190 struct __ecereNameSpace__ecere__com__IteratorPointer;
 191
 192 extern int __ecereNameSpace__ecere__sys__Tokenize(char *  string, int maxTokens, char *  tokens[], unsigned int esc);
 193
 194 extern int strcasecmp(const char * , const char * );
 195
 196 extern unsigned int LoadSymbols(const char *  fileName, int importType, unsigned int loadDllOnly);
 197
 198 extern void CheckDataRedefinitions(void);
 199
 200 extern char *  __ecereNameSpace__ecere__sys__ChangeExtension(const char *  string, const char *  ext, char *  output);
 201
 202 extern char *  strstr(const char * , const char * );
 203
 204 extern size_t strlen(const char * );
 205
 206 struct ContextStringPair
 207 {
 208 char * string;
 209 char * context;
 210 } ecere_gcc_struct;
 211
 212 struct __ecereNameSpace__ecere__com__CustomAVLTree
 213 {
 214 struct __ecereNameSpace__ecere__com__AVLNode * root;
 215 int count;
 216 } ecere_gcc_struct;
 217
 218 extern char *  __ecereNameSpace__ecere__sys__PathCat(char *  string, const char *  addedPath);
 219
 220 struct Definition;
 221
 222 extern void FreeIncludeFiles(void);
 223
 224 const char *  __ecereProp___ecereNameSpace__ecere__com__Platform_Get_char__PTR_(int this);
 225
 226 int __ecereProp___ecereNameSpace__ecere__com__Platform_Set_char__PTR_(const char *  value);
 227
 228 static struct __ecereNameSpace__ecere__sys__OldList modules;
 229
 230 struct __ecereNameSpace__ecere__sys__OldList _defines =
 231 {
 232 0, 0, 0, 0, 0
 233 };
 234
 235 struct __ecereNameSpace__ecere__sys__OldList _imports =
 236 {
 237 0, 0, 0, 0, 0
 238 };
 239
 240 extern struct __ecereNameSpace__ecere__sys__OldList *  MkList(void);
 241
 242 extern void SetDefines(struct __ecereNameSpace__ecere__sys__OldList *  list);
 243
 244 extern void SetImports(struct __ecereNameSpace__ecere__sys__OldList *  list);
 245
 246 extern void SetExcludedSymbols(struct __ecereNameSpace__ecere__sys__OldList *  list);
 247
 248 extern void FreeExcludedSymbols(struct __ecereNameSpace__ecere__sys__OldList * excludedSymbols);
 249
 250 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 251
 252 void *  __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(struct __ecereNameSpace__ecere__sys__OldList * this, const char *  name, unsigned int warn);
 253
 254 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 255
 256 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(struct __ecereNameSpace__ecere__sys__OldList * this, void (*  freeFn)(void * ));
 257
 258 struct Location
 259 {
 260 struct CodePosition start;
 261 struct CodePosition end;
 262 } ecere_gcc_struct;
 263
 264 extern void FinishTemplatesContext(struct Context * context);
 265
 266 extern void SetGlobalContext(struct Context * context);
 267
 268 extern void SetTopContext(struct Context * context);
 269
 270 extern void SetCurrentContext(struct Context * context);
 271
 272 extern void FreeContext(struct Context * context);
 273
 274 extern struct Declarator * SpecDeclFromString(const char *  string, struct __ecereNameSpace__ecere__sys__OldList *  specs, struct Declarator * baseDecl);
 275
 276 extern struct TypeName * MkTypeName(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Declarator * declarator);
 277
 278 extern struct Declarator * MkDeclaratorIdentifier(struct Identifier * id);
 279
 280 extern struct Identifier * MkIdentifier(const char *  string);
 281
 282 extern void FreeModuleDefine(struct Definition * def);
 283
 284 struct ModuleImport;
 285
 286 static struct ModuleImport * mainModule;
 287
 288 extern struct ModuleImport * GetMainModule(void);
 289
 290 extern void SetMainModule(struct ModuleImport * moduleImport);
 291
 292 struct ModuleImport
 293 {
 294 struct ModuleImport * prev;
 295 struct ModuleImport * next;
 296 char *  name;
 297 struct __ecereNameSpace__ecere__sys__OldList classes;
 298 struct __ecereNameSpace__ecere__sys__OldList functions;
 299 int importType;
 300 int importAccess;
 301 } ecere_gcc_struct;
 302
 303 extern void FreeModuleImport(struct ModuleImport * imp);
 304
 305 struct __ecereNameSpace__ecere__com__Class;
 306
 307 struct __ecereNameSpace__ecere__com__Instance
 308 {
 309 void * *  _vTbl;
 310 struct __ecereNameSpace__ecere__com__Class * _class;
 311 int _refCount;
 312 } ecere_gcc_struct;
 313
 314 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name);
 315
 316 extern void __ecereNameSpace__ecere__com__eClass_SetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, long long value);
 317
 318 static struct __ecereNameSpace__ecere__com__Class * thisAppClass;
 319
 320 extern struct Context * SetupTemplatesContext(struct __ecereNameSpace__ecere__com__Class * _class);
 321
 322 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
 323
 324 extern void __ecereNameSpace__ecere__com__eInstance_SetMethod(struct __ecereNameSpace__ecere__com__Instance * instance, const char *  name, void *  function);
 325
 326 extern void __ecereNameSpace__ecere__com__eInstance_IncRef(struct __ecereNameSpace__ecere__com__Instance * instance);
 327
 328 static struct __ecereNameSpace__ecere__com__Instance * dcomSymbols;
 329
 330 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpen(const char *  fileName, int mode);
 331
 332 extern void __ecereNameSpace__ecere__com__eInstance_Delete(struct __ecereNameSpace__ecere__com__Instance * instance);
 333
 334 extern void OutputTypeName(struct TypeName * type, struct __ecereNameSpace__ecere__com__Instance * f, unsigned int typeName);
 335
 336 struct __ecereNameSpace__ecere__com__MapIterator
 337 {
 338 struct __ecereNameSpace__ecere__com__Instance * container;
 339 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
 340 } ecere_gcc_struct;
 341
 342 struct __ecereNameSpace__ecere__com__Iterator
 343 {
 344 struct __ecereNameSpace__ecere__com__Instance * container;
 345 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
 346 } ecere_gcc_struct;
 347
 348 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(struct __ecereNameSpace__ecere__com__Instance * this, char *  s, int max);
 349
 350 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
 351
 352 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts;
 353
 354 int __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(struct __ecereNameSpace__ecere__com__Instance * this, const char *  format, ...);
 355
 356 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek;
 357
 358 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof;
 359
 360 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Read;
 361
 362 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Write;
 363
 364 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Add;
 365
 366 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_RemoveAll;
 367
 368 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Free;
 369
 370 struct __ecereNameSpace__ecere__com__Instance * __ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_map(struct __ecereNameSpace__ecere__com__MapIterator * this);
 371
 372 void __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(struct __ecereNameSpace__ecere__com__MapIterator * this, struct __ecereNameSpace__ecere__com__Instance * value);
 373
 374 const uint64 __ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_key(struct __ecereNameSpace__ecere__com__MapIterator * this);
 375
 376 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(struct __ecereNameSpace__ecere__com__Iterator * this, const uint64 index, unsigned int create);
 377
 378 uint64 __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(struct __ecereNameSpace__ecere__com__Iterator * this);
 379
 380 void __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(struct __ecereNameSpace__ecere__com__Iterator * this, uint64 value);
 381
 382 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Next();
 383
 384 struct ModuleInfo;
 385
 386 struct ModuleInfo
 387 {
 388 struct ModuleInfo * prev, * next;
 389 char * name;
 390 unsigned int globalInstance;
 391 } ecere_gcc_struct;
 392
 393 struct __ecereNameSpace__ecere__sys__BTNode;
 394
 395 struct __ecereNameSpace__ecere__sys__BTNode
 396 {
 397 uintptr_t key;
 398 struct __ecereNameSpace__ecere__sys__BTNode * parent;
 399 struct __ecereNameSpace__ecere__sys__BTNode * left;
 400 struct __ecereNameSpace__ecere__sys__BTNode * right;
 401 int depth;
 402 } ecere_gcc_struct;
 403
 404 struct __ecereNameSpace__ecere__sys__BTNode * __ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(struct __ecereNameSpace__ecere__sys__BTNode * this);
 405
 406 struct __ecereNameSpace__ecere__com__Property;
 407
 408 extern void __ecereNameSpace__ecere__com__eInstance_FireSelfWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
 409
 410 extern void __ecereNameSpace__ecere__com__eInstance_StopWatching(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property, struct __ecereNameSpace__ecere__com__Instance * object);
 411
 412 extern void __ecereNameSpace__ecere__com__eInstance_Watch(void *  instance, struct __ecereNameSpace__ecere__com__Property * _property, void *  object, void (*  callback)(void * , void * ));
 413
 414 extern void __ecereNameSpace__ecere__com__eInstance_FireWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
 415
 416 struct FunctionImport;
 417
 418 struct FunctionImport
 419 {
 420 struct FunctionImport * prev;
 421 struct FunctionImport * next;
 422 char *  name;
 423 } ecere_gcc_struct;
 424
 425 struct MethodImport;
 426
 427 struct MethodImport
 428 {
 429 struct MethodImport * prev;
 430 struct MethodImport * next;
 431 char *  name;
 432 unsigned int isVirtual;
 433 } ecere_gcc_struct;
 434
 435 struct PropertyImport;
 436
 437 struct PropertyImport
 438 {
 439 struct PropertyImport * prev;
 440 struct PropertyImport * next;
 441 char *  name;
 442 unsigned int isVirtual;
 443 unsigned int hasSet;
 444 unsigned int hasGet;
 445 } ecere_gcc_struct;
 446
 447 struct ImportedModule;
 448
 449 struct ImportedModule
 450 {
 451 struct ImportedModule * prev;
 452 struct ImportedModule * next;
 453 char *  name;
 454 int type;
 455 int importType;
 456 unsigned int globalInstance;
 457 unsigned int dllOnly;
 458 int importAccess;
 459 } ecere_gcc_struct;
 460
 461 struct Type;
 462
 463 struct __ecereNameSpace__ecere__com__Property
 464 {
 465 struct __ecereNameSpace__ecere__com__Property * prev;
 466 struct __ecereNameSpace__ecere__com__Property * next;
 467 const char *  name;
 468 unsigned int isProperty;
 469 int memberAccess;
 470 int id;
 471 struct __ecereNameSpace__ecere__com__Class * _class;
 472 const char *  dataTypeString;
 473 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 474 struct Type * dataType;
 475 void (*  Set)(void * , int);
 476 int (*  Get)(void * );
 477 unsigned int (*  IsSet)(void * );
 478 void *  data;
 479 void *  symbol;
 480 int vid;
 481 unsigned int conversion;
 482 unsigned int watcherOffset;
 483 const char *  category;
 484 unsigned int compiled;
 485 unsigned int selfWatchable;
 486 unsigned int isWatchable;
 487 } ecere_gcc_struct;
 488
 489 extern struct Type * ProcessTypeString(const char *  string, unsigned int staticMethod);
 490
 491 extern void PrintTypeNoConst(struct Type * type, char *  string, unsigned int printName, unsigned int fullName);
 492
 493 extern void PrintType(struct Type * type, char *  string, unsigned int printName, unsigned int fullName);
 494
 495 struct __ecereNameSpace__ecere__com__BTNamedLink;
 496
 497 struct __ecereNameSpace__ecere__com__BTNamedLink
 498 {
 499 const char *  name;
 500 struct __ecereNameSpace__ecere__com__BTNamedLink * parent;
 501 struct __ecereNameSpace__ecere__com__BTNamedLink * left;
 502 struct __ecereNameSpace__ecere__com__BTNamedLink * right;
 503 int depth;
 504 void *  data;
 505 } ecere_gcc_struct;
 506
 507 struct __ecereNameSpace__ecere__sys__OldLink;
 508
 509 struct __ecereNameSpace__ecere__sys__OldLink
 510 {
 511 struct __ecereNameSpace__ecere__sys__OldLink * prev;
 512 struct __ecereNameSpace__ecere__sys__OldLink * next;
 513 void *  data;
 514 } ecere_gcc_struct;
 515
 516 struct Symbol;
 517
 518 extern void DeclareClass(struct External * neededFor, struct Symbol * classSym, const char *  className);
 519
 520 extern struct Symbol * FindClass(const char *  name);
 521
 522 struct __ecereNameSpace__ecere__com__NameSpace;
 523
 524 extern void SetGlobalData(struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace);
 525
 526 struct ClassImport;
 527
 528 struct ClassImport
 529 {
 530 struct ClassImport * prev;
 531 struct ClassImport * next;
 532 char *  name;
 533 struct __ecereNameSpace__ecere__sys__OldList methods;
 534 struct __ecereNameSpace__ecere__sys__OldList properties;
 535 unsigned int itself;
 536 int isRemote;
 537 } ecere_gcc_struct;
 538
 539 struct __ecereNameSpace__ecere__com__Method;
 540
 541 struct __ecereNameSpace__ecere__com__Method
 542 {
 543 const char *  name;
 544 struct __ecereNameSpace__ecere__com__Method * parent;
 545 struct __ecereNameSpace__ecere__com__Method * left;
 546 struct __ecereNameSpace__ecere__com__Method * right;
 547 int depth;
 548 int (*  function)();
 549 int vid;
 550 int type;
 551 struct __ecereNameSpace__ecere__com__Class * _class;
 552 void *  symbol;
 553 const char *  dataTypeString;
 554 struct Type * dataType;
 555 int memberAccess;
 556 } ecere_gcc_struct;
 557
 558 struct Symbol
 559 {
 560 char *  string;
 561 struct Symbol * parent;
 562 struct Symbol * left;
 563 struct Symbol * right;
 564 int depth;
 565 struct Type * type;
 566 union
 567 {
 568 struct __ecereNameSpace__ecere__com__Method * method;
 569 struct __ecereNameSpace__ecere__com__Property * _property;
 570 struct __ecereNameSpace__ecere__com__Class * registered;
 571 } ecere_gcc_struct __anon1;
 572 unsigned int notYetDeclared;
 573 union
 574 {
 575 struct
 576 {
 577 struct External * pointerExternal;
 578 struct External * structExternal;
 579 } ecere_gcc_struct __anon1;
 580 struct
 581 {
 582 struct External * externalGet;
 583 struct External * externalSet;
 584 struct External * externalPtr;
 585 struct External * externalIsSet;
 586 } ecere_gcc_struct __anon2;
 587 struct
 588 {
 589 struct External * methodExternal;
 590 struct External * methodCodeExternal;
 591 } ecere_gcc_struct __anon3;
 592 } ecere_gcc_struct __anon2;
 593 unsigned int imported;
 594 unsigned int declaredStructSym;
 595 struct __ecereNameSpace__ecere__com__Class * _class;
 596 unsigned int declaredStruct;
 597 unsigned int needConstructor;
 598 unsigned int needDestructor;
 599 char *  constructorName;
 600 char *  structName;
 601 char *  className;
 602 char *  destructorName;
 603 struct ModuleImport * module;
 604 struct ClassImport * _import;
 605 struct Location nameLoc;
 606 unsigned int isParam;
 607 unsigned int isRemote;
 608 unsigned int isStruct;
 609 unsigned int fireWatchersDone;
 610 int declaring;
 611 unsigned int classData;
 612 unsigned int isStatic;
 613 char *  shortName;
 614 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
 615 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
 616 struct Context * ctx;
 617 int isIterator;
 618 struct Expression * propCategory;
 619 unsigned int mustRegister;
 620 } ecere_gcc_struct;
 621
 622 struct Type
 623 {
 624 struct Type * prev;
 625 struct Type * next;
 626 int refCount;
 627 union
 628 {
 629 struct Symbol * _class;
 630 struct
 631 {
 632 struct __ecereNameSpace__ecere__sys__OldList members;
 633 char *  enumName;
 634 } ecere_gcc_struct __anon1;
 635 struct
 636 {
 637 struct Type * returnType;
 638 struct __ecereNameSpace__ecere__sys__OldList params;
 639 struct Symbol * thisClass;
 640 unsigned int staticMethod;
 641 struct TemplateParameter * thisClassTemplate;
 642 } ecere_gcc_struct __anon2;
 643 struct
 644 {
 645 struct __ecereNameSpace__ecere__com__Method * method;
 646 struct __ecereNameSpace__ecere__com__Class * methodClass;
 647 struct __ecereNameSpace__ecere__com__Class * usedClass;
 648 } ecere_gcc_struct __anon3;
 649 struct
 650 {
 651 struct Type * arrayType;
 652 int arraySize;
 653 struct Expression * arraySizeExp;
 654 unsigned int freeExp;
 655 struct Symbol * enumClass;
 656 } ecere_gcc_struct __anon4;
 657 struct Type * type;
 658 struct TemplateParameter * templateParameter;
 659 } ecere_gcc_struct __anon1;
 660 int kind;
 661 unsigned int size;
 662 char *  name;
 663 char *  typeName;
 664 struct __ecereNameSpace__ecere__com__Class * thisClassFrom;
 665 int classObjectType;
 666 int alignment;
 667 unsigned int offset;
 668 int bitFieldCount;
 669 int count;
 670 unsigned int isSigned : 1;
 671 unsigned int constant : 1;
 672 unsigned int truth : 1;
 673 unsigned int byReference : 1;
 674 unsigned int extraParam : 1;
 675 unsigned int directClassAccess : 1;
 676 unsigned int computing : 1;
 677 unsigned int keepCast : 1;
 678 unsigned int passAsTemplate : 1;
 679 unsigned int dllExport : 1;
 680 unsigned int attrStdcall : 1;
 681 unsigned int declaredWithStruct : 1;
 682 unsigned int typedByReference : 1;
 683 unsigned int casted : 1;
 684 unsigned int pointerAlignment : 1;
 685 unsigned int isLong : 1;
 686 } ecere_gcc_struct;
 687
 688 extern void DeclareMethod(struct External * neededFor, struct __ecereNameSpace__ecere__com__Method * method, const char *  name);
 689
 690 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_AddMethod(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, const char *  type, void *  function, int declMode);
 691
 692 struct __ecereNameSpace__ecere__sys__OldList _excludedSymbols =
 693 {
 694 0, 0, 0, (unsigned int)(uintptr_t)&((struct Symbol *)(void * )0)->left, 0
 695 };
 696
 697 struct __ecereNameSpace__ecere__com__Module;
 698
 699 static struct __ecereNameSpace__ecere__com__Instance * privateModule;
 700
 701 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_FindClass(struct __ecereNameSpace__ecere__com__Instance * module, const char *  name);
 702
 703 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_FindMethod(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, struct __ecereNameSpace__ecere__com__Instance * module);
 704
 705 extern void SetPrivateModule(struct __ecereNameSpace__ecere__com__Instance * module);
 706
 707 extern void ComputeModuleClasses(struct __ecereNameSpace__ecere__com__Instance * module);
 708
 709 extern void FreeTypeData(struct __ecereNameSpace__ecere__com__Instance * privateModule);
 710
 711 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_RegisterClass(int type, const char *  name, const char *  baseName, int size, int sizeClass, unsigned int (*  Constructor)(void * ), void (*  Destructor)(void * ), struct __ecereNameSpace__ecere__com__Instance * module, int declMode, int inheritanceAccess);
 712
 713 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
 714
 715 struct __ecereNameSpace__ecere__com__Application;
 716
 717 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__com____ecere_COM_Initialize(unsigned int guiApp, int argc, char *  argv[]);
 718
 719 struct __ecereNameSpace__ecere__sys__BinaryTree;
 720
 721 struct __ecereNameSpace__ecere__sys__BinaryTree
 722 {
 723 struct __ecereNameSpace__ecere__sys__BTNode * root;
 724 int count;
 725 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
 726 void (*  FreeKey)(void *  key);
 727 } ecere_gcc_struct;
 728
 729 struct __ecereNameSpace__ecere__com__NameSpace
 730 {
 731 const char *  name;
 732 struct __ecereNameSpace__ecere__com__NameSpace *  btParent;
 733 struct __ecereNameSpace__ecere__com__NameSpace *  left;
 734 struct __ecereNameSpace__ecere__com__NameSpace *  right;
 735 int depth;
 736 struct __ecereNameSpace__ecere__com__NameSpace *  parent;
 737 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
 738 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
 739 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
 740 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
 741 } ecere_gcc_struct;
 742
 743 struct __ecereNameSpace__ecere__sys__BTNode * __ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(struct __ecereNameSpace__ecere__sys__BinaryTree * this);
 744
 745 int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, const char *  a, const char *  b);
 746
 747 struct __ecereNameSpace__ecere__com__Application
 748 {
 749 int argc;
 750 const char * *  argv;
 751 int exitCode;
 752 unsigned int isGUIApp;
 753 struct __ecereNameSpace__ecere__sys__OldList allModules;
 754 char *  parsedCommand;
 755 struct __ecereNameSpace__ecere__com__NameSpace systemNameSpace;
 756 } ecere_gcc_struct;
 757
 758 struct __ecereNameSpace__ecere__com__Module
 759 {
 760 struct __ecereNameSpace__ecere__com__Instance * application;
 761 struct __ecereNameSpace__ecere__sys__OldList classes;
 762 struct __ecereNameSpace__ecere__sys__OldList defines;
 763 struct __ecereNameSpace__ecere__sys__OldList functions;
 764 struct __ecereNameSpace__ecere__sys__OldList modules;
 765 struct __ecereNameSpace__ecere__com__Instance * prev;
 766 struct __ecereNameSpace__ecere__com__Instance * next;
 767 const char *  name;
 768 void *  library;
 769 void *  Unload;
 770 int importType;
 771 int origImportType;
 772 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
 773 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
 774 } ecere_gcc_struct;
 775
 776 static struct __ecereNameSpace__ecere__com__NameSpace globalData;
 777
 778 extern void FreeGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * globalDataList);
 779
 780 void __ecereUnregisterModule_ecs(struct __ecereNameSpace__ecere__com__Instance * module)
 781 {
 782
 783 }
 784
 785 struct __ecereNameSpace__ecere__com__DataMember;
 786
 787 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 788 {
 789 union
 790 {
 791 struct
 792 {
 793 const char *  dataTypeString;
 794 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 795 } ecere_gcc_struct __anon1;
 796 struct __ecereNameSpace__ecere__com__DataValue expression;
 797 struct
 798 {
 799 const char *  memberString;
 800 union
 801 {
 802 struct __ecereNameSpace__ecere__com__DataMember * member;
 803 struct __ecereNameSpace__ecere__com__Property * prop;
 804 struct __ecereNameSpace__ecere__com__Method * method;
 805 } ecere_gcc_struct __anon1;
 806 } ecere_gcc_struct __anon2;
 807 } ecere_gcc_struct __anon1;
 808 } ecere_gcc_struct;
 809
 810 struct __ecereNameSpace__ecere__com__DataMember
 811 {
 812 struct __ecereNameSpace__ecere__com__DataMember * prev;
 813 struct __ecereNameSpace__ecere__com__DataMember * next;
 814 const char *  name;
 815 unsigned int isProperty;
 816 int memberAccess;
 817 int id;
 818 struct __ecereNameSpace__ecere__com__Class * _class;
 819 const char *  dataTypeString;
 820 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 821 struct Type * dataType;
 822 int type;
 823 int offset;
 824 int memberID;
 825 struct __ecereNameSpace__ecere__sys__OldList members;
 826 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 827 int memberOffset;
 828 short structAlignment;
 829 short pointerAlignment;
 830 } ecere_gcc_struct;
 831
 832 struct __ecereNameSpace__ecere__com__Class
 833 {
 834 struct __ecereNameSpace__ecere__com__Class * prev;
 835 struct __ecereNameSpace__ecere__com__Class * next;
 836 const char *  name;
 837 int offset;
 838 int structSize;
 839 void * *  _vTbl;
 840 int vTblSize;
 841 unsigned int (*  Constructor)(void * );
 842 void (*  Destructor)(void * );
 843 int offsetClass;
 844 int sizeClass;
 845 struct __ecereNameSpace__ecere__com__Class * base;
 846 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
 847 struct __ecereNameSpace__ecere__sys__BinaryTree members;
 848 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
 849 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
 850 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
 851 struct __ecereNameSpace__ecere__sys__OldList derivatives;
 852 int memberID;
 853 int startMemberID;
 854 int type;
 855 struct __ecereNameSpace__ecere__com__Instance * module;
 856 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
 857 const char *  dataTypeString;
 858 struct Type * dataType;
 859 int typeSize;
 860 int defaultAlignment;
 861 void (*  Initialize)();
 862 int memberOffset;
 863 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
 864 const char *  designerClass;
 865 unsigned int noExpansion;
 866 const char *  defaultProperty;
 867 unsigned int comRedefinition;
 868 int count;
 869 int isRemote;
 870 unsigned int internalDecl;
 871 void *  data;
 872 unsigned int computeSize;
 873 short structAlignment;
 874 short pointerAlignment;
 875 int destructionWatchOffset;
 876 unsigned int fixed;
 877 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
 878 int inheritanceAccess;
 879 const char *  fullName;
 880 void *  symbol;
 881 struct __ecereNameSpace__ecere__sys__OldList conversions;
 882 struct __ecereNameSpace__ecere__sys__OldList templateParams;
 883 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
 884 struct __ecereNameSpace__ecere__com__Class * templateClass;
 885 struct __ecereNameSpace__ecere__sys__OldList templatized;
 886 int numParams;
 887 unsigned int isInstanceClass;
 888 unsigned int byValueSystemClass;
 889 } ecere_gcc_struct;
 890
 891 static struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleInfo;
 892
 893 static struct __ecereNameSpace__ecere__com__Class * __ecereClass_SymbolgenApp;
 894
 895 static struct __ecereNameSpace__ecere__com__Class * FindAppClass(struct __ecereNameSpace__ecere__com__NameSpace * nameSpace, unsigned int thisModule)
 896 {
 897 struct __ecereNameSpace__ecere__com__BTNamedLink * link;
 898 struct __ecereNameSpace__ecere__com__NameSpace * ns;
 899
 900 for(link = (struct __ecereNameSpace__ecere__com__BTNamedLink *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&(*nameSpace).classes); link; link = (struct __ecereNameSpace__ecere__com__BTNamedLink *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)link)))
 901 {
 902 struct __ecereNameSpace__ecere__com__Class * _class = link->data;
 903
 904 if(strcmp(_class->fullName, "ecere::com::Application") && (!thisModule || _class->module == privateModule))
 905 {
 906 struct __ecereNameSpace__ecere__com__Class * base;
 907
 908 for(base = _class->base; base && base->type != 1000; base = base->base)
 909 if(!strcmp(base->fullName, "ecere::com::Application"))
 910 return _class;
 911 }
 912 }
 913 for(ns = (struct __ecereNameSpace__ecere__com__NameSpace *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&(*nameSpace).nameSpaces); ns; ns = (struct __ecereNameSpace__ecere__com__NameSpace *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)ns)))
 914 {
 915 struct __ecereNameSpace__ecere__com__Class * _class = FindAppClass(ns, thisModule);
 916
 917 if(_class)
 918 return _class;
 919 }
 920 return (((void *)0));
 921 }
 922
 923 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
 924
 925 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MethodImport;
 926
 927 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyImport;
 928
 929 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
 930
 931 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionImport;
 932
 933 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__TempFile;
 934
 935 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Map_TPL_ContextStringPair__ecere__com__List_TPL_String___;
 936
 937 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ImportedModule;
 938
 939 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List_TPL_String_;
 940
 941 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
 942
 943 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__File;
 944
 945 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
 946
 947 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Application;
 948
 949 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List;
 950
 951 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__CustomAVLTree;
 952
 953 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Map;
 954
 955 static void LoadImports(const char * fileName)
 956 {
 957 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__sys__FileOpen(fileName, 1);
 958
 959 if(f)
 960 {
 961 for(; ; )
 962 {
 963 char line[1024];
 964
 965 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
 966 break;
 967 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 968 if(line[0] == '[')
 969 {
 970 if(!strcmp(line, "[Imported Modules]"))
 971 {
 972 struct ModuleImport * module = (((void *)0));
 973
 974 for(; ; )
 975 {
 976 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
 977 break;
 978 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 979 if(!strcmp(line, "."))
 980 break;
 981 if(line[0] == '[')
 982 {
 983 struct ClassImport * _class = (((void *)0));
 984 struct FunctionImport * function = (((void *)0));
 985
 986 if(!strcmp(line, "[This]"))
 987 {
 988 if((mainModule = GetMainModule()))
 989 module = mainModule;
 990 else
 991 {
 992 mainModule = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ModuleImport);
 993 SetMainModule(mainModule);
 994 module = mainModule;
 995 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&_imports, module);
 996 }
 997 }
 998 else if(!strcmp(line, "[Static]"))
 999 {
1000 module->importType = 1;
1001 }
1002 else if(!strcmp(line, "[Remote]"))
1003 {
1004 module->importType = 2;
1005 }
1006 else if(!strcmp(line, "[Private]"))
1007 {
1008 if(module->importAccess != 1)
1009 module->importAccess = 2;
1010 }
1011 else if(!strcmp(line, "[Public]"))
1012 {
1013 module->importAccess = 1;
1014 }
1015 else if(!strcmp(line, "[Imported Classes]"))
1016 {
1017 for(; ; )
1018 {
1019 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1020 break;
1021 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1022 if(!strcmp(line, "."))
1023 break;
1024 if(line[0] == '[')
1025 {
1026 if(!strcmp(line, "[Instantiated]"))
1027 {
1028 _class->itself = 1;
1029 }
1030 else if(!strcmp(line, "[Remote]"))
1031 {
1032 _class->isRemote = 1;
1033 }
1034 else if(!strcmp(line, "[Imported Methods]"))
1035 {
1036 struct MethodImport * method = (((void *)0));
1037
1038 for(; ; )
1039 {
1040 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1041 break;
1042 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1043 if(!strcmp(line, "."))
1044 break;
1045 if(line[0] != '[')
1046 {
1047 if(!(method = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&_class->methods, line, 0)))
1048 {
1049 method = __extension__ ({
1050 struct MethodImport * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_MethodImport);
1051
1052 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(line), __ecereInstance1;
1053 });
1054 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&_class->methods, method);
1055 }
1056 }
1057 else if(!strcmp(line, "[Virtual]"))
1058 method->isVirtual = 1;
1059 }
1060 }
1061 else if(!strcmp(line, "[Imported Properties]"))
1062 {
1063 struct PropertyImport * prop = (((void *)0));
1064
1065 for(; ; )
1066 {
1067 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1068 break;
1069 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1070 if(!strcmp(line, "."))
1071 break;
1072 if(line[0] != '[')
1073 {
1074 if(!(prop = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&_class->properties, line, 0)))
1075 {
1076 prop = __extension__ ({
1077 struct PropertyImport * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_PropertyImport);
1078
1079 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(line), __ecereInstance1;
1080 });
1081 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&_class->properties, prop);
1082 }
1083 }
1084 else if(!strcmp(line, "[Set]"))
1085 prop->hasSet = 1;
1086 else if(!strcmp(line, "[Get]"))
1087 prop->hasGet = 1;
1088 else if(!strcmp(line, "[Virtual]"))
1089 prop->isVirtual = 1;
1090 }
1091 }
1092 }
1093 else
1094 {
1095 if(!(_class = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&module->classes, line, 0)))
1096 {
1097 _class = __extension__ ({
1098 struct ClassImport * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassImport);
1099
1100 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(line), __ecereInstance1;
1101 });
1102 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&module->classes, _class);
1103 }
1104 }
1105 }
1106 }
1107 else if(!strcmp(line, "[Imported Functions]"))
1108 {
1109 for(; ; )
1110 {
1111 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1112 break;
1113 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1114 if(!strcmp(line, "."))
1115 break;
1116 if(line[0] == '[')
1117 {
1118 }
1119 else
1120 {
1121 if(!(function = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&module->functions, line, 0)))
1122 {
1123 function = __extension__ ({
1124 struct FunctionImport * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_FunctionImport);
1125
1126 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(line), __ecereInstance1;
1127 });
1128 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&module->functions, function);
1129 }
1130 }
1131 }
1132 }
1133 }
1134 else
1135 {
1136 if(!(module = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&_imports, line, 0)))
1137 {
1138 if(!strcmp(line, "ecereCOM"))
1139 {
1140 module = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&_imports, "ecere", 0);
1141 }
1142 else if(!strcmp(line, "ecere"))
1143 {
1144 module = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&_imports, "ecereCOM", 0);
1145 if(module)
1146 {
1147 (__ecereNameSpace__ecere__com__eSystem_Delete(module->name), module->name = 0);
1148 module->name = __ecereNameSpace__ecere__sys__CopyString("ecere");
1149 }
1150 }
1151 if(!module)
1152 {
1153 module = __extension__ ({
1154 struct ModuleImport * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ModuleImport);
1155
1156 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(line), __ecereInstance1;
1157 });
1158 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&_imports, module);
1159 }
1160 }
1161 }
1162 }
1163 }
1164 }
1165 }
1166 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
1167 }
1168 }
1169
1170 void __ecereCreateModuleInstances_ecs()
1171 {
1172 (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);
1173 theGlobalContext = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1174 }
1175
1176 void __ecereDestroyModuleInstances_ecs()
1177 {
1178 ((theGlobalContext ? (__ecereClass_Context->Destructor ? __ecereClass_Context->Destructor((void *)theGlobalContext) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(theGlobalContext)) : 0), theGlobalContext = 0);
1179 }
1180
1181 static void BindDCOMClient()
1182 {
1183 struct __ecereNameSpace__ecere__com__Class * dcomClientObjectClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, "ecere::net::DCOMClientObject");
1184 struct __ecereNameSpace__ecere__sys__OldLink * deriv;
1185
1186 if(dcomClientObjectClass && dcomClientObjectClass->derivatives.first)
1187 {
1188 struct __ecereNameSpace__ecere__com__Instance * f;
1189
1190 if(!dcomSymbols)
1191 dcomSymbols = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__sys__TempFile);
1192 f = dcomSymbols;
1193 for(deriv = dcomClientObjectClass->derivatives.first; deriv; deriv = deriv->next)
1194 {
1195 struct __ecereNameSpace__ecere__com__Class * _class = deriv->data;
1196 struct __ecereNameSpace__ecere__com__Method * method, * next;
1197 int id = 0;
1198 int vid;
1199 unsigned int doVirtual;
1200
1201 DeclareClass((((void *)0)), FindClass("ecere::net::DCOMClientObject"), "__ecereClass___ecereNameSpace__ecere__net__DCOMClientObject");
1202 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "class %s : ecere::net::DCOMClientObject\n", _class->fullName);
1203 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "{\n");
1204 if(_class->vTblSize > _class->base->vTblSize)
1205 {
1206 int vid;
1207
1208 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   virtual void CallVirtualMethod(uint __ecereMethodID, SerialBuffer __ecereBuffer)\n");
1209 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   {\n");
1210 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      switch(__ecereMethodID)\n");
1211 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      {\n");
1212 for(vid = _class->base->vTblSize; vid < _class->vTblSize; vid++)
1213 {
1214 struct __ecereNameSpace__ecere__com__Method * method;
1215
1216 for(method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods); method; method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)method)))
1217 {
1218 if(method->type == 1 && method->_class == _class && method->vid == vid)
1219 break;
1220 }
1221 if(method)
1222 {
1223 struct Type * param;
1224
1225 method->dataType = ProcessTypeString(method->dataTypeString, 0);
1226 if(method->dataType && method->dataType->name)
1227 {
1228 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         case %d:\n", vid - _class->base->vTblSize);
1229 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         {\n");
1230 {
1231 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1232 {
1233 struct TypeName * resultType;
1234 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1235 struct Declarator * decl;
1236 char type[1024] = "";
1237 char className[1024];
1238 struct Symbol * classSym;
1239
1240 if(method->dataType->__anon1.__anon2.returnType->kind == 8)
1241 classSym = method->dataType->__anon1.__anon2.returnType->__anon1._class;
1242 else
1243 {
1244 PrintTypeNoConst(method->dataType->__anon1.__anon2.returnType, type, 0, 1);
1245 classSym = FindClass(type);
1246 type[0] = (char)0;
1247 }
1248 strcpy(className, "__ecereClass_");
1249 FullClassNameCat(className, classSym->string, 1);
1250 DeclareClass((((void *)0)), classSym, className);
1251 PrintType(method->dataType->__anon1.__anon2.returnType, type, 1, 1);
1252 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier("__ecereResult")));
1253 resultType = MkTypeName(specs, decl);
1254 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1255 OutputTypeName(resultType, f, 0);
1256 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n");
1257 }
1258 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1259 {
1260 if(param->kind == 8 && !strcmp(param->__anon1._class->string, "String"))
1261 {
1262 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            char %s[1024];\n", param->name);
1263 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1264 DeclareClass((((void *)0)), FindClass("String"), "__ecereClass_String");
1265 }
1266 else
1267 {
1268 struct TypeName * paramTypeName;
1269 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1270 struct Declarator * decl;
1271 char type[1024] = "";
1272 char className[1024];
1273 struct Symbol * classSym;
1274
1275 if(param->kind == 8)
1276 classSym = param->__anon1._class;
1277 else
1278 {
1279 PrintTypeNoConst(param, type, 0, 1);
1280 classSym = FindClass(type);
1281 type[0] = (char)0;
1282 }
1283 strcpy(className, "__ecereClass_");
1284 FullClassNameCat(className, classSym->string, 1);
1285 DeclareClass((((void *)0)), classSym, className);
1286 PrintType(param, type, 1, 1);
1287 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier(param->name)));
1288 paramTypeName = MkTypeName(specs, decl);
1289 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1290 OutputTypeName(paramTypeName, f, 0);
1291 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n");
1292 }
1293 }
1294 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1295 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1296 {
1297 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Unserialize(");
1298 if(param->kind == 8 && !strcmp(param->__anon1._class->string, "String"))
1299 {
1300 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1301 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "(StaticString)");
1302 }
1303 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
1304 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
1305
1306 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
1307 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, param->name);
1308 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ");\n");
1309 }
1310 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1311 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1312 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "__ecereResult = ");
1313 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "%s(", method->name);
1314 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1315 {
1316 if(param->prev)
1317 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ", ");
1318 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "%s", param->name);
1319 }
1320 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ");\n");
1321 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1322 {
1323 if(param->kind == 8 && ((param->__anon1._class && param->__anon1._class->__anon1.registered && param->__anon1._class->__anon1.registered->type == 1) || !strcmp(param->__anon1._class->string, "String")) && !param->constant)
1324 {
1325 if(!strcmp(param->__anon1._class->string, "String"))
1326 {
1327 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1328 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize((StaticString)%s);\n", param->name);
1329 }
1330 else
1331 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize(%s);\n", param->name);
1332 }
1333 }
1334 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1335 {
1336 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize(__ecereResult);\n");
1337 }
1338 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1339 {
1340 if(param->kind == 8 && strcmp(param->__anon1._class->string, "String") && param->__anon1._class->__anon1.registered && (param->__anon1._class->__anon1.registered->type == 0 || param->__anon1._class->__anon1.registered->type == 5))
1341 {
1342 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            delete %s;\n", param->name);
1343 }
1344 }
1345 if(method->dataType->__anon1.__anon2.returnType->kind == 8 && strcmp(method->dataType->__anon1.__anon2.returnType->__anon1._class->string, "String") && method->dataType->__anon1.__anon2.returnType->__anon1._class->__anon1.registered && (method->dataType->__anon1.__anon2.returnType->__anon1._class->__anon1.registered->type == 0 || method->dataType->__anon1.__anon2.returnType->__anon1._class->__anon1.registered->type == 5))
1346 {
1347 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            delete __ecereResult;\n");
1348 }
1349 }
1350 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            break;\n");
1351 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         }\n");
1352 }
1353 }
1354 }
1355 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      }\n");
1356 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   }\n");
1357 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1358 }
1359 doVirtual = 1;
1360 id = 0;
1361 vid = _class->base->vTblSize;
1362 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods);
1363 while(next && ((next->type == 1) != doVirtual || (doVirtual && next->vid != vid)))
1364 {
1365 id++;
1366 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)next));
1367 if(!next && doVirtual)
1368 {
1369 if(vid == _class->vTblSize)
1370 doVirtual = 0;
1371 else
1372 vid++;
1373 id = 0;
1374 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods);
1375 }
1376 }
1377 for(method = next; method; method = next)
1378 {
1379 struct Type * param;
1380
1381 if(!method->dataType)
1382 method->dataType = ProcessTypeString(method->dataTypeString, 0);
1383 if(method->dataType->name)
1384 {
1385 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   ");
1386 if(doVirtual)
1387 {
1388 char name[1024];
1389
1390 strcpy(name, "__ecereVMethodID_");
1391 FullClassNameCat(name, method->_class->fullName, 1);
1392 strcat(name, "_");
1393 strcat(name, method->name);
1394 DeclareMethod((((void *)0)), method, name);
1395 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "virtual ");
1396 }
1397 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "%s\n", method->dataTypeString);
1398 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   {\n");
1399 if(method->dataType)
1400 {
1401 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1402 {
1403 struct TypeName * resultType;
1404 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1405 struct Declarator * decl;
1406 char type[1024] = "";
1407 char className[1024];
1408 struct Symbol * classSym;
1409
1410 if(method->dataType->__anon1.__anon2.returnType->kind == 8)
1411 classSym = method->dataType->__anon1.__anon2.returnType->__anon1._class;
1412 else
1413 {
1414 PrintTypeNoConst(method->dataType->__anon1.__anon2.returnType, type, 0, 1);
1415 classSym = FindClass(type);
1416 type[0] = (char)0;
1417 }
1418 strcpy(className, "__ecereClass_");
1419 FullClassNameCat(className, classSym->string, 1);
1420 DeclareClass((((void *)0)), classSym, className);
1421 PrintType(method->dataType->__anon1.__anon2.returnType, type, 1, 1);
1422 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier("__ecereResult")));
1423 resultType = MkTypeName(specs, decl);
1424 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      ");
1425 OutputTypeName(resultType, f, 0);
1426 if(method->dataType->__anon1.__anon2.returnType->kind == 9)
1427 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " = { 0 }");
1428 else if(method->dataType->__anon1.__anon2.returnType->kind == 8 && method->dataType->__anon1.__anon2.returnType->__anon1._class->__anon1.registered && method->dataType->__anon1.__anon2.returnType->__anon1._class->__anon1.registered->type == 1)
1429 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " { }");
1430 else
1431 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " = 0");
1432 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n\n");
1433 }
1434 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      incref this;\n");
1435 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1436 {
1437 char type[1024] = "";
1438 char className[1024];
1439 struct Symbol * classSym;
1440
1441 if(param->kind == 8)
1442 classSym = param->__anon1._class;
1443 else
1444 {
1445 PrintTypeNoConst(param, type, 0, 1);
1446 classSym = FindClass(type);
1447 type[0] = (char)0;
1448 }
1449 strcpy(className, "__ecereClass_");
1450 FullClassNameCat(className, classSym->string, 1);
1451 DeclareClass((((void *)0)), classSym, className);
1452 if(param->kind == 8 && !strcmp(param->__anon1._class->string, "String"))
1453 {
1454 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1455 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereBuffer.Serialize((StaticString)%s);\n", param->name);
1456 }
1457 else
1458 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereBuffer.Serialize(%s);\n", param->name);
1459 }
1460 DeclareMethod((((void *)0)), __ecereNameSpace__ecere__com__eClass_FindMethod(__ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, "ecere::net::DCOMClientObject"), "CallMethod", privateModule), "__ecereMethod___ecereNameSpace__ecere__net__DCOMClientObject_CallMethod");
1461 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      if(DCOMClientObject::CallMethod(%d))\n", id++);
1462 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      {\n");
1463 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1464 {
1465 if(param->kind == 8 && ((param->__anon1._class && param->__anon1._class->__anon1.registered && param->__anon1._class->__anon1.registered->type == 1) || !strcmp(param->__anon1._class->string, "String")) && !param->constant)
1466 {
1467 if(!strcmp(param->__anon1._class->string, "String"))
1468 {
1469 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1470 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereBuffer.Unserialize((StaticString)%s);\n", param->name);
1471 }
1472 else
1473 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereBuffer.Unserialize(%s);\n", param->name);
1474 }
1475 }
1476 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1477 {
1478 if(method->dataType->__anon1.__anon2.returnType->kind == 8 && !strcmp(method->dataType->__anon1.__anon2.returnType->__anon1._class->string, "String"))
1479 {
1480 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1481 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereBuffer.Unserialize((StaticString)__ecereResult);\n");
1482 }
1483 else
1484 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereBuffer.Unserialize(__ecereResult);\n");
1485 }
1486 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      }\n");
1487 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereBuffer.Free();\n");
1488 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      delete this;\n");
1489 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1490 {
1491 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      return __ecereResult;\n");
1492 }
1493 }
1494 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   }\n");
1495 }
1496 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)method));
1497 while(next && ((next->type == 1) != doVirtual || (doVirtual && next->vid != vid)))
1498 {
1499 id++;
1500 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)next));
1501 if(!next && doVirtual)
1502 {
1503 if(vid == _class->vTblSize)
1504 doVirtual = 0;
1505 else
1506 vid++;
1507 id = 0;
1508 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods);
1509 }
1510 }
1511 if(next)
1512 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1513 }
1514 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "}\n");
1515 if(deriv->next)
1516 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1517 }
1518 }
1519 }
1520
1521 static void BindDCOMServer()
1522 {
1523 unsigned int mutexDeclared = 0;
1524 struct __ecereNameSpace__ecere__com__Class * _class;
1525
1526 for(_class = ((struct __ecereNameSpace__ecere__com__Module *)(((char *)privateModule + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->classes.first; _class; _class = _class->next)
1527 {
1528 if(_class->isRemote == 3)
1529 break;
1530 }
1531 if(_class)
1532 {
1533 struct __ecereNameSpace__ecere__com__Instance * f;
1534
1535 if(!dcomSymbols)
1536 dcomSymbols = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__sys__TempFile);
1537 f = dcomSymbols;
1538 DeclareClass((((void *)0)), FindClass("ecere::net::DCOMServerObject"), "__ecereClass___ecereNameSpace__ecere__net__DCOMServerObject");
1539 for(_class = ((struct __ecereNameSpace__ecere__com__Module *)(((char *)privateModule + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->classes.first; _class; _class = _class->next)
1540 {
1541 if(_class->isRemote == 3)
1542 {
1543 struct __ecereNameSpace__ecere__com__Method * method;
1544 int id = 0;
1545 int vid;
1546
1547 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "class DCOM%s : ecere::net::DCOMServerObject\n", _class->fullName);
1548 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "{\n");
1549 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   virtual void CallMethod(uint __ecereMethodID, SerialBuffer __ecereBuffer)\n");
1550 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   {\n");
1551 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      %s inst = (%s)instance;\n", _class->fullName, _class->fullName);
1552 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      incref inst;\n");
1553 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      switch(__ecereMethodID)\n");
1554 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      {\n");
1555 for(method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods); method; method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)method)))
1556 {
1557 struct Type * param;
1558
1559 method->dataType = ProcessTypeString(method->dataTypeString, 0);
1560 if(method->dataType && method->dataType->name)
1561 {
1562 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         case %d:\n", id++);
1563 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         {\n");
1564 {
1565 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1566 {
1567 struct TypeName * resultType;
1568 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1569 struct Declarator * decl;
1570 char type[1024] = "";
1571 char className[1024];
1572 struct Symbol * classSym;
1573
1574 if(method->dataType->__anon1.__anon2.returnType->kind == 8)
1575 classSym = method->dataType->__anon1.__anon2.returnType->__anon1._class;
1576 else
1577 {
1578 PrintTypeNoConst(method->dataType->__anon1.__anon2.returnType, type, 0, 1);
1579 classSym = FindClass(type);
1580 type[0] = (char)0;
1581 }
1582 strcpy(className, "__ecereClass_");
1583 FullClassNameCat(className, classSym->string, 1);
1584 DeclareClass((((void *)0)), classSym, className);
1585 PrintType(method->dataType->__anon1.__anon2.returnType, type, 1, 1);
1586 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier("__ecereResult")));
1587 resultType = MkTypeName(specs, decl);
1588 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1589 OutputTypeName(resultType, f, 0);
1590 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n");
1591 }
1592 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1593 {
1594 if(param->kind == 8 && !strcmp(param->__anon1._class->string, "String"))
1595 {
1596 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            char %s[1024];\n", param->name);
1597 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1598 DeclareClass((((void *)0)), FindClass("String"), "__ecereClass_String");
1599 }
1600 else
1601 {
1602 struct TypeName * paramTypeName;
1603 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1604 struct Declarator * decl;
1605 char type[1024] = "";
1606 char className[1024];
1607 struct Symbol * classSym;
1608
1609 if(param->kind == 8)
1610 classSym = param->__anon1._class;
1611 else
1612 {
1613 PrintTypeNoConst(param, type, 0, 1);
1614 classSym = FindClass(type);
1615 type[0] = (char)0;
1616 }
1617 strcpy(className, "__ecereClass_");
1618 FullClassNameCat(className, classSym->string, 1);
1619 DeclareClass((((void *)0)), classSym, className);
1620 PrintType(param, type, 1, 1);
1621 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier(param->name)));
1622 paramTypeName = MkTypeName(specs, decl);
1623 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1624 OutputTypeName(paramTypeName, f, 0);
1625 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n");
1626 }
1627 }
1628 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1629 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1630 {
1631 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Unserialize(");
1632 if(param->kind == 8 && !strcmp(param->__anon1._class->string, "String"))
1633 {
1634 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1635 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "(StaticString)");
1636 }
1637 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
1638 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
1639
1640 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
1641 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, param->name);
1642 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ");\n");
1643 }
1644 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1645 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1646 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "__ecereResult = ");
1647 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "((%s)instance).%s(", _class->fullName, method->name);
1648 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1649 {
1650 if(param->prev)
1651 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ", ");
1652 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "%s", param->name);
1653 }
1654 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ");\n");
1655 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1656 {
1657 if(param->kind == 8 && ((param->__anon1._class && param->__anon1._class->__anon1.registered && param->__anon1._class->__anon1.registered->type == 1) || !strcmp(param->__anon1._class->string, "String")) && !param->constant)
1658 {
1659 if(!strcmp(param->__anon1._class->string, "String"))
1660 {
1661 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1662 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize((StaticString)%s);\n", param->name);
1663 }
1664 else
1665 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize(%s);\n", param->name);
1666 }
1667 }
1668 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1669 {
1670 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize(__ecereResult);\n");
1671 }
1672 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1673 {
1674 if(param->kind == 8 && strcmp(param->__anon1._class->string, "String") && param->__anon1._class->__anon1.registered && (param->__anon1._class->__anon1.registered->type == 0 || param->__anon1._class->__anon1.registered->type == 5))
1675 {
1676 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            delete %s;\n", param->name);
1677 }
1678 }
1679 if(method->dataType->__anon1.__anon2.returnType->kind == 8 && strcmp(method->dataType->__anon1.__anon2.returnType->__anon1._class->string, "String") && method->dataType->__anon1.__anon2.returnType->__anon1._class->__anon1.registered && (method->dataType->__anon1.__anon2.returnType->__anon1._class->__anon1.registered->type == 0 || method->dataType->__anon1.__anon2.returnType->__anon1._class->__anon1.registered->type == 5))
1680 {
1681 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            delete __ecereResult;\n");
1682 }
1683 }
1684 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            break;\n");
1685 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         }\n");
1686 }
1687 }
1688 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      }\n");
1689 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      delete inst;\n");
1690 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   }\n");
1691 for(vid = _class->base->vTblSize; vid < _class->vTblSize; vid++)
1692 {
1693 struct __ecereNameSpace__ecere__com__Method * method;
1694 struct Type * param;
1695
1696 for(method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods); method; method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)method)))
1697 if(method->type == 1 && method->_class == _class && method->vid == vid)
1698 break;
1699 if(method)
1700 {
1701 if(!mutexDeclared)
1702 {
1703 DeclareClass((((void *)0)), FindClass("ecere::sys::Mutex"), "__ecereClass___ecereNameSpace__ecere__sys__Mutex");
1704 DeclareMethod((((void *)0)), __ecereNameSpace__ecere__com__eClass_FindMethod(__ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, "ecere::sys::Mutex"), "Wait", privateModule), "__ecereMethod___ecereNameSpace__ecere__sys__Mutex_Wait");
1705 DeclareMethod((((void *)0)), __ecereNameSpace__ecere__com__eClass_FindMethod(__ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, "ecere::sys::Mutex"), "Release", privateModule), "__ecereMethod___ecereNameSpace__ecere__sys__Mutex_Release");
1706 mutexDeclared = 1;
1707 }
1708 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1709 if(!method->dataType)
1710 method->dataType = ProcessTypeString(method->dataTypeString, 0);
1711 if(method->dataType->name)
1712 {
1713 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   virtual %s\n", method->dataTypeString);
1714 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   {\n");
1715 if(method->dataType)
1716 {
1717 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      DCOM%s __ecereObject = (void *)_vTbl[-1];\n", _class->fullName);
1718 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1719 {
1720 struct TypeName * resultType;
1721 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1722 struct Declarator * decl;
1723 char type[1024] = "";
1724 char className[1024];
1725 struct Symbol * classSym;
1726
1727 if(method->dataType->__anon1.__anon2.returnType->kind == 8)
1728 classSym = method->dataType->__anon1.__anon2.returnType->__anon1._class;
1729 else
1730 {
1731 PrintTypeNoConst(method->dataType->__anon1.__anon2.returnType, type, 0, 1);
1732 classSym = FindClass(type);
1733 type[0] = (char)0;
1734 }
1735 strcpy(className, "__ecereClass_");
1736 FullClassNameCat(className, classSym->string, 1);
1737 DeclareClass((((void *)0)), classSym, className);
1738 PrintType(method->dataType->__anon1.__anon2.returnType, type, 1, 1);
1739 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier("__ecereResult")));
1740 resultType = MkTypeName(specs, decl);
1741 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      ");
1742 OutputTypeName(resultType, f, 0);
1743 if(method->dataType->__anon1.__anon2.returnType->kind == 9)
1744 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " = { 0 }");
1745 else if(method->dataType->__anon1.__anon2.returnType->kind == 8 && method->dataType->__anon1.__anon2.returnType->__anon1._class->__anon1.registered && method->dataType->__anon1.__anon2.returnType->__anon1._class->__anon1.registered->type == 1)
1746 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " { }");
1747 else
1748 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " = 0");
1749 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n\n");
1750 }
1751 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      incref __ecereObject;\n");
1752 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereMethod___ecereNameSpace__ecere__sys__Mutex_Wait(__ecereObject.mutex);\n");
1753 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1754 {
1755 char type[1024] = "";
1756 char className[1024];
1757 struct Symbol * classSym;
1758
1759 if(param->kind == 8)
1760 classSym = param->__anon1._class;
1761 else
1762 {
1763 PrintTypeNoConst(param, type, 0, 1);
1764 classSym = FindClass(type);
1765 type[0] = (char)0;
1766 }
1767 strcpy(className, "__ecereClass_");
1768 FullClassNameCat(className, classSym->string, 1);
1769 DeclareClass((((void *)0)), classSym, className);
1770 if(param->kind == 8 && !strcmp(param->__anon1._class->string, "String"))
1771 {
1772 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1773 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereObject.argsBuffer.Serialize((StaticString)%s);\n", param->name);
1774 }
1775 else
1776 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereObject.argsBuffer.Serialize(%s);\n", param->name);
1777 }
1778 DeclareMethod((((void *)0)), __ecereNameSpace__ecere__com__eClass_FindMethod(__ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, "ecere::net::DCOMServerObject"), "CallVirtualMethod", privateModule), "__ecereMethod___ecereNameSpace__ecere__net__DCOMServerObject_CallVirtualMethod");
1779 {
1780 unsigned int hasReturnValue = method->dataType->__anon1.__anon2.returnType->kind != 0;
1781
1782 if(!hasReturnValue)
1783 {
1784 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1785 {
1786 if(param->kind == 8 && ((param->__anon1._class && param->__anon1._class->__anon1.registered && param->__anon1._class->__anon1.registered->type == 1) || !strcmp(param->__anon1._class->string, "String")) && !param->constant)
1787 {
1788 hasReturnValue = 1;
1789 break;
1790 }
1791 }
1792 }
1793 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      if(__ecereObject.CallVirtualMethod(%d, %s))\n", vid - _class->base->vTblSize, hasReturnValue ? "true" : "false");
1794 }
1795 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      {\n");
1796 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1797 {
1798 if(param->kind == 8 && ((param->__anon1._class && param->__anon1._class->__anon1.registered && param->__anon1._class->__anon1.registered->type == 1) || !strcmp(param->__anon1._class->string, "String")) && !param->constant)
1799 {
1800 if(!strcmp(param->__anon1._class->string, "String"))
1801 {
1802 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1803 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereObject.returnBuffer.Unserialize((StaticString)%s);\n", param->name);
1804 }
1805 else
1806 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereObject.returnBuffer.Unserialize(%s);\n", param->name);
1807 }
1808 }
1809 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1810 {
1811 if(method->dataType->__anon1.__anon2.returnType->kind == 8 && !strcmp(method->dataType->__anon1.__anon2.returnType->__anon1._class->string, "String"))
1812 {
1813 DeclareClass((((void *)0)), FindClass("StaticString"), "__ecereClass_StaticString");
1814 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereObject.returnBuffer.Unserialize((StaticString)__ecereResult);\n");
1815 }
1816 else
1817 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereObject.returnBuffer.Unserialize(__ecereResult);\n");
1818 }
1819 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      }\n");
1820 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      else\n");
1821 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         ((%s)this).%s::%s(", _class->fullName, _class->fullName, method->name);
1822 for(param = method->dataType->__anon1.__anon2.params.first; param; param = param->next)
1823 {
1824 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "%s", param->name);
1825 if(param->next)
1826 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ", ");
1827 }
1828 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ");\n");
1829 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereObject.returnBuffer.Free();\n");
1830 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereMethod___ecereNameSpace__ecere__sys__Mutex_Release(__ecereObject.mutex);\n");
1831 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      delete __ecereObject;\n");
1832 if(method->dataType->__anon1.__anon2.returnType->kind != 0)
1833 {
1834 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      return __ecereResult;\n");
1835 }
1836 }
1837 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   }\n");
1838 }
1839 }
1840 }
1841 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "}\n");
1842 }
1843 }
1844 }
1845 }
1846
1847 struct __ecereNameSpace__ecere__com__GlobalFunction;
1848
1849 extern struct __ecereNameSpace__ecere__com__GlobalFunction * __ecereNameSpace__ecere__com__eSystem_FindFunction(struct __ecereNameSpace__ecere__com__Instance * module, const char *  name);
1850
1851 struct __ecereNameSpace__ecere__com__GlobalFunction
1852 {
1853 struct __ecereNameSpace__ecere__com__GlobalFunction * prev;
1854 struct __ecereNameSpace__ecere__com__GlobalFunction * next;
1855 const char *  name;
1856 int (*  function)();
1857 struct __ecereNameSpace__ecere__com__Instance * module;
1858 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
1859 const char *  dataTypeString;
1860 struct Type * dataType;
1861 void *  symbol;
1862 } ecere_gcc_struct;
1863
1864 static void WriteMain(const char * fileName)
1865 {
1866 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__sys__FileOpen(fileName, 2);
1867
1868 if(f)
1869 {
1870 struct ModuleImport * module;
1871 struct ModuleInfo * defModule;
1872 unsigned int anyMethod = 0, anyProp = 0, anyFunction = 0;
1873 struct ImportedModule * importedModule;
1874
1875 __ecereNameSpace__ecere__sys__GetLastDirectory(fileName, mainModuleName);
1876 __ecereNameSpace__ecere__sys__StripExtension(mainModuleName);
1877 if(!projectName[0])
1878 {
1879 strcpy(projectName, mainModuleName);
1880 __ecereNameSpace__ecere__sys__StripExtension(projectName);
1881 }
1882 FixModuleName(mainModuleName);
1883 if(targetPlatform == 1 && !isConsole && !isStaticLibrary && !isDynamicLibrary)
1884 {
1885 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
1886 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
1887
1888 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
1889 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "typedef void * HINSTANCE;\n");
1890 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
1891 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
1892
1893 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
1894 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "#define WINAPI __stdcall\n");
1895 }
1896 for(importedModule = _defines.first; importedModule; importedModule = importedModule->next)
1897 {
1898 if(importedModule->type == 0)
1899 {
1900 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "import ");
1901 if(importedModule->importType == 1)
1902 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "static ", importedModule->name);
1903 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\"%s\"\n", importedModule->name);
1904 }
1905 }
1906 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
1907 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
1908
1909 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
1910 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "default:\n");
1911 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
1912 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
1913
1914 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
1915 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "static Module __currentModule;\n\n");
1916 if(!isStaticLibrary)
1917 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
1918 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
1919
1920 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
1921 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "Module __thisModule;\n\n");
1922 BindDCOMServer();
1923 BindDCOMClient();
1924 if(dcomSymbols)
1925 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void __ecereRegisterModule_%s(Module module);\n\n", mainModuleName);
1926 for(module = _imports.first; module; module = module->next)
1927 {
1928 struct ClassImport * _class;
1929 struct FunctionImport * function;
1930
1931 if(module->importType == 1)
1932 {
1933 {
1934 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "bool __ecereDll_Load_%s(Module module);\n", module->name);
1935 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "bool __ecereDll_Unload_%s(Module module);\n", module->name);
1936 }
1937 }
1938 for(_class = module->classes.first; _class; _class = _class->next)
1939 {
1940 struct MethodImport * method;
1941 struct PropertyImport * prop;
1942 char className[1024] = "";
1943 struct __ecereNameSpace__ecere__com__Class * regClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, _class->name);
1944
1945 FullClassNameCat(className, _class->name, 1);
1946 if(_class->itself)
1947 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "Class __ecereClass_%s;\n", className);
1948 {
1949 {
1950 for(method = _class->methods.first; method; method = method->next)
1951 {
1952 struct __ecereNameSpace__ecere__com__Method * meth = __ecereNameSpace__ecere__com__eClass_FindMethod(regClass, method->name, privateModule);
1953
1954 if(meth && !meth->dataType)
1955 {
1956 struct Context * context = SetupTemplatesContext(regClass);
1957
1958 meth->dataType = ProcessTypeString(meth->dataTypeString, 0);
1959 FinishTemplatesContext(context);
1960 }
1961 if(method->isVirtual)
1962 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "int __ecereVMethodID_%s_%s;\n", className, method->name);
1963 else if((!strcmp(_class->name, "float") || !strcmp(_class->name, "double") || module->name) && module->importType != 1 && (!meth || !meth->dataType->dllExport))
1964 {
1965 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "int (*__ecereMethod_%s_%s)();\n", className, method->name);
1966 }
1967 anyMethod = 1;
1968 }
1969 }
1970 for(prop = _class->properties.first; prop; prop = prop->next)
1971 {
1972 char propName[1024];
1973
1974 propName[0] = (char)0;
1975 FullClassNameCat(propName, prop->name, 1);
1976 if((!strcmp(_class->name, "float") || !strcmp(_class->name, "double") || module->name) && module->importType != 1)
1977 {
1978 if(prop->hasSet)
1979 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void * __ecereProp_%s_Set_%s;\n", className, propName);
1980 if(prop->hasGet)
1981 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void * __ecereProp_%s_Get_%s;\n", className, propName);
1982 }
1983 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "Property __ecereProp_%s_%s;\n", className, propName);
1984 anyProp = 1;
1985 }
1986 }
1987 }
1988 for(function = module->functions.first; function; function = function->next)
1989 {
1990 struct __ecereNameSpace__ecere__com__GlobalFunction * func = __ecereNameSpace__ecere__com__eSystem_FindFunction(privateModule, function->name);
1991
1992 if(func && !func->dataType)
1993 func->dataType = ProcessTypeString(func->dataTypeString, 0);
1994 if(module->name && module->importType != 1 && (!func || !func->dataType || !func->dataType->dllExport))
1995 {
1996 char functionName[1024];
1997
1998 functionName[0] = (char)0;
1999 FullClassNameCat(functionName, function->name, 0);
2000 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void * __ecereFunction_%s;\n", functionName);
2001 anyFunction = 1;
2002 }
2003 }
2004 }
2005 for(defModule = modules.first; defModule; defModule = defModule->next)
2006 {
2007 char moduleName[1024];
2008
2009 strcpy(moduleName, defModule->name);
2010 FixModuleName(moduleName);
2011 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void __ecereRegisterModule_%s(Module module);\n", moduleName);
2012 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void __ecereUnregisterModule_%s(Module module);\n", moduleName);
2013 if(defModule->globalInstance)
2014 {
2015 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void __ecereCreateModuleInstances_%s();\n", moduleName);
2016 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void __ecereDestroyModuleInstances_%s();\n", moduleName);
2017 }
2018 }
2019 if(dcomSymbols)
2020 {
2021 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
2022 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, int pos, int mode))__extension__ ({
2023 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = dcomSymbols;
2024
2025 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2026 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek])(dcomSymbols, 0, 0);
2027 while(!((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))__extension__ ({
2028 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = dcomSymbols;
2029
2030 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2031 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof])(dcomSymbols))
2032 {
2033 char buffer[4096];
2034 int read = ((int (*)(struct __ecereNameSpace__ecere__com__Instance *, void *  buffer, unsigned int size, unsigned int count))__extension__ ({
2035 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = dcomSymbols;
2036
2037 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2038 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Read])(dcomSymbols, buffer, 1, sizeof (buffer));
2039
2040 if(!read)
2041 break;
2042 ((int (*)(struct __ecereNameSpace__ecere__com__Instance *, const void *  buffer, unsigned int size, unsigned int count))__extension__ ({
2043 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2044
2045 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2046 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Write])(f, buffer, 1, read);
2047 }
2048 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
2049 }
2050 if(isStaticLibrary)
2051 {
2052 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\nbool __ecereDll_Load_%s(Module module)\n{\n", projectName);
2053 }
2054 else if(isDynamicLibrary)
2055 {
2056 if(targetPlatform == 1)
2057 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2058 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2059
2060 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2061 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\ndllexport bool __stdcall __ecereDll_Load(Module module)\n{\n");
2062 else
2063 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2064 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2065
2066 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2067 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\ndllexport bool __ecereDll_Load(Module module)\n{\n");
2068 }
2069 else if(targetPlatform == 1 && !isConsole)
2070 {
2071 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2072 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2073
2074 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2075 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\nint WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInst, char * cmdLine, int show)\n{\n");
2076 }
2077 else
2078 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2079 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2080
2081 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2082 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\nint main(int _argc, char * _argv[])\n{\n");
2083 if(!isDynamicLibrary)
2084 {
2085 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2086 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2087
2088 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2089 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   int exitCode;\n");
2090 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2091 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2092
2093 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2094 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   Module module;\n");
2095 }
2096 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2097 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2098
2099 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2100 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   __attribute__((unused)) Class _class;\n");
2101 if(anyMethod)
2102 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2103 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2104
2105 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2106 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   __attribute__((unused)) Method method;\n");
2107 if(anyProp)
2108 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2109 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2110
2111 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2112 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   __attribute__((unused)) Property _property;\n");
2113 if(anyFunction)
2114 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2115 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2116
2117 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2118 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   __attribute__((unused)) GlobalFunction function;\n");
2119 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2120 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2121
2122 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2123 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2124 if(disabledPooling)
2125 {
2126 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2127 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2128
2129 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2130 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   eSystem_SetPoolingDisabled(true);\n");
2131 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2132 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2133
2134 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2135 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
2136 }
2137 if(isDynamicLibrary)
2138 {
2139 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2140 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2141
2142 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2143 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(!__currentModule)\n");
2144 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2145 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2146
2147 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2148 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   {\n");
2149 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2150 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2151
2152 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2153 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "      __currentModule = module;\n");
2154 if(!isStaticLibrary)
2155 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2156 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2157
2158 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2159 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "      __thisModule = module;\n");
2160 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2161 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2162
2163 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2164 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   }\n\n");
2165 }
2166 else if(targetPlatform == 1 && !isConsole)
2167 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2168 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2169
2170 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2171 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   __thisModule = __currentModule = module = __ecere_COM_Initialize(1, 0, null);\n\n");
2172 else
2173 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2174 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2175
2176 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2177 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   __thisModule = __currentModule = module = __ecere_COM_Initialize(1, _argc, (void *)_argv);\n\n");
2178 if(_imports.count)
2179 {
2180 for(module = _imports.first; module; module = module->next)
2181 {
2182 if(module->name)
2183 {
2184 {
2185 if(module->importType == 1)
2186 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   eModule_LoadStatic(module, \"%s\", %s, __ecereDll_Load_%s, __ecereDll_Unload_%s);\n", module->name, (module->importAccess == 2) ? "privateAccess" : "publicAccess", module->name, module->name);
2187 else
2188 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   eModule_Load(module, \"%s\", %s);\n", module->name, (module->importAccess == 2) ? "privateAccess" : "publicAccess");
2189 }
2190 }
2191 }
2192 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
2193 }
2194 if(modules.count)
2195 {
2196 for(defModule = modules.first; defModule; defModule = defModule->next)
2197 {
2198 char moduleName[1024];
2199
2200 strcpy(moduleName, defModule->name);
2201 FixModuleName(moduleName);
2202 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereRegisterModule_%s(module);\n", moduleName);
2203 }
2204 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
2205 }
2206 if(dcomSymbols)
2207 {
2208 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereRegisterModule_%s(module);\n\n", mainModuleName);
2209 (__ecereNameSpace__ecere__com__eInstance_DecRef(dcomSymbols), dcomSymbols = 0);
2210 }
2211 if(isDynamicLibrary)
2212 {
2213 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2214 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2215
2216 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2217 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(__currentModule == module)\n");
2218 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2219 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2220
2221 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2222 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   {\n");
2223 }
2224 for(module = _imports.first; module; module = module->next)
2225 {
2226 struct ClassImport * _class;
2227 struct FunctionImport * function;
2228
2229 if(module->classes.count)
2230 {
2231 for(_class = module->classes.first; _class; _class = _class->next)
2232 {
2233 struct __ecereNameSpace__ecere__com__Class * regClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, _class->name);
2234
2235 {
2236 struct MethodImport * method;
2237 struct PropertyImport * prop;
2238 char classID[1024];
2239 char className[1024] = "";
2240
2241 FullClassNameCat(className, _class->name, 1);
2242 if(_class->itself)
2243 sprintf(classID, "__ecereClass_%s", className);
2244 else
2245 strcpy(classID, "_class");
2246 if(isDynamicLibrary && !isStaticLibrary)
2247 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   %s = eSystem_FindClass(__currentModule, \"%s\");\n", classID, _class->name);
2248 else
2249 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   %s = eSystem_FindClass(module, \"%s\");\n", classID, _class->name);
2250 for(method = _class->methods.first; method; method = method->next)
2251 {
2252 struct __ecereNameSpace__ecere__com__Method * meth = __ecereNameSpace__ecere__com__eClass_FindMethod(regClass, method->name, privateModule);
2253
2254 if(!meth || !meth->dataType->dllExport)
2255 {
2256 if(method->isVirtual || ((!strcmp(_class->name, "float") || !strcmp(_class->name, "double") || module->name) && module->importType != 1))
2257 {
2258 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   method = eClass_FindMethod(%s, \"%s\", module);\n", classID, method->name);
2259 if(method->isVirtual)
2260 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   if(method) __ecereVMethodID_%s_%s = method.vid;\n", className, method->name);
2261 else
2262 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   if(method) __ecereMethod_%s_%s = method.function;\n", className, method->name);
2263 }
2264 }
2265 }
2266 for(prop = _class->properties.first; prop; prop = prop->next)
2267 {
2268 char propName[1024];
2269
2270 propName[0] = (char)0;
2271 FullClassNameCat(propName, prop->name, 1);
2272 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereProp_%s_%s = _property = eClass_FindProperty(%s, \"%s\", module);\n", className, propName, classID, prop->name);
2273 if((!strcmp(_class->name, "float") || !strcmp(_class->name, "double") || module->name) && module->importType != 1)
2274 {
2275 if(prop->hasSet)
2276 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereProp_%s_Set_%s = _property.Set;\n", className, propName);
2277 if(prop->hasGet)
2278 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereProp_%s_Get_%s = _property.Get;\n", className, propName);
2279 }
2280 }
2281 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
2282 }
2283 }
2284 }
2285 if(module->functions.count)
2286 {
2287 for(function = module->functions.first; function; function = function->next)
2288 {
2289 struct __ecereNameSpace__ecere__com__GlobalFunction * func = __ecereNameSpace__ecere__com__eSystem_FindFunction(privateModule, function->name);
2290
2291 if(module->name && module->importType != 1 && (!func || !func->dataType || !func->dataType->dllExport))
2292 {
2293 char functionName[1024];
2294
2295 functionName[0] = (char)0;
2296 FullClassNameCat(functionName, function->name, 0);
2297 if(isDynamicLibrary && !isStaticLibrary)
2298 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   function = eSystem_FindFunction(__currentModule, \"%s\");\n", function->name);
2299 else
2300 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   function = eSystem_FindFunction(module, \"%s\");\n", function->name);
2301 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   if(function) __ecereFunction_%s = function.function;\n", functionName);
2302 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
2303 }
2304 }
2305 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
2306 }
2307 }
2308 for(defModule = modules.first; defModule; defModule = defModule->next)
2309 if(defModule->globalInstance)
2310 {
2311 if(!strcmp(defModule->name, "i18n"))
2312 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereCreateModuleInstances_i18n();\n");
2313 }
2314 if(i18n)
2315 {
2316 if(isDynamicLibrary)
2317 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      LoadTranslatedStrings(\"%s\", \"%s\");\n", projectName, projectName);
2318 else
2319 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      LoadTranslatedStrings(null, \"%s\");\n", projectName);
2320 }
2321 if(isDynamicLibrary)
2322 {
2323 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2324 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2325
2326 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2327 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   }\n");
2328 }
2329 if(!isDynamicLibrary && thisAppClass)
2330 {
2331 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   _class = eSystem_FindClass(__currentModule, \"%s\");\n", thisAppClass->name);
2332 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   eInstance_Evolve((Instance *)&__currentModule, _class);\n");
2333 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __thisModule = __currentModule;\n");
2334 }
2335 if(isDynamicLibrary)
2336 {
2337 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2338 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2339
2340 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2341 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(__currentModule == module)\n");
2342 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2343 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2344
2345 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2346 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   {\n");
2347 }
2348 if(modules.count)
2349 {
2350 for(defModule = modules.first; defModule; defModule = defModule->next)
2351 if(defModule->globalInstance)
2352 {
2353 char moduleName[1024];
2354
2355 if(!strcmp(defModule->name, "i18n"))
2356 continue;
2357 strcpy(moduleName, defModule->name);
2358 FixModuleName(moduleName);
2359 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereCreateModuleInstances_%s();\n", moduleName);
2360 }
2361 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
2362 }
2363 if(isDynamicLibrary)
2364 {
2365 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2366 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2367
2368 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2369 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   }\n");
2370 }
2371 if(!isDynamicLibrary && thisAppClass)
2372 {
2373 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   ((void(*)(void *))(void *)__currentModule._vTbl[12])(__currentModule);\n");
2374 }
2375 if(isDynamicLibrary)
2376 {
2377 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2378 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2379
2380 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2381 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   return true;\n");
2382 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2383 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2384
2385 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2386 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "}\n");
2387 if(isStaticLibrary)
2388 {
2389 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\nbool __ecereDll_Unload_%s(Module module)\n{\n", projectName);
2390 }
2391 else
2392 {
2393 if(targetPlatform == 1)
2394 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2395 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2396
2397 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2398 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\ndllexport bool __stdcall __ecereDll_Unload(Module module)\n{\n");
2399 else
2400 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2401 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2402
2403 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2404 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\ndllexport bool __ecereDll_Unload(Module module)\n{\n");
2405 }
2406 }
2407 if(isDynamicLibrary)
2408 {
2409 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2410 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2411
2412 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2413 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(__currentModule == module)\n");
2414 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2415 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2416
2417 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2418 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   {\n");
2419 }
2420 {
2421 unsigned int destroyI18n = 0;
2422
2423 if(modules.count)
2424 {
2425 for(defModule = modules.first; defModule; defModule = defModule->next)
2426 if(defModule->globalInstance)
2427 {
2428 char moduleName[1024];
2429
2430 if(!strcmp(defModule->name, "i18n"))
2431 {
2432 destroyI18n = 1;
2433 continue;
2434 }
2435 strcpy(moduleName, defModule->name);
2436 FixModuleName(moduleName);
2437 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereDestroyModuleInstances_%s();\n", moduleName);
2438 }
2439 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
2440 }
2441 if(i18n)
2442 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   UnloadTranslatedStrings(\"%s\");\n", projectName);
2443 if(destroyI18n)
2444 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereDestroyModuleInstances_i18n();\n");
2445 }
2446 if(isDynamicLibrary)
2447 {
2448 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2449 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2450
2451 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2452 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   }\n");
2453 if(isDynamicLibrary)
2454 {
2455 }
2456 if(modules.count)
2457 {
2458 for(defModule = modules.first; defModule; defModule = defModule->next)
2459 {
2460 char moduleName[1024];
2461
2462 strcpy(moduleName, defModule->name);
2463 FixModuleName(moduleName);
2464 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereUnregisterModule_%s(module);\n", moduleName);
2465 }
2466 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
2467 }
2468 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2469 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2470
2471 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2472 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(__currentModule == module)\n");
2473 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2474 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2475
2476 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2477 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "      __currentModule = (void *)0;\n");
2478 if(!isStaticLibrary)
2479 {
2480 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2481 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2482
2483 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2484 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(__thisModule == module)\n");
2485 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2486 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2487
2488 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2489 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "      __thisModule = (void *)0;\n");
2490 }
2491 }
2492 if(!isDynamicLibrary)
2493 {
2494 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2495 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2496
2497 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2498 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n   _class = eSystem_FindClass(__currentModule, \"ecere::com::Application\");\n   exitCode = ((ecere::com::Application)__currentModule).exitCode;\n   delete __currentModule;\n   return exitCode;\n");
2499 }
2500 else
2501 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2502 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2503
2504 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2505 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   return true;\n");
2506 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2507 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2508
2509 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2510 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "}\n");
2511 __ecereNameSpace__ecere__com__eInstance_Delete(f);
2512 }
2513 }
2514
2515 struct __ecereNameSpace__ecere__com__SubModule;
2516
2517 struct __ecereNameSpace__ecere__com__SubModule
2518 {
2519 struct __ecereNameSpace__ecere__com__SubModule * prev;
2520 struct __ecereNameSpace__ecere__com__SubModule * next;
2521 struct __ecereNameSpace__ecere__com__Instance * module;
2522 int importMode;
2523 } ecere_gcc_struct;
2524
2525 static struct __ecereNameSpace__ecere__com__Class * SearchAppClass_Module(struct __ecereNameSpace__ecere__com__Instance * module)
2526 {
2527 struct __ecereNameSpace__ecere__com__Class * appClass;
2528 struct __ecereNameSpace__ecere__com__SubModule * subModule;
2529
2530 appClass = FindAppClass(&((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->publicNameSpace, 0);
2531 if(appClass)
2532 return appClass;
2533 appClass = FindAppClass(&((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->privateNameSpace, 0);
2534 if(appClass)
2535 return appClass;
2536 for(subModule = ((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->modules.first; subModule; subModule = subModule->next)
2537 {
2538 appClass = SearchAppClass_Module(subModule->module);
2539 if(appClass)
2540 return appClass;
2541 }
2542 return (((void *)0));
2543 }
2544
2545 void __ecereMethod_SymbolgenApp_Main(struct __ecereNameSpace__ecere__com__Instance * this)
2546 {
2547 int c;
2548 unsigned int valid = 1;
2549 const char * output = (((void *)0));
2550
2551 outputPot = 0;
2552 disabledPooling = 0;
2553 targetPlatform = __runtimePlatform;
2554 targetBits = GetHostBits();
2555 for(c = 1; c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argc; c++)
2556 {
2557 const char * arg = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argv[c];
2558
2559 if(arg[0] == '-')
2560 {
2561 if(!strcmp(arg + 1, "m32") || !strcmp(arg + 1, "m64"))
2562 {
2563 targetBits = !strcmp(arg + 1, "m32") ? 32 : 64;
2564 }
2565 else if(!strcmp(arg + 1, "t32") || !strcmp(arg + 1, "t64"))
2566 {
2567 targetBits = !strcmp(arg + 1, "t32") ? 32 : 64;
2568 }
2569 else if(!strcmp(arg + 1, "o"))
2570 {
2571 if(!output && c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argc)
2572 {
2573 output = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argv[c + 1];
2574 c++;
2575 }
2576 else
2577 valid = 0;
2578 }
2579 else if(!strcmp(arg, "-name"))
2580 {
2581 if(c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argc)
2582 {
2583 strcpy(projectName, ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argv[c + 1]);
2584 c++;
2585 }
2586 else
2587 valid = 0;
2588 }
2589 else if(!strcmp(arg, "-t"))
2590 {
2591 if(++c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argc)
2592 targetPlatform = __ecereProp___ecereNameSpace__ecere__com__Platform_Set_char__PTR_(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argv[c]);
2593 else
2594 valid = 0;
2595 }
2596 else if(!strcmp(arg, "-outputpot"))
2597 outputPot = 1;
2598 else if(!strcmp(arg, "-disabled-pooling"))
2599 disabledPooling = 1;
2600 else if(!strcmp(arg, "-console"))
2601 isConsole = 1;
2602 else if(!strcmp(arg, "-dynamiclib"))
2603 isDynamicLibrary = 1;
2604 else if(!strcmp(arg, "-staticlib"))
2605 {
2606 isDynamicLibrary = 1;
2607 isStaticLibrary = 1;
2608 }
2609 else if(!strcmp(arg, "-symbols"))
2610 {
2611 if(c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argc)
2612 {
2613 SetSymbolsDir(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argv[c + 1]);
2614 c++;
2615 }
2616 else
2617 valid = 0;
2618 }
2619 }
2620 }
2621 if(!output)
2622 valid = 0;
2623 if(!valid)
2624 {
2625 printf("%s", __ecereNameSpace__ecere__GetTranslatedString("ecs", "Syntax:\n   ecs [-t <target platform>] <input>[, <input>]* -o <output>\n", (((void *)0))));
2626 }
2627 else
2628 {
2629 int c;
2630 char ext[17];
2631 char symbolModule[274];
2632
2633 __ecereNameSpace__ecere__sys__GetExtension(output, ext);
2634 __ecereNameSpace__ecere__sys__GetLastDirectory(output, symbolModule);
2635 SetDefines(&_defines);
2636 SetImports(&_imports);
2637 SetGlobalData(&globalData);
2638 SetExcludedSymbols(&_excludedSymbols);
2639 SetGlobalContext(theGlobalContext);
2640 SetTopContext(theGlobalContext);
2641 SetCurrentContext(theGlobalContext);
2642 SetTargetPlatform(targetPlatform);
2643 SetTargetBits(targetBits);
2644 SetInSymbolGen(1);
2645 privateModule = (struct __ecereNameSpace__ecere__com__Instance *)__ecereNameSpace__ecere__com____ecere_COM_Initialize((unsigned int)(1 | (targetBits == sizeof(uintptr_t) * 8 ? (unsigned int)0 : targetBits == 64 ? 2 : targetBits == 32 ? 4 : (unsigned int)0) | 8), 1, (((void *)0)));
2646 SetPrivateModule(privateModule);
2647 mainModule = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ModuleImport);
2648 SetMainModule(mainModule);
2649 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&_imports, mainModule);
2650 {
2651 struct __ecereNameSpace__ecere__com__Instance * intlStrings = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__Map_TPL_ContextStringPair__ecere__com__List_TPL_String___);
2652 struct __ecereNameSpace__ecere__com__MapIterator it = (it.container = (void *)0, it.pointer = (void *)0, __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(&it, intlStrings), it);
2653
2654 for(c = 1; c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argc; c++)
2655 {
2656 const char * file = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argv[c];
2657 struct __ecereNameSpace__ecere__com__Instance * f = (((void *)0));
2658 char line[16384];
2659 int count = 0;
2660 char * tokens[512];
2661
2662 if(file[0] == '-')
2663 {
2664 if(!strcmp(file, "-c"))
2665 c++;
2666 }
2667 else if(file[0] == '@')
2668 f = __ecereNameSpace__ecere__sys__FileOpen(&file[1], 1);
2669 else
2670 {
2671 count = 1;
2672 tokens[0] = (char *)file;
2673 }
2674 while(count || f)
2675 {
2676 int c;
2677
2678 if(f)
2679 {
2680 while(!count && __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
2681 count = __ecereNameSpace__ecere__sys__Tokenize(line, sizeof (tokens) / sizeof (tokens[0]), tokens, 2);
2682 if(!count)
2683 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
2684 }
2685 for(c = 0; c < count; c++)
2686 {
2687 char ext[17];
2688
2689 file = tokens[c];
2690 __ecereNameSpace__ecere__sys__GetExtension(file, ext);
2691 if(!strcmp(ext, "imp"))
2692 LoadImports(file);
2693 }
2694 count = 0;
2695 }
2696 }
2697 for(c = 1; c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argc; c++)
2698 {
2699 const char * file = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argv[c];
2700
2701 if(file[0] == '-')
2702 {
2703 if(!strcmp(file, "-c"))
2704 c++;
2705 }
2706 }
2707 for(c = 1; c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argc; c++)
2708 {
2709 const char * file = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + sizeof(struct __ecereNameSpace__ecere__com__Module) + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->argv[c];
2710 struct __ecereNameSpace__ecere__com__Instance * f = (((void *)0));
2711 char line[16384];
2712 int count = 0;
2713 char * tokens[512];
2714
2715 if(file[0] == '-')
2716 {
2717 if(!strcmp(file, "-c"))
2718 c++;
2719 }
2720 else if(file[0] == '@')
2721 f = __ecereNameSpace__ecere__sys__FileOpen(&file[1], 1);
2722 else
2723 {
2724 count = 1;
2725 tokens[0] = (char *)file;
2726 }
2727 while(count || f)
2728 {
2729 int c;
2730
2731 if(f)
2732 {
2733 while(!count && __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
2734 count = __ecereNameSpace__ecere__sys__Tokenize(line, sizeof (tokens) / sizeof (tokens[0]), tokens, 2);
2735 if(!count)
2736 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
2737 }
2738 for(c = 0; c < count; c++)
2739 {
2740 char ext[17];
2741 char moduleName[797];
2742
2743 file = tokens[c];
2744 __ecereNameSpace__ecere__sys__GetExtension(file, ext);
2745 __ecereNameSpace__ecere__sys__GetLastDirectory(file, moduleName);
2746 __ecereNameSpace__ecere__sys__StripExtension(moduleName);
2747 strcat(moduleName, ".ec");
2748 if(((__runtimePlatform == 1) ? (strcasecmp) : strcmp)(moduleName, symbolModule) && (!strcmp(ext, "sym") || !strcmp(ext, "ec")))
2749 {
2750 struct ImportedModule * importedModule;
2751 struct ModuleInfo * module = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ModuleInfo);
2752 char fileName[274];
2753
2754 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&modules, module);
2755 __ecereNameSpace__ecere__sys__GetLastDirectory(file, fileName);
2756 module->name = __ecereNameSpace__ecere__sys__CopyString(fileName);
2757 __ecereNameSpace__ecere__sys__StripExtension(module->name);
2758 for(importedModule = _defines.first; importedModule; importedModule = importedModule->next)
2759 {
2760 if(importedModule->type == 0 && !(strcasecmp)(importedModule->name, module->name) && !(importedModule->importType == 2))
2761 break;
2762 }
2763 if(importedModule)
2764 module->globalInstance = importedModule->globalInstance;
2765 else
2766 {
2767 importedModule = __extension__ ({
2768 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
2769
2770 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(module->name), __ecereInstance1->type = 0, __ecereInstance1->importType = 0, __ecereInstance1;
2771 });
2772 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&_defines, importedModule);
2773 module->globalInstance = LoadSymbols(file, 0, 0);
2774 CheckDataRedefinitions();
2775 }
2776 {
2777 struct __ecereNameSpace__ecere__com__Instance * f;
2778
2779 __ecereNameSpace__ecere__sys__ChangeExtension(file, "bowl", fileName);
2780 f = __ecereNameSpace__ecere__sys__FileOpen(fileName, 1);
2781 if(f)
2782 {
2783 static char line[65536];
2784 struct __ecereNameSpace__ecere__com__Instance * comments = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__List_TPL_String_);
2785 char * msgid = (((void *)0)), * msgstr = (((void *)0)), * msgctxt = (((void *)0));
2786
2787 while(!((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))__extension__ ({
2788 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
2789
2790 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2791 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof])(f))
2792 {
2793 if(__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
2794 {
2795 int len;
2796
2797 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
2798 if(line[0] == '#')
2799 {
2800 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))__extension__ ({
2801 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = comments;
2802
2803 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
2804 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(comments, (uint64)(uintptr_t)(__ecereNameSpace__ecere__sys__CopyString(line)));
2805 }
2806 else if(strstr(line, "msgid \"") == line)
2807 {
2808 (__ecereNameSpace__ecere__com__eSystem_Delete(msgid), msgid = 0);
2809 msgid = __ecereNameSpace__ecere__sys__CopyString(line + 7);
2810 len = strlen(msgid);
2811 if(len)
2812 msgid[len - 1] = (unsigned char)0;
2813 }
2814 else if(strstr(line, "msgctxt \"") == line)
2815 {
2816 (__ecereNameSpace__ecere__com__eSystem_Delete(msgctxt), msgctxt = 0);
2817 msgctxt = __ecereNameSpace__ecere__sys__CopyString(line + 9);
2818 len = strlen(msgctxt);
2819 if(len)
2820 msgctxt[len - 1] = (unsigned char)0;
2821 }
2822 else if(strstr(line, "msgstr \"") == line)
2823 {
2824 (__ecereNameSpace__ecere__com__eSystem_Delete(msgstr), msgstr = 0);
2825 msgstr = __ecereNameSpace__ecere__sys__CopyString(line + 8);
2826 len = strlen(msgstr);
2827 if(len)
2828 msgstr[len - 1] = (unsigned char)0;
2829 }
2830 if(msgid && msgstr)
2831 {
2832 struct ContextStringPair pair =
2833 {
2834 msgid, msgctxt
2835 };
2836
2837 i18n = 1;
2838 if(!__ecereMethod___ecereNameSpace__ecere__com__Iterator_Index((void *)(&it), (uint64)(uintptr_t)(&pair), 0))
2839 {
2840 msgid = (((void *)0));
2841 msgctxt = (((void *)0));
2842 __extension__ ({
2843 struct __ecereNameSpace__ecere__com__Iterator __internalIterator =
2844 {
2845 intlStrings, 0
2846 };
2847
2848 __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&__internalIterator, ((uint64)(uintptr_t)(&pair)), 1);
2849 __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(&__internalIterator, ((uint64)((uintptr_t)(comments))));
2850 });
2851 comments = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__List_TPL_String_);
2852 }
2853 else
2854 {
2855 {
2856 struct __ecereNameSpace__ecere__com__Iterator s =
2857 {
2858 (comments), 0
2859 };
2860
2861 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&s))
2862 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))__extension__ ({
2863 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = ((struct __ecereNameSpace__ecere__com__Instance *)(uintptr_t)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data((void *)(&it)));
2864
2865 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
2866 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(((struct __ecereNameSpace__ecere__com__Instance *)(uintptr_t)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data((void *)(&it))), __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&s));
2867 }
2868 ((void (*)(struct __ecereNameSpace__ecere__com__Instance *))__extension__ ({
2869 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = comments;
2870
2871 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
2872 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_RemoveAll])(comments);
2873 }
2874 (__ecereNameSpace__ecere__com__eSystem_Delete(msgid), msgid = 0);
2875 (__ecereNameSpace__ecere__com__eSystem_Delete(msgctxt), msgctxt = 0);
2876 (__ecereNameSpace__ecere__com__eSystem_Delete(msgstr), msgstr = 0);
2877 }
2878 }
2879 }
2880 ((void (*)(struct __ecereNameSpace__ecere__com__Instance *))__extension__ ({
2881 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = comments;
2882
2883 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
2884 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Free])(comments);
2885 (__ecereNameSpace__ecere__com__eInstance_DecRef(comments), comments = 0);
2886 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
2887 }
2888 }
2889 }
2890 }
2891 count = 0;
2892 }
2893 }
2894 ComputeModuleClasses(privateModule);
2895 if(!isDynamicLibrary)
2896 {
2897 thisAppClass = SearchAppClass_Module(privateModule);
2898 }
2899 WriteMain(output);
2900 if(outputPot && ((struct __ecereNameSpace__ecere__com__CustomAVLTree *)(((char *)intlStrings + 0 + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->count)
2901 {
2902 struct __ecereNameSpace__ecere__com__Instance * potFile;
2903 char potFileName[797];
2904
2905 strcpy(potFileName, "locale");
2906 __ecereNameSpace__ecere__sys__PathCat(potFileName, projectName);
2907 __ecereNameSpace__ecere__sys__ChangeExtension(potFileName, "pot", potFileName);
2908 potFile = __ecereNameSpace__ecere__sys__FileOpen(potFileName, 2);
2909 if(potFile)
2910 {
2911 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2912 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2913
2914 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2915 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "msgid \"\"\n");
2916 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2917 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2918
2919 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2920 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "msgstr \"\"\n");
2921 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2922 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2923
2924 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2925 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"Project-Id-Version: \\n\"\n");
2926 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2927 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2928
2929 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2930 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"POT-Creation-Date: \\n\"\n");
2931 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2932 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2933
2934 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2935 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"PO-Revision-Date: \\n\"\n");
2936 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2937 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2938
2939 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2940 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"Last-Translator: \\n\"\n");
2941 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2942 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2943
2944 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2945 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"Language-Team: \\n\"\n");
2946 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2947 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2948
2949 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2950 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"MIME-Version: 1.0\\n\"\n");
2951 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2952 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2953
2954 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2955 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"Content-Type: text/plain; charset=iso-8859-1\\n\"\n");
2956 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2957 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2958
2959 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2960 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"Content-Transfer-Encoding: 8bit\\n\"\n");
2961 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2962 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2963
2964 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2965 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"X-Poedit-Basepath: ../\\n\"\n");
2966 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2967 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2968
2969 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2970 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\n");
2971 {
2972 struct __ecereNameSpace__ecere__com__MapIterator i = (i.container = (void *)0, i.pointer = (void *)0, __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(&i, (intlStrings)), i);
2973
2974 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next((void *)(&i)))
2975 {
2976 struct ContextStringPair pair = (*(struct ContextStringPair *)(uintptr_t)__ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_key(&i));
2977 struct __ecereNameSpace__ecere__com__Instance * comments = ((struct __ecereNameSpace__ecere__com__Instance *)(uintptr_t)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data((void *)(&i)));
2978
2979 {
2980 struct __ecereNameSpace__ecere__com__Iterator s =
2981 {
2982 (comments), 0
2983 };
2984
2985 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&s))
2986 {
2987 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(potFile, ((char * )((uintptr_t)(__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&s)))));
2988 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2989 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2990
2991 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
2992 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\n");
2993 }
2994 }
2995 if(pair.context)
2996 {
2997 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
2998 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
2999
3000 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
3001 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "msgctxt \"");
3002 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
3003 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
3004
3005 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
3006 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, pair.context);
3007 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
3008 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
3009
3010 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
3011 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"\n");
3012 }
3013 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
3014 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
3015
3016 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
3017 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "msgid \"");
3018 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
3019 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
3020
3021 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
3022 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, pair.string);
3023 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
3024 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
3025
3026 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
3027 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"\n");
3028 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
3029 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
3030
3031 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
3032 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "msgstr \"");
3033 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
3034 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
3035
3036 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
3037 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, pair.string);
3038 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
3039 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
3040
3041 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
3042 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"\n");
3043 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))__extension__ ({
3044 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = potFile;
3045
3046 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
3047 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\n");
3048 }
3049 }
3050 ((void (*)(struct __ecereNameSpace__ecere__com__Instance *))__extension__ ({
3051 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = intlStrings;
3052
3053 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__Map->_vTbl;
3054 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Free])(intlStrings);
3055 (__ecereNameSpace__ecere__com__eInstance_DecRef(intlStrings), intlStrings = 0);
3056 (__ecereNameSpace__ecere__com__eInstance_DecRef(potFile), potFile = 0);
3057 }
3058 }
3059 }
3060 FreeContext(theGlobalContext);
3061 FreeExcludedSymbols(&_excludedSymbols);
3062 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&_defines, (void *)(FreeModuleDefine));
3063 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&_imports, (void *)(FreeModuleImport));
3064 FreeTypeData(privateModule);
3065 FreeIncludeFiles();
3066 FreeGlobalData(&globalData);
3067 (__ecereNameSpace__ecere__com__eInstance_DecRef(privateModule), privateModule = 0);
3068 }
3069 SetSymbolsDir((((void *)0)));
3070 }
3071
3072 void __ecereRegisterModule_ecs(struct __ecereNameSpace__ecere__com__Instance * module)
3073 {
3074 struct __ecereNameSpace__ecere__com__Class __attribute__((unused)) * class;
3075
3076 class = __ecereNameSpace__ecere__com__eSystem_RegisterClass(5, "ModuleInfo", 0, sizeof(struct ModuleInfo), 0, (void *)0, (void *)0, module, 2, 1);
3077 if(((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->application == ((struct __ecereNameSpace__ecere__com__Module *)(((char *)__thisModule + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->application && class)
3078 __ecereClass_ModuleInfo = class;
3079 class = __ecereNameSpace__ecere__com__eSystem_RegisterClass(0, "SymbolgenApp", "ecere::com::Application", 0, 0, (void *)0, (void *)0, module, 2, 1);
3080 if(((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->application == ((struct __ecereNameSpace__ecere__com__Module *)(((char *)__thisModule + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->application && class)
3081 __ecereClass_SymbolgenApp = class;
3082 __ecereNameSpace__ecere__com__eClass_AddMethod(class, "Main", 0, __ecereMethod_SymbolgenApp_Main, 1);
3083 }
3084