diff options
Diffstat (limited to 'proofs')
| -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 ") |