msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

more variants in ParseChi: topicalized adverbs, V-not-V questions

Browse Source
This commit is contained in:
aarne
2013-12-09 10:43:57 +00:00
parent e5caac511f
commit 86812fee93
3 changed files with 10 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/src/chinese/ExtraChi.gf
View File

@@ -55,6 +55,6 @@ concrete ExtraChi of ExtraChiAbs = CatChi **
cl.np ++ cl.vp.prePart ++ verb ++ cl.vp.compl cl.np ++ cl.vp.prePart ++ verb ++ cl.vp.compl
} ; } ;
TopicAdvCl adv cl = mkClause (adv.s ++ cl.np) cl.vp ; TopicAdvVP vp adv = insertTopic adv vp ;
} }

4
lib/src/chinese/ExtraChiAbs.gf
View File

@@ -10,9 +10,9 @@ abstract ExtraChiAbs = Cat,
Aspect ; Aspect ;
fun fun
CompBareAP : AP -> Comp ; -- adjectival predication without copula CompBareAP : AP -> Comp ; -- adjectival predication without copula
QuestRepV : Cl -> QCl ; -- V neg V question QuestRepV : Cl -> QCl ; -- V neg V question
TopicAdvCl : Adv -> Cl -> Cl ; -- topicalized adverb TopicAdvVP : VP -> Adv -> VP ; -- topicalized adverb
} ; } ;

10
lib/src/chinese/ParseChi.gf
View File

@@ -7,11 +7,11 @@ concrete ParseChi of ParseEngAbs =
NumeralChi, NumeralChi,
SymbolChi [PN, Symb, String, CN, Card, NP, MkSymb, SymbPN, CNNumNP], SymbolChi [PN, Symb, String, CN, Card, NP, MkSymb, SymbPN, CNNumNP],
ConjunctionChi, ConjunctionChi,
VerbChi - [SlashV2V, PassV2, UseCopula, ComplVV, CompAP], VerbChi - [SlashV2V, PassV2, UseCopula, ComplVV, CompAP, AdvVP],
AdverbChi, AdverbChi,
PhraseChi, PhraseChi,
SentenceChi, SentenceChi,
QuestionChi, QuestionChi - [QuestCl],
RelativeChi, RelativeChi,
IdiomChi [NP, VP, Tense, Cl, ProgrVP, ExistNP, SelfAdvVP, SelfAdVVP, SelfNP], IdiomChi [NP, VP, Tense, Cl, ProgrVP, ExistNP, SelfAdvVP, SelfAdVVP, SelfNP],
ConstructionChi, ConstructionChi,
@@ -33,7 +33,11 @@ flags
-- Chinese-specific overrides -- Chinese-specific overrides
lin lin
CompAP = G.CompAP | E.CompBareAP ; CompAP = G.CompAP | E.CompBareAP ; -- he is good | he good
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
lin lin