hedgewars/PascalExports.pas
changeset 5975 c3a8cab64fcb
parent 5968 4e8bb227be9a
child 6023 a28be05b20bc
child 6362 ceacd1b61833
--- a/hedgewars/PascalExports.pas	Tue Sep 20 16:00:20 2011 -0400
+++ b/hedgewars/PascalExports.pas	Tue Sep 20 23:43:52 2011 +0200
@@ -36,7 +36,6 @@
 implementation
 {$IFDEF HWLIBRARY}
 var cZoomVal: GLfloat;
-    previousGameState: TGameState;
 
 // retrieve protocol information
 procedure HW_versionInfo(netProto: PLongInt; versionStr: PPChar); cdecl; export;
@@ -185,17 +184,6 @@
     exit( isPaused );
 end;
 
-procedure HW_suspend; cdecl; export;
-begin
-    previousGameState:= GameState;
-    GameState:= gsSuspend;
-end;
-
-procedure HW_resume; cdecl; export;
-begin
-    GameState:= previousGameState;
-end;
-
 // equivalent to esc+y; when closeFrontend = true the game exits after memory cleanup
 procedure HW_terminate(closeFrontend: boolean); cdecl; export;
 begin