(Pes) Remove redundant exclusion of lincat of Adv

This commit is contained in:
Inari Listenmaa
2019-03-13 15:47:49 +01:00
parent edf9aa40db
commit 0c91baf08d
2 changed files with 8 additions and 13 deletions

View File

@@ -1,4 +1,4 @@
concrete CatPes of Cat = CommonX - [Adv] ** open ResPes, Prelude in {
concrete CatPes of Cat = CommonX ** open ResPes, Prelude in {
flags optimize=all_subs ;
@@ -44,9 +44,6 @@ concrete CatPes of Cat = CommonX - [Adv] ** open ResPes, Prelude in {
VPSlash = ResPes.VPHSlash ;
Comp = {s : Agr => Str} ;
---- Adv
Adv = {s : Str} ;
---- Adjective
AP = ResPes.Adjective ;

View File

@@ -1,8 +1,8 @@
--# -path=.:../abstract:../common:../prelude
concrete GrammarPes of Grammar =
NounPes,
VerbPes,
concrete GrammarPes of Grammar =
NounPes,
VerbPes,
AdjectivePes,
AdverbPes,
NumeralPes,
@@ -10,16 +10,14 @@
QuestionPes,
RelativePes,
ConjunctionPes,
PhrasePes,
TextPes - [Adv],
TextPes,
StructuralPes,
TenseX - [Adv],
IdiomPes
TenseX,
IdiomPes
** {
flags startcat = Phr ; unlexer = text ; lexer = text ;
}