Exec (b0.B000.Exec)

type feedback = [

| `Exec_start of B0_std.Os.Cmd.pid option * Op.t

]

type t

val create : 
  ?clock:B0_std.Os.Mtime.counter ->
  ?rand:Random.State.t ->
  ?tmp_dir:B0_std.Fpath.t ->
  ?feedback:(feedback -> unit) ->
  trash:Trash.t ->
  jobs:int ->
  unit ->
  t

val clock : t -> B0_std.Os.Mtime.counter

val tmp_dir : t -> B0_std.Fpath.t

val trash : t -> Trash.t

val jobs : t -> int

val schedule : t -> Op.t -> unit

val collect : t -> block:bool -> Op.t option