Module MProf_trace

type hiatus_reason =
| Wait_for_work
| Suspend
| Hibernate
val note_hiatus : 'a -> unit
val note_resume : unit -> unit
val label : 'a -> unit
val named_wait : 'a -> 'b Lwt.t * 'b Lwt.u
val named_task : 'a -> 'b Lwt.t * 'b Lwt.u
val named_condition : 'a -> 'b Lwt_condition.t
val named_mvar : 'a -> 'b -> 'b Lwt_mvar.t
val named_mvar_empty : 'a -> 'b Lwt_mvar.t
val should_resolve : 'a -> unit
val note_increase : 'a -> 'b -> unit
val note_counter_value : 'a -> 'b -> unit