AdvS added to app

This commit is contained in:
aarne
2014-04-04 07:30:06 +00:00
parent 1af3bb65b4
commit dafaef7fec
10 changed files with 11 additions and 11 deletions

View File

@@ -17,7 +17,7 @@ concrete AppChi of App =
AdverbChi,
PhraseChi,
SentenceChi [
PredVP,SlashVP,ImpVP,
PredVP,SlashVP,ImpVP,AdvS,
UseCl,UseQCl,UseSlash,SSubjS,UseRCl
],
QuestionChi - [
@@ -54,7 +54,7 @@ flags
lin
CompAP = G.CompAP | E.CompBareAP ; -- he is good | he good
AdvVP vp adv = E.TopicAdvVP vp adv | G.AdvVP vp adv ; -- he *today* here sleeps | *today* he here sleeps
AdvVP vp adv = G.AdvVP vp adv | E.TopicAdvVP vp adv ; -- he *today* here sleeps | *today* he here sleeps
QuestCl cl = G.QuestCl cl | E.QuestRepV cl ; -- he comes 'ma' | he come not come