Module Ir.Task

module Lazy = Utils.Lazy
val _get_local_debug_runtime : unit -> (module Minidebug_runtime.Debug_runtime)
type t =
  1. | Task : {
    1. context_lifetime : 'a;
    2. description : Base.string;
    3. work : Base.unit -> Base.unit;
    } -> t
val sexp_of_t : t -> Sexplib0.Sexp.t
val describe : t -> Base.string
val run : t -> Base.unit
val prepend : work:(unit -> unit) -> t -> t
val append : work:(unit -> Base.unit) -> t -> t
val enschedule : schedule_task:('a -> t -> Base.unit) -> get_stream_name:('a -> Base.String.t) -> 'a -> t -> t