hack_parallel

Parallel and shared memory library
Library hack_parallel.interface
type 'a bucket =
| Job of 'a
| Wait
| Done
type 'a next = unit -> 'a bucket
val of_list : 'a list -> 'a list bucket
val make : num_workers:int -> 'a list -> 'a list next
type 'a of_n = {
work : 'a;
bucket : int;
total : int;
}
val make_n_buckets : buckets:int -> split:( bucket:int -> 'a ) -> 'a of_n next