diff options
Diffstat (limited to 'dev')
| -rw-r--r-- | dev/include | 1 | ||||
| -rw-r--r-- | dev/top_printers.ml | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/dev/include b/dev/include index 364773753d..6ed62e1e93 100644 --- a/dev/include +++ b/dev/include @@ -26,6 +26,7 @@ #install_printer (* goal *) ppgoal;; #install_printer (* sigma goal *) ppsigmagoal;; #install_printer (* proof *) pproof;; +#install_printer (* pftreestate *) pppftreestate;; #install_printer (* metaset.t *) ppmetas;; #install_printer (* evar_map *) ppevm;; #install_printer (* evar_defs *) ppevd;; diff --git a/dev/top_printers.ml b/dev/top_printers.ml index 4881c3eefa..f60fb222d6 100644 --- a/dev/top_printers.ml +++ b/dev/top_printers.ml @@ -103,6 +103,7 @@ let ppevm evd = pp(pr_evar_defs evd) let ppevd evd = pp(pr_evar_defs evd) let ppclenv clenv = pp(pr_clenv clenv) let ppgoal g = pp(db_pr_goal g) +let pppftreestate p = pp(print_pftreestate p) let pr_gls gls = hov 0 (pr_evar_defs (sig_sig gls) ++ fnl () ++ db_pr_goal (sig_it gls)) |