equal
deleted
inserted
replaced
42 procedure RunEngine(argc: LongInt; argv: PPChar); cdecl; export; |
42 procedure RunEngine(argc: LongInt; argv: PPChar); cdecl; export; |
43 |
43 |
44 procedure preInitEverything(); |
44 procedure preInitEverything(); |
45 procedure initEverything(complete:boolean); |
45 procedure initEverything(complete:boolean); |
46 procedure freeEverything(complete:boolean); |
46 procedure freeEverything(complete:boolean); |
|
47 {$IFDEF MOBILE} |
|
48 procedure GenLandPreview; cdecl; export; |
|
49 {$ENDIF MOBILE} |
47 |
50 |
48 implementation |
51 implementation |
49 {$ELSE} |
52 {$ELSE} |
50 procedure preInitEverything(); forward; |
53 procedure preInitEverything(); forward; |
51 procedure initEverything(complete:boolean); forward; |
54 procedure initEverything(complete:boolean); forward; |
538 uPhysFSLayer.freeModule; |
541 uPhysFSLayer.freeModule; |
539 uScript.freeModule; |
542 uScript.freeModule; |
540 end; |
543 end; |
541 |
544 |
542 /////////////////////////////////////////////////////////////////////////////// |
545 /////////////////////////////////////////////////////////////////////////////// |
543 procedure GenLandPreview; |
546 procedure GenLandPreview;{$IFDEF MOBILE} cdecl; export;{$ENDIF MOBILE} |
544 var Preview: TPreviewAlpha; |
547 var Preview: TPreviewAlpha; |
545 begin |
548 begin |
546 initEverything(false); |
549 initEverything(false); |
547 |
550 |
548 InitIPC; |
551 InitIPC; |