diff options
Diffstat (limited to 'lib/errors.mli')
-rw-r--r-- | lib/errors.mli | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/errors.mli b/lib/errors.mli index 7e296e45e..e4096a7ef 100644 --- a/lib/errors.mli +++ b/lib/errors.mli @@ -13,7 +13,7 @@ open Pp (** {6 Error handling} *) -val push : exn -> exn +val push : exn -> Exninfo.iexn (** Alias for [Backtrace.add_backtrace]. *) (** {6 Generic errors.} @@ -74,7 +74,8 @@ exception Unhandled val register_handler : (exn -> Pp.std_ppcmds) -> unit (** The standard exception printer *) -val print : exn -> Pp.std_ppcmds +val print : ?info:Exninfo.info -> exn -> Pp.std_ppcmds +val iprint : Exninfo.iexn -> Pp.std_ppcmds (** Same as [print], except that the "Please report" part of an anomaly isn't printed (used in Ltac debugging). *) |