diff options
| author | herbelin | 2003-03-13 13:11:51 +0000 |
|---|---|---|
| committer | herbelin | 2003-03-13 13:11:51 +0000 |
| commit | 441ee955b0f9ff7a228f88c2d0cc7beac378a916 (patch) | |
| tree | 96cc0d73503073764ed36e55c71b21d911c84563 /translate | |
| parent | 04f39a03fd7e3845dbe1e8cf5b46cfdf219e6623 (diff) | |
Ajout réaffichage SubClass
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3765 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'translate')
| -rw-r--r-- | translate/ppvernacnew.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/translate/ppvernacnew.ml b/translate/ppvernacnew.ml index 5f5e3b1215..9a0bc64f8d 100644 --- a/translate/ppvernacnew.ml +++ b/translate/ppvernacnew.ml @@ -429,6 +429,8 @@ let rec pr_vernac = function | Decl_kinds.GCoercion -> str"Coercion" | Decl_kinds.LDefinition -> str"Local" | Decl_kinds.GDefinition -> str"Definition" + | Decl_kinds.LSubClass -> str"Local SubClass" + | Decl_kinds.GSubClass -> str"SubClass" | Decl_kinds.SCanonical -> str"Canonical Structure" in let pr_reduce = function | None -> mt() |