package async_kernel
Module Private.Deferred
module Scheduler : sig ... endval sexp_of_t : ('a -> Sexplib0.Sexp.t) -> 'a Deferred.t -> Sexplib0.Sexp.tinclude Core.Invariant.S1 with type 'a t := 'a t
val invariant :
'a Base__.Invariant_intf.inv ->
'a Deferred.t Base__.Invariant_intf.invval of_ivar : 'a Async_kernel__.Types.Ivar.t -> 'a Deferred.tval create : ('a Async_kernel__.Types.Ivar.t -> unit) -> 'a Deferred.tval peek : 'a Deferred.t -> 'a optionval value_exn : 'a Deferred.t -> 'aval is_determined : _ Deferred.t -> boolval upon : 'a Deferred.t -> ('a -> unit) -> unitmodule Handler : sig ... endval add_handler :
'a Deferred.t ->
('a -> unit) ->
Execution_context.t ->
'a Handler.tval remove_handler : 'a Deferred.t -> 'a Handler.t -> unitval never : unit -> 'a Deferred.tmodule M : sig ... endval return : 'a -> 'a Deferred.tmodule Let_syntax : sig ... endval unit : unit Deferred.tval both : 'a Deferred.t -> 'b Deferred.t -> ('a * 'b) Deferred.tmodule Infix : sig ... endval don't_wait_for : unit Deferred.t -> unitmodule Choice : sig ... endmodule Unregister : sig ... endval choice : 'a Deferred.t -> ('a -> 'b) -> 'b Choice.tval enabled : 'a Choice.t list -> (unit -> 'a list) Deferred.tval choose_result : 'a Choice.t list -> 'aval choose : 'a Choice.t list -> 'a Deferred.tval any_f : 'a Deferred.t list -> ('a -> 'b) -> 'b Deferred.tval any : 'a Deferred.t list -> 'a Deferred.tval any_unit : unit Deferred.t list -> unit Deferred.tval for_ :
int ->
to_:int ->
do_:(int -> unit Async_kernel__.Types.Deferred.t) ->
unit Deferred.tval repeat_until_finished :
'a ->
('a -> [< `Finished of 'b | `Repeat of 'a ] Deferred.t) ->
'b Deferred.ttype how = Monad_sequence.howval sexp_of_how : how -> Sexplib0.Sexp.tmodule type Monad_sequence =
Monad_sequence.S with type 'a monad := 'a Deferred.tval fold : 'a list -> init:'b -> f:('b -> 'a -> 'b Deferred.t) -> 'b Deferred.tval all_unit : unit Deferred.t list -> unit Deferred.tval ok :
'a Async_kernel__.Types.Deferred.t ->
('a, 'b) Core._result Async_kernel__.Types.Deferred.t