module Raw_scheduler: sig .. end
val __pa_ounit_275876e34cf609db118f3d84b799a790 : string
module Monitor: Raw_monitor
val debug : bool
module T: sig .. end
include T
val invariant : t -> unit
val create : unit -> t
val is_dead : t -> bool
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 -> Job.t -> unit
val got_uncaught_exn : t -> Core.Std.Error.t -> unit
val monitor_is_alive : t -> Monitor.t -> bool
val execution_context_is_alive : t -> Execution_context.t -> bool
val kill_monitor : t -> Monitor.t -> unit
val stabilize : t -> (unit, exn) Core.Std.Result.t