hedgewars/hwengine.pas
changeset 2796 7f86e7ad378b
parent 2790 83630d5f94db
child 2799 558b29bf00c5
--- a/hedgewars/hwengine.pas	Wed Feb 10 17:15:10 2010 +0000
+++ b/hedgewars/hwengine.pas	Wed Feb 10 17:31:12 2010 +0000
@@ -166,7 +166,9 @@
 	TTF_Quit();
 	{$IFDEF SDL13}SDL_VideoQuit();{$ENDIF}
 	SDL_Quit();
+	{$IFDEF IPHONEOS}
 	freeEverything();
+	{$ENDIF}
 	exit();
 end;
 
@@ -578,6 +580,7 @@
 
 	if GameType = gmtLandPreview then GenLandPreview()
 	else Game();
+	freeEverything();
 	ExitCode:= 0;
 {$ENDIF}
 end.