aboutsummaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorEnrico Tassi2014-07-21 10:03:04 +0200
committerEnrico Tassi2014-08-05 18:38:28 +0200
commit7dba9d3f3ce62246b9d8562d2818c63ba37b206e (patch)
treefbf0e133e160a5f7ff03f8a0b5bb4d0f47b43105 /lib
parent4e724634839726aa11534f16e4bfb95cd81232a4 (diff)
STM: new "par:" goal selector, like "all:" but in parallel
par: distributes the goals among a number of workers given by -async-proofs-tac-j (defaults to 2).
Diffstat (limited to 'lib')
-rw-r--r--lib/flags.ml1
-rw-r--r--lib/flags.mli1
2 files changed, 2 insertions, 0 deletions
diff --git a/lib/flags.ml b/lib/flags.ml
index 4b323f611b..75f149eb69 100644
--- a/lib/flags.ml
+++ b/lib/flags.ml
@@ -51,6 +51,7 @@ let compilation_mode = ref BuildVo
type async_proofs = APoff | APonLazy | APon
let async_proofs_mode = ref APoff
let async_proofs_n_workers = ref 1
+let async_proofs_n_tacworkers = ref 2
let async_proofs_private_flags = ref None
let async_proofs_always_delegate = ref false
let async_proofs_never_reopen_branch = ref false
diff --git a/lib/flags.mli b/lib/flags.mli
index db1d8bcc46..4697e4cacd 100644
--- a/lib/flags.mli
+++ b/lib/flags.mli
@@ -18,6 +18,7 @@ val compilation_mode : compilation_mode ref
type async_proofs = APoff | APonLazy | APon
val async_proofs_mode : async_proofs ref
val async_proofs_n_workers : int ref
+val async_proofs_n_tacworkers : int ref
val async_proofs_private_flags : string option ref
val async_proofs_is_worker : unit -> bool
val async_proofs_is_master : unit -> bool