diff options
| author | herbelin | 2003-01-19 21:56:58 +0000 |
|---|---|---|
| committer | herbelin | 2003-01-19 21:56:58 +0000 |
| commit | bee144512660fe96d5d9527eb1db091a647bc24e (patch) | |
| tree | a1e24c1d872975538e6c7af7480f0fb404eef4a9 /proofs/tactic_debug.ml | |
| parent | 4767404bdc47e8148ab5ea171a0abb43795b01cf (diff) | |
Erreur sur precedent commit
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3530 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs/tactic_debug.ml')
| -rw-r--r-- | proofs/tactic_debug.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/proofs/tactic_debug.ml b/proofs/tactic_debug.ml index 68d1425aa0..1e21116391 100644 --- a/proofs/tactic_debug.ml +++ b/proofs/tactic_debug.ml @@ -43,8 +43,8 @@ let rec db_print_error = function db_print_error exc | Util.UserError(s,pps) -> hov 1 (str"Error: " ++ pps) - | GlobalizationError q -> - hov 0 (str "Error: " ++ Libnames.pr_qualid q ++ str " not found") ++ + | Nametab.GlobalizationError q -> + hov 0 (str "Error: " ++ Libnames.pr_qualid q ++ str " not found") | _ -> hov 0 (str "Uncaught exception ") |