diff options
Diffstat (limited to 'stm/asyncTaskQueue.mli')
| -rw-r--r-- | stm/asyncTaskQueue.mli | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/stm/asyncTaskQueue.mli b/stm/asyncTaskQueue.mli index ddbb28457d..cd91ba129b 100644 --- a/stm/asyncTaskQueue.mli +++ b/stm/asyncTaskQueue.mli @@ -61,6 +61,11 @@ module Make(T : Task) : sig val set_order : (T.task -> T.task -> int) -> unit - val dump : unit -> T.task list + (* Take a snapshot (non destructive but waits until all workers are + * enqueued) *) + val snapshot : unit -> T.task list + + (* Clears the queue, only if the worker prool is empty *) + val clear : unit -> unit end |