module Timed: sig .. end
type
|
mutable min : Clock.Interval.t * string; |
|
mutable max : Clock.Interval.t * string; |
}
val make_minmax : Clock.Interval.t -> string -> minmax
val update_minmax : minmax -> Clock.Interval.t -> string -> unit
type
|
name : string; |
|
start : Metric.Atomic.t; |
|
stop : Metric.Atomic.t; |
|
mutable tot_duration : Clock.Interval.t; |
|
mutable minmax : minmax option; |
|
mutable simult : int; |
|
mutable max_simult : int; |
}
val all : (string, t) Batteries.Hashtbl.t
val make : string -> t
val start : t -> Clock.Time.t
val stop : t -> Clock.Time.t -> string -> unit
val print : 'a BatInnerIO.output -> t -> unit