From 00608fac2d8e217232d5f2ddd28a43971bf259b7 Mon Sep 17 00:00:00 2001 From: herbelin Date: Mon, 31 Mar 2003 21:18:53 +0000 Subject: Ajout d'un message à FailTac git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3825 85f007b7-540e-0410-9357-904b9bb8a0f7 --- proofs/tactic_debug.mli | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'proofs/tactic_debug.mli') diff --git a/proofs/tactic_debug.mli b/proofs/tactic_debug.mli index 8c5dc9d03c..82f01f461b 100644 --- a/proofs/tactic_debug.mli +++ b/proofs/tactic_debug.mli @@ -54,7 +54,7 @@ val db_hyp_pattern_failure : val db_matching_failure : debug_info -> unit (* Prints an evaluation failure message for a rule *) -val db_eval_failure : debug_info -> unit +val db_eval_failure : debug_info -> string -> unit (* An exception handler *) val explain_logic_error: (exn -> Pp.std_ppcmds) ref -- cgit v1.2.3