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, '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 :
          ('-> Sexplib.Sexp.t) ->
          'Raw_deferred.Scheduler_dependent.t -> Sexplib.Sexp.t
        type 'a detailed = 'Raw_deferred.Scheduler_dependent.t
        val sexp_of_detailed :
          ('-> Sexplib.Sexp.t) ->
          'Raw_deferred.Scheduler_dependent.detailed -> Sexplib.Sexp.t
        val upon :
          'Raw_deferred.Scheduler_dependent.t -> ('-> unit) -> unit
        val upon' :
          'Raw_deferred.Scheduler_dependent.t ->
          ('-> unit) -> Unregister.t
        val bind :
          'Raw_deferred.Scheduler_dependent.t ->
          ('-> 'Raw_deferred.Scheduler_dependent.t) ->
          'Raw_deferred.Scheduler_dependent.t
        val install_removable_handler :
          'Raw_deferred.Scheduler_dependent.t ->
          ('a, Scheduler.Execution_context.t) Raw_handler.t -> Unregister.t
      end
  val ounit_tests : unit -> OUnit.test
end