diff options
Diffstat (limited to 'user-contrib/Ltac2/tac2print.ml')
| -rw-r--r-- | user-contrib/Ltac2/tac2print.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/user-contrib/Ltac2/tac2print.ml b/user-contrib/Ltac2/tac2print.ml index 68c39da9aa..b89067086f 100644 --- a/user-contrib/Ltac2/tac2print.ml +++ b/user-contrib/Ltac2/tac2print.ml @@ -473,7 +473,7 @@ end let () = register_init "err" begin fun _ _ e -> let e = to_ext val_exn e in - let (e, _) = ExplainErr.process_vernac_interp_error ~allow_uncaught:true e in + let (e, _) = ExplainErr.process_vernac_interp_error e in str "err:(" ++ CErrors.print_no_report e ++ str ")" end |