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 /parsing | |
| 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 'parsing')
| -rw-r--r-- | parsing/g_vernac.ml4 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/parsing/g_vernac.ml4 b/parsing/g_vernac.ml4 index a082772ac8..dadef23ddd 100644 --- a/parsing/g_vernac.ml4 +++ b/parsing/g_vernac.ml4 @@ -107,8 +107,8 @@ GEXTEND Gram def_token: [ [ "Definition" -> (fun _ _ -> ()), Global, GDefinition | IDENT "Local" -> (fun _ _ -> ()), Local, LDefinition - | IDENT "SubClass" -> Class.add_subclass_hook, Global, GCoercion - | IDENT "Local"; IDENT "SubClass" -> Class.add_subclass_hook, Local, LCoercion ] ] + | IDENT "SubClass" -> Class.add_subclass_hook, Global, GSubClass + | IDENT "Local"; IDENT "SubClass" -> Class.add_subclass_hook, Local, LSubClass ] ] ; assumption_token: [ [ "Hypothesis" -> (Local, Logical) |