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