aboutsummaryrefslogtreecommitdiff
path: root/engine
diff options
context:
space:
mode:
authorGaëtan Gilbert2018-10-10 12:56:47 +0200
committerGaëtan Gilbert2018-10-16 15:51:49 +0200
commit6a7bcfc6d22ab3bf38847fa3fd05ec194187ff50 (patch)
tree0185cd9dc7a9f6e3e9fa6fcca8b86e79a49a20c1 /engine
parent096d4dd94ff6d506e7a3785da453c21874611cec (diff)
Deprecate Global.universes_of_global (replaced by environ version)
Diffstat (limited to 'engine')
-rw-r--r--engine/univNames.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/engine/univNames.ml b/engine/univNames.ml
index e89dcedb9c..a71f9c5736 100644
--- a/engine/univNames.ml
+++ b/engine/univNames.ml
@@ -86,7 +86,7 @@ let register_universe_binders ref ubinders =
part of the code that depends on the internal representation of names in
abstract contexts, but removing it requires quite a rework of the
callers. *)
- let univs = AUContext.instance (Global.universes_of_global ref) in
+ let univs = AUContext.instance (Environ.universes_of_global (Global.env()) ref) in
let revmap = Id.Map.fold (fun id lvl accu -> LMap.add lvl id accu) ubinders LMap.empty in
let map lvl =
try LMap.find lvl revmap