Files
gf-rgl/src/english/GrammarEng.gf
2018-07-15 10:55:03 +02:00

28 lines
505 B
Plaintext

--# -path=.:../abstract:../common:prelude
concrete GrammarEng of Grammar =
NounEng,
VerbEng,
AdjectiveEng,
AdverbEng,
NumeralEng,
SentenceEng,
QuestionEng,
RelativeEng,
ConjunctionEng,
PhraseEng,
TextX - [Pol,PPos,PNeg,SC,CAdv],
StructuralEng,
IdiomEng,
TenseX - [Pol,PPos,PNeg,SC,CAdv]
** open ResEng, Prelude in {
flags startcat = Phr ; unlexer = text ; lexer = text ;
lin
PPos = {s = [] ; p = CPos} ;
PNeg = {s = [] ; p = CNeg True} ; -- contracted: don't
} ;