package obatcher
Parameter Make_Poly.S
t represents the underlying service that processes and handles batches of operations as input. Only a single batch is active at any time
type 'a wrapped_op = | Mk : ('a, 'b) op * 'b Picos.Computation.t -> 'a wrapped_op(*
*)wrapped_opbinds the operation on the service with it's corresponding suspended continuation to run after its completion.
val run : 'a t -> 'a wrapped_op array -> unitrun t ops when called on service t, processes all the operations in ops, possibly using parallelism to complete the batch.