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 b72e68ac07..243f9ea5f5 100644 --- a/dev/include +++ b/dev/include @@ -27,6 +27,7 @@ #install_printer (* goal *) ppgoal;; #install_printer (* sigma goal *) ppsigmagoal;; #install_printer (* proof *) pproof;; +#install_printer (* Goal.goal *) ppgoalgoal;; #install_printer (* pftreestate *) pppftreestate;; #install_printer (* metaset.t *) ppmetas;; #install_printer (* evar_map *) ppevm;; diff --git a/dev/top_printers.ml b/dev/top_printers.ml index 89a6eb5e32..681cb0634e 100644 --- a/dev/top_printers.ml +++ b/dev/top_printers.ml @@ -114,6 +114,7 @@ let pp_transparent_state s = pp (pr_transparent_state s) let ppmetas metas = pp(pr_metaset metas) let ppevm evd = pp(pr_evar_map evd) let ppclenv clenv = pp(pr_clenv clenv) +let ppgoalgoal gl = pp(Goal.pr_goal gl) (* spiwack: deactivated until a replacement is found let ppgoal g = pp(db_pr_goal g) let pppftreestate p = pp(print_pftreestate p) |