diff options
| author | Enrico Tassi | 2014-07-11 10:34:55 +0200 |
|---|---|---|
| committer | Enrico Tassi | 2014-07-11 10:35:16 +0200 |
| commit | 58270be4668ab87e5f2d0d06c820bd457ae1aa01 (patch) | |
| tree | 42d4e399ef829f45f02d0c496c955d380acb4ab0 /lib | |
| parent | d15b6418d6f7071b6d85b286d60e645dcd0123b5 (diff) | |
STM: flag to turn off branch reopening
This is useful if a UI does not support that
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/flags.ml | 1 | ||||
| -rw-r--r-- | lib/flags.mli | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/lib/flags.ml b/lib/flags.ml index 9dd65db6dc..5d94270f47 100644 --- a/lib/flags.ml +++ b/lib/flags.ml @@ -53,6 +53,7 @@ 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_never_reopen_branch = ref false let async_proofs_is_worker () = match !async_proofs_mode with diff --git a/lib/flags.mli b/lib/flags.mli index a0ff0f55ea..53284c6992 100644 --- a/lib/flags.mli +++ b/lib/flags.mli @@ -22,6 +22,7 @@ val async_proofs_worker_flags : string option ref val async_proofs_is_worker : unit -> bool val async_proofs_always_delegate : bool ref +val async_proofs_never_reopen_branch : bool ref val debug : bool ref |