aboutsummaryrefslogtreecommitdiff
path: root/plugins/funind/invfun.ml
diff options
context:
space:
mode:
authorGaëtan Gilbert2019-07-08 13:07:30 +0200
committerGaëtan Gilbert2019-07-08 13:07:30 +0200
commita5e4dd7faa23abd4a4ebe093076484d090a8a47e (patch)
treee0de245adb468dc3fe95d9108be749f010457365 /plugins/funind/invfun.ml
parent5ecfe31f9d900c6053531f2cb713035407009ba7 (diff)
parent07abf9818a6b47bb2c2bd0a8201da9743a0c10b6 (diff)
Merge PR #9686: [error] Remove special error printing pre-processing
Reviewed-by: SkySkimmer
Diffstat (limited to 'plugins/funind/invfun.ml')
-rw-r--r--plugins/funind/invfun.ml3
1 files changed, 1 insertions, 2 deletions
diff --git a/plugins/funind/invfun.ml b/plugins/funind/invfun.ml
index 549f6d42c9..8fa001278b 100644
--- a/plugins/funind/invfun.ml
+++ b/plugins/funind/invfun.ml
@@ -54,9 +54,8 @@ let do_observe_tac s tac g =
msgnl (goal ++ fnl () ++ s ++(str " ")++(str "finished")); v
with reraise ->
let reraise = CErrors.push reraise in
- let e = ExplainErr.process_vernac_interp_error reraise in
observe (hov 0 (str "observation "++ s++str " raised exception " ++
- CErrors.iprint e ++ str " on goal" ++ fnl() ++ goal ));
+ CErrors.iprint reraise ++ str " on goal" ++ fnl() ++ goal ));
iraise reraise;;
let observe_tac s tac g =