aboutsummaryrefslogtreecommitdiff
path: root/kernel/univ.ml
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2014-06-08 00:20:38 +0200
committerPierre-Marie Pédrot2014-06-08 00:20:38 +0200
commit17810e2b920fefd69a407336ae1f090d2c878257 (patch)
tree4547026760b64f74eb62b3906c1bf50cc2388f01 /kernel/univ.ml
parent2fbcbeece792c2f0e235160d66014150224fe7d7 (diff)
Function in Univ uselessly exported.
Diffstat (limited to 'kernel/univ.ml')
-rw-r--r--kernel/univ.ml3
1 files changed, 3 insertions, 0 deletions
diff --git a/kernel/univ.ml b/kernel/univ.ml
index 1c60f2c3a1..c1d01487ed 100644
--- a/kernel/univ.ml
+++ b/kernel/univ.ml
@@ -2272,6 +2272,9 @@ let constraints_of_universes g =
in
UMap.fold constraints_of g Constraint.empty
+let constraints_of_universes g =
+ constraints_of_universes (normalize_universes g)
+
(* Pretty-printing *)
let pr_arc = function