diff options
author | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-11-01 22:54:24 +0100 |
---|---|---|
committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-11-02 11:19:08 +0100 |
commit | 767816eece27e6bb8cba0bbf122507bd2a3b77a1 (patch) | |
tree | 6348c7ac8f50e4782a41072e5db26d83b3b1a3a5 /plugins/funind/g_indfun.ml4 | |
parent | 0df9c751f98d2f9b4423eb1bee17730cd0bf0123 (diff) |
Using a specific function to register vernac printers.
Diffstat (limited to 'plugins/funind/g_indfun.ml4')
-rw-r--r-- | plugins/funind/g_indfun.ml4 | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/plugins/funind/g_indfun.ml4 b/plugins/funind/g_indfun.ml4 index 62ecaa552..829556a71 100644 --- a/plugins/funind/g_indfun.ml4 +++ b/plugins/funind/g_indfun.ml4 @@ -144,8 +144,7 @@ END let () = let raw_printer _ _ _ (loc,body) = Ppvernac.pr_rec_definition body in - let printer _ _ _ _ = str "<Unavailable printer for rec_definition>" in - Pptactic.declare_extra_genarg_pprule wit_function_rec_definition_loc raw_printer printer printer + Pptactic.declare_extra_vernac_genarg_pprule wit_function_rec_definition_loc raw_printer (* TASSI: n'importe quoi ! *) VERNAC COMMAND EXTEND Function |