Module Async_kernel__.Monitor0

val debug : bool
type t = Async_kernel__.Types.Monitor.t = {
name : Core_kernel.Info.t;
here : Core_kernel.Source_code_position.t option;
id : int;
parent : t option;
mutable next_error : exn Async_kernel__.Types.Ivar.t;
mutable handlers_for_all_errors : (Async_kernel__.Types.Execution_context.t * (exn ‑> unit)) Core_kernel.Bag.t;
mutable tails_for_all_errors : exn Async_kernel__.Types.Tail.t list;
mutable has_seen_error : bool;
mutable is_detached : bool;
}
val is_detached : t ‑> bool
val set_is_detached : t ‑> bool ‑> unit
val has_seen_error : t ‑> bool
val set_has_seen_error : t ‑> bool ‑> unit
val tails_for_all_errors : t ‑> exn Async_kernel__.Types.Tail.t list
val set_tails_for_all_errors : t ‑> exn Async_kernel__.Types.Tail.t list ‑> unit
val handlers_for_all_errors : t ‑> (Async_kernel__.Types.Execution_context.t * (exn ‑> unit)) Core_kernel.Bag.t
val set_handlers_for_all_errors : t ‑> (Async_kernel__.Types.Execution_context.t * (exn ‑> unit)) Core_kernel.Bag.t ‑> unit
val next_error : t ‑> exn Async_kernel__.Types.Ivar.t
val set_next_error : t ‑> exn Async_kernel__.Types.Ivar.t ‑> unit
val parent : t ‑> t option
val id : t ‑> int
val here : t ‑> Core_kernel.Source_code_position.t option
val name : t ‑> Core_kernel.Info.t
module Fields : sig ... end
module Pretty : sig ... end
val to_pretty : t ‑> Pretty.one Core_kernel.List.t
val sexp_of_t : t ‑> Sexplib.Sexp.t
val next_id : unit ‑> int
val create_with_parent : ?here:Core_kernel.Source_code_position.t ‑> ?info:Core_kernel.Info.t ‑> ?name:string ‑> t option ‑> t
val main : t
val try_with_log_exn : (exn ‑> unit) Core_kernel.ref