sig
  type t
  val make : n:int -> Maki_utils.ProgressBar.t
  val stop : Maki_utils.ProgressBar.t -> unit
  val incr : Maki_utils.ProgressBar.t -> unit
  val set_count : Maki_utils.ProgressBar.t -> int -> unit
end