aboutsummaryrefslogtreecommitdiff
path: root/dev/top_printers.ml
diff options
context:
space:
mode:
authordelahaye2001-09-30 17:54:12 +0000
committerdelahaye2001-09-30 17:54:12 +0000
commita2bdd28d1bdb93664037751b9dc84bcf7d90b6b6 (patch)
treee2e0e1ddb61937ab2be828901cf9d350d050aa4d /dev/top_printers.ml
parentedd682e03ae93dda78c49d781b32a7f03a46a4c2 (diff)
Ajout du printer de tactiques + modif du Dynamic ocaml
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2086 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'dev/top_printers.ml')
-rw-r--r--dev/top_printers.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/dev/top_printers.ml b/dev/top_printers.ml
index 71347c695a..51334029e5 100644
--- a/dev/top_printers.ml
+++ b/dev/top_printers.ml
@@ -79,6 +79,8 @@ let pp_universes u = pP [< 'sTR"[" ; pr_universes u ; 'sTR"]" >]
let ppenv e = pP (pr_rel_context e (rel_context e))
+let pptac = (fun x -> pP(gentacpr x))
+
let cnt = ref 0
let constr_display csr =