Utils.Object_counter
type t
val start : Stdlib.Format.formatter -> t * ((unit -> unit) * (unit -> unit) * (unit -> unit))
val finalise : t -> unit
val finalise_with_stats : t -> int * int * int