aboutsummaryrefslogtreecommitdiff
path: root/printing/pputils.ml
diff options
context:
space:
mode:
authorMaxime Dénès2017-11-16 16:06:17 +0100
committerMaxime Dénès2017-11-16 16:06:17 +0100
commit0786ae361cb5f134e91d790d6c096f84535b19ec (patch)
treec4aeb3ac1a9c750ecb8e5d79abf218fecab2f774 /printing/pputils.ml
parent11d895262e49b4c9f371e38c9e4436cead7001f4 (diff)
parented0c434a05a929a659e43aed80ab7c8179a7daa3 (diff)
Merge PR #6148: [api] Another large deprecation, `Nameops` and friends.
Diffstat (limited to 'printing/pputils.ml')
-rw-r--r--printing/pputils.ml3
1 files changed, 1 insertions, 2 deletions
diff --git a/printing/pputils.ml b/printing/pputils.ml
index 9ef9162aee..3cc7a3e6b9 100644
--- a/printing/pputils.ml
+++ b/printing/pputils.ml
@@ -9,7 +9,6 @@
open Util
open Pp
open Genarg
-open Nameops
open Misctypes
open Locus
open Genredexpr
@@ -27,7 +26,7 @@ let pr_located pr (loc, x) =
let pr_or_var pr = function
| ArgArg x -> pr x
- | ArgVar (_,s) -> pr_id s
+ | ArgVar (_,s) -> Names.Id.print s
let pr_with_occurrences pr keyword (occs,c) =
match occs with