diff options
| author |  Arnaud Spiwack <arnaud@spiwack.net> | 2014-10-17 15:31:58 +0200 |
|---|---|---|
| committer | Arnaud Spiwack <arnaud@spiwack.net> | 2014-10-22 07:31:44 +0200 |
| commit | cadfe23210c8edaab1f22d0edb7acc33fb9ff782 (patch) | |
| tree | 50a7a8942285cdbf9555122c0abfa03e493afec6 /tactics/contradiction.ml | |
| parent | d76c6d9c92d8486ef4b672f9b44e5c6ea782d7ff (diff) | |
Proofview: split [V82] module into [Unsafe] and [V82].
The Unsafe module is for unsafe tactics which cannot be done without anytime soon. Whereas V82 indicates a function which we want to get rid of and that shouldn't be used in a new function.
Diffstat (limited to 'tactics/contradiction.ml')
| -rw-r--r-- | tactics/contradiction.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/contradiction.ml b/tactics/contradiction.ml index cb1b7d557..9a241c7ef 100644 --- a/tactics/contradiction.ml +++ b/tactics/contradiction.ml @@ -31,7 +31,7 @@ let absurd c = let sigma, j = Coercion.inh_coerce_to_sort Loc.ghost env sigma j in let t = j.Environ.utj_val in Tacticals.New.tclTHENLIST [ - Proofview.V82.tclEVARS sigma; + Proofview.Unsafe.tclEVARS sigma; elim_type (build_coq_False ()); Simple.apply (mk_absurd_proof t) ] |