module Execution_context: Execution_context
module Monitor: Raw_monitor
type
t = {
}
val sexp_of_t : t -> Sexplib.Sexp.t
val backtrace_history : t -> Core.Std.Backtrace.t list
val priority : t -> Priority.t
val monitor : t -> t Monitor.t_
val work_group : t -> Work_group.t
module Fields: sig
.. end
val invariant : t -> unit
val main_work_group_hole : Work_group.t Backpatched.Hole.t
val main_monitor_hole : t Monitor.t_ Backpatched.Hole.t
val main : t
val work_group : t -> Work_group.t
val monitor : t -> t Monitor.t_
val create_like : ?work_group:Work_group.t ->
?monitor:t Monitor.t_ ->
?priority:Priority.t -> t -> t
val record_backtrace : t -> t