aboutsummaryrefslogtreecommitdiff
path: root/dev/top_printers.ml
diff options
context:
space:
mode:
authorcoqbot-app[bot]2021-01-07 09:32:34 +0000
committerGitHub2021-01-07 09:32:34 +0000
commit331592e05f6f222da40489a94abdcdd3ef4b6394 (patch)
tree190e7e1202e48bafe6cd137910d7449f6d814850 /dev/top_printers.ml
parentad9fdf76897ada659dc1ca6d2d931452f6361f93 (diff)
parentf821438c9759c4788d597688b25cb78f2a2c01c4 (diff)
Merge PR #13718: Move printing and sorting out of AcyclicGraph
Reviewed-by: SkySkimmer
Diffstat (limited to 'dev/top_printers.ml')
-rw-r--r--dev/top_printers.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/dev/top_printers.ml b/dev/top_printers.ml
index c4eed5756f..f3d6239c6f 100644
--- a/dev/top_printers.ml
+++ b/dev/top_printers.ml
@@ -240,7 +240,7 @@ let ppuniverseconstraints c = pp (UnivProblem.Set.pr c)
let ppuniverse_context_future c =
let ctx = Future.force c in
ppuniverse_context ctx
-let ppuniverses u = pp (UGraph.pr_universes Level.pr u)
+let ppuniverses u = pp (UGraph.pr_universes Level.pr (UGraph.repr u))
let ppnamedcontextval e =
let env = Global.env () in
let sigma = Evd.from_env env in