aboutsummaryrefslogtreecommitdiff
path: root/dev/top_printers.ml
diff options
context:
space:
mode:
authorsoubiran2008-06-06 16:03:45 +0000
committersoubiran2008-06-06 16:03:45 +0000
commit86b28df4c6029d43a0f12ab7c2d85cc13f4f60f1 (patch)
tree1b1a907b423b3b400eac8bd29718521525fb4f00 /dev/top_printers.ml
parent35689ba23648cdae2b6aef5df0902af349bbf17a (diff)
ajout d'un printer pour les contraintes d'univers + correction d'un bug sur les notations dans les alias de module.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11063 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 a63c6c2dd6..afae141b99 100644
--- a/dev/top_printers.ml
+++ b/dev/top_printers.ml
@@ -120,6 +120,8 @@ let ppuni u = pp(pr_uni u)
let ppuniverses u = pp (str"[" ++ pr_universes u ++ str"]")
+let ppconstraints c = pp (pr_constraints c)
+
let ppenv e = pp
(str "[" ++ pr_named_context_of e ++ str "]" ++ spc() ++
str "[" ++ pr_rel_context e (rel_context e) ++ str "]")