hedgewars/hwengine.pas
changeset 3029 67483e87590c
parent 3025 01682ec58eb0
child 3038 4e48c276a468
equal deleted inserted replaced
3028:d17cf923d7c3 3029:67483e87590c
   156     FreeLand();
   156     FreeLand();
   157     ControllerClose();
   157     ControllerClose();
   158     SendKB();
   158     SendKB();
   159     CloseIPC();
   159     CloseIPC();
   160     TTF_Quit();
   160     TTF_Quit();
   161     {$IFDEF SDL13}SDL_VideoQuit();{$ENDIF}
       
   162     SDL_Quit();
   161     SDL_Quit();
   163     {$IFDEF IPHONEOS}
       
   164     freeEverything();
   162     freeEverything();
   165     {$ENDIF}
       
   166     exit();
   163     exit();
   167 end;
   164 end;
   168 
   165 
   169 ///////////////////
   166 ///////////////////
   170 procedure MainLoop; 
   167 procedure MainLoop;