Module `Profile.Private`

module Clock : sig ... end

val record_frame : start:Core_kernel.Time_ns.t -> stop:Core_kernel.Time_ns.t -> message:Core_kernel.Sexp.t Core_kernel.Lazy.t -> unit
val clock : Clock.t Core_kernel.ref
val on_async_out_of_order : (Core_kernel.Sexp.t Core_kernel.Lazy.t -> unit) Core_kernel.ref