diff options
| author | Gaëtan Gilbert | 2019-02-08 13:39:26 +0100 |
|---|---|---|
| committer | Gaëtan Gilbert | 2019-03-01 13:46:04 +0100 |
| commit | f13a56cad95dae05b63b735fd6eb6bd4596f9a00 (patch) | |
| tree | 83a989f147b97526af1342e3d5aca78a880f3e7b /lib | |
| parent | ed5685a2afaa9c429d1f16950317363d9b0bc1a8 (diff) | |
Move test_mode from Flags to Vernacentries (use point)
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/flags.ml | 2 | ||||
| -rw-r--r-- | lib/flags.mli | 4 |
2 files changed, 0 insertions, 6 deletions
diff --git a/lib/flags.ml b/lib/flags.ml index 1195b8caf1..6718e7a954 100644 --- a/lib/flags.ml +++ b/lib/flags.ml @@ -43,8 +43,6 @@ let with_options ol f x = let record_aux_file = ref false -let test_mode = ref false - let async_proofs_worker_id = ref "master" let async_proofs_is_worker () = !async_proofs_worker_id <> "master" diff --git a/lib/flags.mli b/lib/flags.mli index 2b4446a1db..bf8846417b 100644 --- a/lib/flags.mli +++ b/lib/flags.mli @@ -35,10 +35,6 @@ be eventually removed by cleanups such as PR#1103 *) val record_aux_file : bool ref -(* Flag set when the test-suite is called. Its only effect to display - verbose information for `Fail` *) -val test_mode : bool ref - (** Async-related flags *) val async_proofs_worker_id : string ref val async_proofs_is_worker : unit -> bool |