diff options
| author | Hugo Herbelin | 2019-05-10 11:24:51 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2019-07-08 02:31:27 +0200 |
| commit | 2bdfddc39d1fd6200042ddb95ded98b44e14b8e5 (patch) | |
| tree | b3d7191233a2e8b8c2a7fa564e7bdeb8bf95594b /stm/workerPool.mli | |
| parent | c41f747f7df49bc26983d41096519672f05b793a (diff) | |
Passing command-line option async_proofs_worker_priority functionally.
We lose track of it at some time in "known_state" and assume that the
reference cur_opt has not been modified in between the time it was set
(in "new_doc") and "known_state".
Diffstat (limited to 'stm/workerPool.mli')
| -rw-r--r-- | stm/workerPool.mli | 5 |
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 |