sig
  module type S =
    sig
      val start : unit -> unit
      val pause : unit -> unit
      val get : unit -> float
    end
  module Make : functor (X : sig val profiling : bool end) -> S
end