diff options
| author | barras | 2004-09-08 18:42:11 +0000 |
|---|---|---|
| committer | barras | 2004-09-08 18:42:11 +0000 |
| commit | 838326c399c48cd55f15b195340fa92df59817fb (patch) | |
| tree | 18c6b48ba67acb259a03158d4f2c1461125b96b2 /dev | |
| parent | a2b9c39daf21d01605fabf7a6ce71603cf06a34a (diff) | |
unification encore...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6085 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'dev')
| -rw-r--r-- | dev/include | 4 | ||||
| -rw-r--r-- | dev/top_printers.ml | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/dev/include b/dev/include index eb370a5d84..bbee6ac742 100644 --- a/dev/include +++ b/dev/include @@ -21,8 +21,8 @@ #install_printer (* goal *) prgoal;; #install_printer (* sigma goal *) prsigmagoal;; #install_printer (* proof *) pproof;; -#install_printer (* global_constraints *) prevd;; -#install_printer (* readable_constraints *) prevc;; +#install_printer (* evar_map *) prevm;; +#install_printer (* evar_defs *) prevd;; #install_printer (* walking_constraints *) prwc;; #install_printer (* clenv *) prclenv;; #install_printer (* env *) ppenv;; diff --git a/dev/top_printers.ml b/dev/top_printers.ml index 7f92d64cde..40f7d0da07 100644 --- a/dev/top_printers.ml +++ b/dev/top_printers.ml @@ -86,9 +86,9 @@ let prglls glls = pp(pr_glls glls) let pproof p = pp(print_proof Evd.empty empty_named_context p) -let prevd evd = pp(pr_decls evd) +let prevm evd = pp(pr_decls evd) -let prevc evc = pp(pr_evc evc) +let prevd evd = prevm(Evarutil.evars_of evd) let prwc wc = pp(pr_evc wc) |