diff options
| author | Enrico Tassi | 2016-05-23 16:57:31 +0200 |
|---|---|---|
| committer | Enrico Tassi | 2016-06-06 14:04:33 -0400 |
| commit | 821937aee71bf9439158e27e06f7b4f74289b209 (patch) | |
| tree | 7e06be2dbbfd3c7168a6056b4a198bad44bab1f3 /lib | |
| parent | 8baf120d5cf5045d188f7d926162643a6e7ebcd0 (diff) | |
STM: proof block detection made optional + simple test
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/flags.ml | 2 | ||||
| -rw-r--r-- | lib/flags.mli | 2 |
2 files changed, 4 insertions, 0 deletions
diff --git a/lib/flags.ml b/lib/flags.ml index c1ec9738ca..ecf3c3f168 100644 --- a/lib/flags.ml +++ b/lib/flags.ml @@ -68,6 +68,8 @@ let priority_of_string = function | "low" -> Low | "high" -> High | _ -> raise (Invalid_argument "priority_of_string") +let async_proofs_tac_error_resilience = ref true +let async_proofs_cmd_error_resilience = ref true let async_proofs_is_worker () = !async_proofs_worker_id <> "master" diff --git a/lib/flags.mli b/lib/flags.mli index 24780f0dcc..b26ef027c6 100644 --- a/lib/flags.mli +++ b/lib/flags.mli @@ -34,6 +34,8 @@ type priority = Low | High val async_proofs_worker_priority : priority ref val string_of_priority : priority -> string val priority_of_string : string -> priority +val async_proofs_tac_error_resilience : bool ref +val async_proofs_cmd_error_resilience : bool ref val debug : bool ref val in_debugger : bool ref |