aboutsummaryrefslogtreecommitdiff
path: root/tactics/tacinterp.ml
diff options
context:
space:
mode:
authorArnaud Spiwack2014-10-21 16:50:47 +0200
committerArnaud Spiwack2014-10-22 07:31:45 +0200
commit038819807ba7cab0bc451dfd1f6772eae110826b (patch)
tree0bb1eef0b5a438cc04421ddd72cac01f97b19f80 /tactics/tacinterp.ml
parentaab7ae42b7ed4a071a79600a1adf5a81bafb5f89 (diff)
Split [Proofview] into a file where the basic operations on the state are defined and the file providing the primitives.
The datatypes are defined in [Proofview_monad], previous [Proofview_monad] is now called [Logic_monad] since it is more generic since the refactoring.
Diffstat (limited to 'tactics/tacinterp.ml')
-rw-r--r--tactics/tacinterp.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/tacinterp.ml b/tactics/tacinterp.ml
index e5177e4bd8..443ec5aaed 100644
--- a/tactics/tacinterp.ml
+++ b/tactics/tacinterp.ml
@@ -2154,7 +2154,7 @@ let _ =
let prf = Proof.start sigma [env, ty] in
let (prf, _) =
try Proof.run_tactic env tac prf
- with Proofview_monad.TacticFailure e as src ->
+ with Logic_monad.TacticFailure e as src ->
(** Catch the inner error of the monad tactic *)
let src = Errors.push src in
let e = Backtrace.app_backtrace ~src ~dst:e in