sig
  type t = {
    name : string;
    unit_str : string;
    mutable value : int64;
    events : Metric.Atomic.t;
  }
  val all : (string, Metric.Counter.t) Batteries.Hashtbl.t
  val make : string -> string -> Metric.Counter.t
  val increase : Metric.Counter.t -> int64 -> unit
  val print : 'a BatInnerIO.output -> Metric.Counter.t -> unit
end