module Raw_scheduler: sig .. end
val __pa_ounit_275876e34cf609db118f3d84b799a790 : string
module Execution_context: Execution_context
module Ivar: Raw_ivar
module Tail: Raw_tail
val debug : bool
type 'a tail = ('a, Execution_context.t) Tail.t
val sexp_of_tail : 'a. ('a -> Sexplib.Sexp.t) -> 'a tail -> Sexplib.Sexp.t
module T: sig .. end
include T
val invariant : t -> unit
val create : unit -> t
val set_check_access : t -> (unit -> unit) -> unit
val t_ref : t Pervasives.ref
val check_access : t -> unit
val t : unit -> t
val current_execution_context : t -> Execution_context.t
val set_execution_context : t -> Execution_context.t -> unit
val with_execution_context : t -> Execution_context.t -> f:(unit -> 'a) -> 'a
val add_job : t -> Execution_context.t Job.t -> unit
val got_uncaught_exn : t -> Core.Std.Error.t -> unit