module Execution_context: Execution_context
type
t = {
}
val kill_index : t -> Kill_index.t
val set_kill_index : t -> Kill_index.t -> unit
val backtrace_history : t -> Core.Std.Backtrace.t list
val local_storage : t -> Core.Std.Univ_map.t
val priority : t -> Priority.t
val monitor : t -> Raw_monitor.t
module Fields: sig
.. end
include Invariant.S
val main : t
val create_like : ?monitor:Raw_monitor.t ->
?priority:Priority.t ->
?local_storage:Core.Std.Univ_map.t ->
t -> t
val find_local : t -> 'a Core.Std.Univ_map.Key.t -> 'a option
val with_local : t ->
'a Core.Std.Univ_map.Key.t -> 'a option -> t
val record_backtrace : t -> t
val sexp_of_t : t -> Sexplib.Sexp.t