aboutsummaryrefslogtreecommitdiffhomepage
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/system.ml4
-rw-r--r--lib/system.mli1
2 files changed, 0 insertions, 5 deletions
diff --git a/lib/system.ml b/lib/system.ml
index f5c96256f..5bd2df995 100644
--- a/lib/system.ml
+++ b/lib/system.ml
@@ -331,10 +331,6 @@ let run_command converter f c =
type time = float * float * float
-let process_time () =
- let t = times () in
- (t.tms_utime, t.tms_stime)
-
let get_time () =
let t = times () in
(time(), t.tms_utime, t.tms_stime)
diff --git a/lib/system.mli b/lib/system.mli
index 61073cfc4..fae7fd1ed 100644
--- a/lib/system.mli
+++ b/lib/system.mli
@@ -76,7 +76,6 @@ val run_command : (string -> string) -> (string -> unit) -> string ->
type time
-val process_time : unit -> float * float
val get_time : unit -> time
val time_difference : time -> time -> float (** in seconds *)
val fmt_time_difference : time -> time -> Pp.std_ppcmds