Profile.Privatemodule Clock : sig ... endval record_frame :
start:Core_kernel.Time_ns.t ->
stop:Core_kernel.Time_ns.t ->
message:Core_kernel.Sexp.t Core_kernel.Lazy.t ->
unitval clock : Clock.t Core_kernel.refval on_async_out_of_order :
(Core_kernel.Sexp.t Core_kernel.Lazy.t -> unit) Core_kernel.ref