Module Job

module Job: sig .. end

type 'execution_context t 
include Invariant.S1
val create : 'execution_context -> ('a -> unit) -> 'a -> 'execution_context t
val do_nothing : 'execution_context -> 'execution_context t
val execution_context : 'execution_context t -> 'execution_context
val run : 'a t -> unit
val sexp_of_t : ('execution_context -> Sexplib.Sexp.t) ->
'execution_context t -> Sexplib.Sexp.t