equal
deleted
inserted
replaced
164 SendKB(); |
164 SendKB(); |
165 CloseIPC(); |
165 CloseIPC(); |
166 TTF_Quit(); |
166 TTF_Quit(); |
167 {$IFDEF SDL13}SDL_VideoQuit();{$ENDIF} |
167 {$IFDEF SDL13}SDL_VideoQuit();{$ENDIF} |
168 SDL_Quit(); |
168 SDL_Quit(); |
|
169 {$IFDEF IPHONEOS} |
169 freeEverything(); |
170 freeEverything(); |
|
171 {$ENDIF} |
170 exit(); |
172 exit(); |
171 end; |
173 end; |
172 |
174 |
173 /////////////////// |
175 /////////////////// |
174 procedure MainLoop; |
176 procedure MainLoop; |
576 GetParams(); |
578 GetParams(); |
577 Randomize(); |
579 Randomize(); |
578 |
580 |
579 if GameType = gmtLandPreview then GenLandPreview() |
581 if GameType = gmtLandPreview then GenLandPreview() |
580 else Game(); |
582 else Game(); |
|
583 freeEverything(); |
581 ExitCode:= 0; |
584 ExitCode:= 0; |
582 {$ENDIF} |
585 {$ENDIF} |
583 end. |
586 end. |