DEADSOFTWARE

system: remove sys_GetTicks
[d2df-sdl.git] / src / game / stub / g_system.pas
index 4e4f42377e3da2e59abb09b1967ce97add6ad01f..ab42c12025de79afdd2f3921bc38f6b96f93e1a4 100644 (file)
@@ -20,7 +20,6 @@ interface
   uses Utils;
 
   (* --- Utils --- *)
-  function sys_GetTicks (): Int64;
   procedure sys_Delay (ms: Integer);
 
   (* --- Graphics --- *)
@@ -39,6 +38,7 @@ interface
 
   var (* hooks *)
     sys_CharPress: procedure (ch: AnsiChar) = nil;
+    sys_ScreenResize: procedure (w, h: Integer) = nil;
 
 implementation
 
@@ -46,11 +46,6 @@ implementation
 
   (* --------- Utils --------- *)
 
-  function sys_GetTicks (): Int64;
-  begin
-    Result := Round(TimeStampToMSecs(DateTimeToTimeStamp(Now())))
-  end;
-
   procedure sys_Delay (ms: Integer);
   begin
     Sleep(ms)