diff options
| author | ddr | 2002-02-20 11:06:07 +0000 |
|---|---|---|
| committer | ddr | 2002-02-20 11:06:07 +0000 |
| commit | b7aa648034f73c390ba2b49c8d47c3c8277002ef (patch) | |
| tree | 2bfd901db9221993c3373400bc19caf21b07e823 /contrib/interface/debug_tac.ml | |
| parent | 0a248d2fe0bb77952c94da34ca097996c0add227 (diff) | |
Changé le nom du module Errors (errors.mli, errors.ml) en Cerrors parce
qu'il entre en conflit avec le module Errors ajouté dans OCaml courant
(future version OCaml 3.05).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2489 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/interface/debug_tac.ml')
| -rw-r--r-- | contrib/interface/debug_tac.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/interface/debug_tac.ml b/contrib/interface/debug_tac.ml index 80d9d72018..be469108fb 100644 --- a/contrib/interface/debug_tac.ml +++ b/contrib/interface/debug_tac.ml @@ -463,7 +463,7 @@ let descr_first_error = function with e -> (msgnl (str "Execution of this tactic raised message " ++ fnl () ++ - fnl () ++ Errors.explain_exn e ++ fnl () ++ + fnl () ++ Cerrors.explain_exn e ++ fnl () ++ fnl () ++ str "on goal" ++ fnl () ++ pr_goal (sig_it (strip_some !the_goal)) ++ fnl () ++ str "faulty tactic is" ++ fnl () ++ fnl () ++ |