aboutsummaryrefslogtreecommitdiff
path: root/stm/workerPool.mli
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2019-07-08 12:23:00 +0200
committerEmilio Jesus Gallego Arias2019-07-08 12:23:00 +0200
commitd6954d853ac1e0bdcf63a50b9d96fcb38559d8a9 (patch)
tree5c17149292f54e3bfe3b4d3977825a10c3de8a92 /stm/workerPool.mli
parentae7fc8bc74289bd8a1eca48c8ca8ecf923888285 (diff)
parentf2779d48d3b7735687444e22b16cdb7cb8f7ce60 (diff)
Merge PR #10246: Investigations in the initialization of coq binaries and command line (part 1)
Reviewed-by: ejgallego Ack-by: gares Ack-by: herbelin
Diffstat (limited to 'stm/workerPool.mli')
-rw-r--r--stm/workerPool.mli5
1 files changed, 3 insertions, 2 deletions
diff --git a/stm/workerPool.mli b/stm/workerPool.mli
index 5a6c968993..5468a24959 100644
--- a/stm/workerPool.mli
+++ b/stm/workerPool.mli
@@ -19,7 +19,8 @@ type 'a cpanel = {
module type PoolModel = sig
(* this shall come from a Spawn.* model *)
type process
- val spawn : int -> worker_id * process * CThread.thread_ic * out_channel
+ val spawn : int -> CoqworkmgrApi.priority ->
+ worker_id * process * CThread.thread_ic * out_channel
(* this defines the main loop of the manager *)
type extra
@@ -31,7 +32,7 @@ module Make(Model : PoolModel) : sig
type pool
- val create : Model.extra -> size:int -> pool
+ val create : Model.extra -> size:int -> CoqworkmgrApi.priority -> pool
val is_empty : pool -> bool
val n_workers : pool -> int