aboutsummaryrefslogtreecommitdiffhomepage
path: root/lib/flags.ml
diff options
context:
space:
mode:
authorGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2016-05-31 14:42:49 +0200
committerGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2016-05-31 14:42:49 +0200
commitd46e4bc63587c1b628cc80b3eac7a132a58d534d (patch)
tree00ae2ded7013e15fcf5c98223fe20e64e0fd6454 /lib/flags.ml
parentb3485ddc8c4f98743426bb58c8d49b76edd43d61 (diff)
STM delegation policy can be customized
The command line option is named: - async-proofs-delegation-threshold Values are of type float, default 1.0 (seconds). Proofs taking less that the threshold are not delegated to a worker.
Diffstat (limited to 'lib/flags.ml')
-rw-r--r--lib/flags.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/flags.ml b/lib/flags.ml
index c1ec9738c..7de4fe854 100644
--- a/lib/flags.ml
+++ b/lib/flags.ml
@@ -73,6 +73,7 @@ let async_proofs_is_worker () =
!async_proofs_worker_id <> "master"
let async_proofs_is_master () =
!async_proofs_mode = APon && !async_proofs_worker_id = "master"
+let async_proofs_delegation_threshold = ref 1.0
let debug = ref false
let in_debugger = ref false