mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-10 13:14:09 -05:00
25 lines
491 B
OCaml
25 lines
491 B
OCaml
(** {1 Statistics} *)
|
|
|
|
module Fmt = CCFormat
|
|
|
|
type t
|
|
|
|
val create : unit -> t
|
|
|
|
type 'a counter
|
|
|
|
val mk_int : t -> string -> int counter
|
|
val mk_float : t -> string -> float counter
|
|
val incr : int counter -> unit
|
|
val incr_f : float counter -> float -> unit
|
|
val set : 'a counter -> 'a -> unit
|
|
|
|
type ex_counter
|
|
(** Existential counter *)
|
|
|
|
val all : t -> ex_counter Iter.t
|
|
val pp_counters : ex_counter Iter.t Fmt.printer
|
|
val pp : t Fmt.printer
|
|
|
|
val global : t
|
|
(** Global statistics, by default *)
|