Module Stats

module Stats: sig .. end
Simple module to record statistics, by profiling

type t 
val counter : string -> t
create a new counter with the given name
val incr : ?n:int -> t -> unit
increment a counter
val get : string -> int
getting the value of a counter
val count_calls : string -> ('a -> 'b) -> 'a -> 'b
count the calls to the given function, under the given name
val print : Format.formatter -> unit
print the status of all counters
val reset : unit -> unit
reset all counters