aboutsummaryrefslogtreecommitdiff
path: root/translate
diff options
context:
space:
mode:
authorherbelin2003-10-28 19:34:48 +0000
committerherbelin2003-10-28 19:34:48 +0000
commit12c52dc45dd91b4af83859428e7f4ded863e0e02 (patch)
tree93b0b5e4171f5d1ddce07f52121e4f08ab1a473c /translate
parentf7ebdb1cf7eea614ff6a5e62a9949df6a07a1457 (diff)
Ajout de Print Visibility
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4733 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'translate')
-rw-r--r--translate/ppvernacnew.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/translate/ppvernacnew.ml b/translate/ppvernacnew.ml
index 3eaaeb0ead..ff8f236764 100644
--- a/translate/ppvernacnew.ml
+++ b/translate/ppvernacnew.ml
@@ -1014,6 +1014,7 @@ let rec pr_vernac = function
| PrintInspect n -> str"Inspect" ++ spc() ++ int n
| PrintScopes -> str"Print Scopes"
| PrintScope s -> str"Print Scope" ++ spc() ++ str s
+ | PrintVisibility s -> str"Print Visibility" ++ pr_opt str s
| PrintAbout qid -> str"About" ++ spc() ++ pr_reference qid
in pr_printable p
| VernacSearch (sea,sea_r) -> pr_search sea sea_r pr_pattern