diff options
| author | Gaëtan Gilbert | 2019-03-17 18:32:26 +0100 |
|---|---|---|
| committer | Gaëtan Gilbert | 2019-03-17 18:32:26 +0100 |
| commit | 05843c92e0fe96f09c7c4cb3d55376b99e6ea16b (patch) | |
| tree | b179521e6a8a4f5aff0d859e43bdb9ad7598feed | |
| parent | beaccf0befcc59178ca59913e63625fa42f6d186 (diff) | |
Use local universe names when printing universe inconsistency
| -rw-r--r-- | vernac/himsg.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vernac/himsg.ml b/vernac/himsg.ml index 047bdd2b61..1c58abc2fd 100644 --- a/vernac/himsg.ml +++ b/vernac/himsg.ml @@ -308,7 +308,7 @@ let explain_unification_error env sigma p1 p2 = function | UnifUnivInconsistency p -> if !Constrextern.print_universes then [str "universe inconsistency: " ++ - Univ.explain_universe_inconsistency UnivNames.pr_with_global_universes p] + Univ.explain_universe_inconsistency (Termops.pr_evd_level sigma) p] else [str "universe inconsistency"] | CannotSolveConstraint ((pb,env,t,u),e) -> |