Up

module Raw_ivar

: sig

Internal to Async -- see [root:Ivar] for the public API.

#
type 'a t
#
type 'a ivar = 'a t
include Core.Std.Invariant.S1 with type 'a t := 'a t
#
val create : unit -> _ t
#
val create_full : 'a -> 'a t
#
val peek : 'a t -> 'a option
#
val is_empty : _ t -> bool
#
val is_full : _ t -> bool
#
val equal : 'a t -> 'a t -> bool
#
val connect : bind_result:'a t -> bind_rhs:'a t -> unit
#
val fill : 'a t -> 'a -> unit
#
module Handler : sig
#
type 'a t
#
val sexp_of_t : ('a -> Sexplib.Sexp.t) -> 'a t -> Sexplib.Sexp.t
end
#
val add_handler : 'a t -> ('a -> unit) -> Execution_context.t -> 'a Handler.t
#
val remove_handler : 'a t -> 'a Handler.t -> unit
#
val upon : 'a t -> ('a -> unit) -> unit
#
val upon' : 'a t -> ('a -> unit) -> 'a Handler.t
#
val indir : 'a t -> 'a t
#
val sexp_of_t : ('a -> Sexplib.Sexp.t) -> 'a t -> Sexplib.Sexp.t
end