aboutsummaryrefslogtreecommitdiff
path: root/parsing/printer.ml
diff options
context:
space:
mode:
authorherbelin2006-05-19 09:29:54 +0000
committerherbelin2006-05-19 09:29:54 +0000
commita13575eeaf69ec3dadb9b3c6a3e365a7d8371390 (patch)
tree888718c8fd5b200aae90be89fbd16339ac40f13d /parsing/printer.ml
parenta171cb800c5cd7f4faf31f3fd20922d092bfd16c (diff)
Ajout de pr_sort, extern_sort, detype_sort et renommage pr_sort en pr_rawsort
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@8831 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing/printer.ml')
-rw-r--r--parsing/printer.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/parsing/printer.ml b/parsing/printer.ml
index d6d7534955..e1c8b2505e 100644
--- a/parsing/printer.ml
+++ b/parsing/printer.ml
@@ -87,6 +87,8 @@ let pr_lconstr_pattern t =
let pr_constr_pattern t =
pr_constr_expr (extern_constr_pattern empty_names_context t)
+let pr_sort s = pr_rawsort (extern_sort s)
+
let _ = Termops.set_print_constr pr_lconstr_env
(**********************************************************************)