diff options
Diffstat (limited to 'proofs/tactic_debug.mli')
| -rw-r--r-- | proofs/tactic_debug.mli | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/proofs/tactic_debug.mli b/proofs/tactic_debug.mli index fc1b6120..6de8244d 100644 --- a/proofs/tactic_debug.mli +++ b/proofs/tactic_debug.mli @@ -6,7 +6,7 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -(*i $Id: tactic_debug.mli 7911 2006-01-21 11:18:36Z herbelin $ i*) +(*i $Id: tactic_debug.mli 9092 2006-08-28 11:42:14Z bertot $ i*) open Environ open Pattern @@ -66,5 +66,11 @@ val db_eval_failure : debug_info -> Pp.std_ppcmds -> unit (* An exception handler *) val explain_logic_error: (exn -> Pp.std_ppcmds) ref +(* For use in the Ltac debugger: some exception that are usually + consider anomalies are acceptable because they are caught later in + the process that is being debugged. One should not require + from users that they report these anomalies. *) +val explain_logic_error_no_anomaly : (exn -> Pp.std_ppcmds) ref + (* Prints a logic failure message for a rule *) val db_logic_failure : debug_info -> exn -> unit |