hedgewars/PascalExports.pas
branchhedgeroid
changeset 5725 e27100a0e2d0
parent 5495 272ed78e59a7
parent 5662 99083392cd4f
child 6023 a28be05b20bc
--- a/hedgewars/PascalExports.pas	Thu Sep 01 14:55:31 2011 +0200
+++ b/hedgewars/PascalExports.pas	Thu Sep 01 17:03:19 2011 +0200
@@ -39,7 +39,6 @@
 implementation
 {$IFDEF HWLIBRARY}
 var cZoomVal: GLfloat;
-    previousGameState: TGameState;
 
 // retrieve protocol information
 procedure HW_versionInfo(netProto: PLongInt; versionStr: PPChar); cdecl; export;
@@ -188,17 +187,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