aboutsummaryrefslogtreecommitdiff
path: root/engine/uState.ml
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2017-11-13 18:43:02 +0100
committerEmilio Jesus Gallego Arias2017-11-13 18:45:41 +0100
commitc571cdbbcac5cb4b4a5a19ab2f7ac51222316292 (patch)
tree2ec7070bc8d58ee4b6fd0734ea41964243a0f2ba /engine/uState.ml
parent6bd240fce21c172680a0cec5346b66e08c76418a (diff)
[api] Another large deprecation, `Nameops`
Diffstat (limited to 'engine/uState.ml')
-rw-r--r--engine/uState.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/engine/uState.ml b/engine/uState.ml
index 77837fefcf..dfea25dd04 100644
--- a/engine/uState.ml
+++ b/engine/uState.ml
@@ -269,7 +269,7 @@ let universe_context ~names ~extensible ctx =
try UNameMap.find (Id.to_string id) (fst ctx.uctx_names)
with Not_found ->
user_err ?loc ~hdr:"universe_context"
- (str"Universe " ++ Nameops.pr_id id ++ str" is not bound anymore.")
+ (str"Universe " ++ Id.print id ++ str" is not bound anymore.")
in (l :: newinst, Univ.LSet.remove l acc))
names ([], levels)
in