equal
deleted
inserted
replaced
65 // CCHandlers.inc |
65 // CCHandlers.inc |
66 // HHHandlers.inc |
66 // HHHandlers.inc |
67 // SinTable.inc |
67 // SinTable.inc |
68 // proto.inc |
68 // proto.inc |
69 |
69 |
|
70 var isTerminated: boolean = false; |
|
71 alsoShutdownFrontend: boolean = false; |
70 {$IFDEF HWLIBRARY} |
72 {$IFDEF HWLIBRARY} |
71 type arrayofpchar = array[0..7] of PChar; |
73 type arrayofpchar = array[0..7] of PChar; |
72 var isTerminated: boolean = false; |
|
73 alsoShutdownFrontend: boolean = false; |
|
74 |
74 |
75 procedure initEverything; |
75 procedure initEverything; |
76 procedure freeEverything; |
76 procedure freeEverything; |
77 |
77 |
78 implementation |
78 implementation |
221 |
221 |
222 /////////////// |
222 /////////////// |
223 {$IFDEF HWLIBRARY} |
223 {$IFDEF HWLIBRARY} |
224 procedure Game(gameArgs: arrayofpchar); cdecl; export; |
224 procedure Game(gameArgs: arrayofpchar); cdecl; export; |
225 {$ELSE} |
225 {$ELSE} |
226 procedure Game;cdecl; export; |
226 procedure Game; |
227 {$ENDIF} |
227 {$ENDIF} |
228 var p: TPathType; |
228 var p: TPathType; |
229 s: shortstring; |
229 s: shortstring; |
230 begin |
230 begin |
231 {$IFDEF HWLIBRARY} |
231 {$IFDEF HWLIBRARY} |