sig
type (+'a, 'execution_context) t
type ('a, 'execution_context) deferred =
('a, 'execution_context) Raw_deferred.t
val of_ivar :
('a, 'execution_context) Raw_ivar.t ->
('a, 'execution_context) Raw_deferred.t
val create :
(('a, 'execution_context) Raw_ivar.t -> unit) ->
('a, 'execution_context) Raw_deferred.t
val peek : ('a, 'b) Raw_deferred.t -> 'a option
val is_determined : ('a, 'b) Raw_deferred.t -> bool
val return : 'a -> ('a, 'b) Raw_deferred.t
module Scheduler_dependent :
functor (Scheduler : Import.Basic_scheduler) ->
sig
type 'a t = ('a, Scheduler.Execution_context.t) Raw_deferred.deferred
val sexp_of_t :
('a -> Sexplib.Sexp.t) ->
'a Raw_deferred.Scheduler_dependent.t -> Sexplib.Sexp.t
type 'a detailed = 'a Raw_deferred.Scheduler_dependent.t
val sexp_of_detailed :
('a -> Sexplib.Sexp.t) ->
'a Raw_deferred.Scheduler_dependent.detailed -> Sexplib.Sexp.t
val upon :
'a Raw_deferred.Scheduler_dependent.t -> ('a -> unit) -> unit
val upon' :
'a Raw_deferred.Scheduler_dependent.t ->
('a -> unit) -> Unregister.t
val bind :
'a Raw_deferred.Scheduler_dependent.t ->
('a -> 'b Raw_deferred.Scheduler_dependent.t) ->
'b Raw_deferred.Scheduler_dependent.t
val install_removable_handler :
'a Raw_deferred.Scheduler_dependent.t ->
('a, Scheduler.Execution_context.t) Raw_handler.t -> Unregister.t
end
val ounit_tests : unit -> OUnit.test
end