aboutsummaryrefslogtreecommitdiff
path: root/interp/implicit_quantifiers.ml
diff options
context:
space:
mode:
authorMaxime Dénès2017-06-01 15:44:11 +0200
committerMaxime Dénès2017-06-01 15:44:11 +0200
commit84d49e38a245cbbbe5b6111a4e4d9afcbac2d33b (patch)
tree0e6bff9cf7c2aaf6967352bd5b5f8c8a2831a570 /interp/implicit_quantifiers.ml
parent48621da27d52be4825eea271d44bbd7362011dfa (diff)
parent8ab00e5f272aa8f16d70a00323c57f2d4ef66f03 (diff)
Merge PR#561: Improving the Name API
Diffstat (limited to 'interp/implicit_quantifiers.ml')
-rw-r--r--interp/implicit_quantifiers.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/implicit_quantifiers.ml b/interp/implicit_quantifiers.ml
index cfc6e6c2a6..ade524141a 100644
--- a/interp/implicit_quantifiers.ml
+++ b/interp/implicit_quantifiers.ml
@@ -264,7 +264,7 @@ let implicits_of_glob_constr ?(with_products=true) l =
let () = match bk with
| Implicit ->
Feedback.msg_warning (strbrk "Ignoring implicit status of product binder " ++
- pr_name na ++ strbrk " and following binders")
+ Name.print na ++ strbrk " and following binders")
| _ -> ()
in []
| GLambda (na, bk, t, b) -> abs na bk b