Internal to Async -- see Ivar for the public API.
include sig ... end
val sexp_of_t : ('a ‑> Base.Sexp.t) ‑> 'a t ‑> Base.Sexp.t
include Core_kernel.Invariant.S1 with type a t := a t
val invariant : 'a Base__.Invariant_intf.inv ‑> 'a t Base__.Invariant_intf.inv
val create : unit ‑> _ t
val create_full : 'a ‑> 'a t
val peek : 'a t ‑> 'a option
val value_exn : 'a t ‑> 'a
val value : 'a t ‑> if_empty_then_failwith:string ‑> 'a
val is_empty : _ t ‑> bool
val is_full : _ t ‑> bool
val fill : 'a t ‑> 'a ‑> unit
module Handler : sig ... end
val add_handler : 'a t ‑> ('a ‑> unit) ‑> Async_kernel.Execution_context.t ‑> 'a Handler.t
val has_handlers : _ t ‑> bool
val upon : 'a t ‑> ('a ‑> unit) ‑> unit