aboutsummaryrefslogtreecommitdiff
path: root/plugins/ltac/pptactic.ml
diff options
context:
space:
mode:
authorMaxime Dénès2018-09-26 15:36:26 +0200
committerMaxime Dénès2018-09-26 15:36:26 +0200
commit6a48e732577b9ab09d458c7526f599d4528fe2fc (patch)
tree66cf1df2a49a7ee2470d13dd46b3ee917cdc00e3 /plugins/ltac/pptactic.ml
parent5ced288419aed8a622ed2c267e35d9a174facafc (diff)
parent39a10cba3d610c6f12438084c5de7c1217c8fe94 (diff)
Merge PR #8534: Checking if low-level name printers are used on purpose or not
Diffstat (limited to 'plugins/ltac/pptactic.ml')
-rw-r--r--plugins/ltac/pptactic.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/plugins/ltac/pptactic.ml b/plugins/ltac/pptactic.ml
index 803d35d07c..b219ee25ca 100644
--- a/plugins/ltac/pptactic.ml
+++ b/plugins/ltac/pptactic.ml
@@ -272,6 +272,8 @@ let string_of_genarg_arg (ArgumentType arg) =
in
pr_sequence pr prods
with Not_found ->
+ (* FIXME: This key, moreover printed with a low-level printer,
+ has no meaning user-side *)
KerName.print key
let pr_alias_gen pr_gen lev key l =