aboutsummaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorEnrico Tassi2014-06-30 23:25:19 +0200
committerEnrico Tassi2014-07-10 15:22:58 +0200
commit3abbc93733b7f820a436beedcd0b9292378e1840 (patch)
treef310b829a8a2ce2335663d4976bcd029c9c5b102 /lib
parent4f554c88aa7ecc8ebeb8af1a11bf3a12d255c25b (diff)
option to always delegate futures to workers
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 7fed951008..36bb447ae9 100644
--- a/lib/flags.ml
+++ b/lib/flags.ml
@@ -52,6 +52,7 @@ type async_proofs = APoff | APonLazy | APonParallel of int
let async_proofs_mode = ref APoff
let async_proofs_n_workers = ref 1
let async_proofs_worker_flags = ref None
+let async_proofs_always_delegate = ref false
let async_proofs_is_worker () =
match !async_proofs_mode with
diff --git a/lib/flags.mli b/lib/flags.mli
index c1e5a9dbd0..ea50d41da9 100644
--- a/lib/flags.mli
+++ b/lib/flags.mli
@@ -21,6 +21,7 @@ val async_proofs_n_workers : int ref
val async_proofs_worker_flags : string option ref
val async_proofs_is_worker : unit -> bool
+val async_proofs_always_delegate : bool ref
val debug : bool ref