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

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