Module Backend__Tasks

type ('a, 'b) doer = 'a -> 'b option
val run_sequentially : f:('a'b) doer -> 'a list -> unit

Run the tasks sequentially

module Runner : sig ... end

A runner accepts new tasks repeatedly for parallel execution