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

Maltese RG: big improvements with clitics in VPs

Browse Source
This commit is contained in:
john
2013-05-28 14:45:53 +00:00
parent e969aa69ff
commit ce053c4a98
16 changed files with 761 additions and 305 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
lib/src/maltese/SentenceMlt.gf
View File

@@ -10,8 +10,7 @@
concrete SentenceMlt of Sentence = CatMlt ** open
Prelude,
ResMlt,
ParamX,
CommonX in {
ParamX in {
flags optimize=all_subs ;
@@ -29,7 +28,7 @@ concrete SentenceMlt of Sentence = CatMlt ** open
True => [] ; -- omit subject pronouns
False => np.s ! NPNom
} ;
v : Str = joinVParts (vp.s ! VPIndicat tense (toVAgr np.a) ! ant ! pol) ;
v : Str = joinVP vp (VPIndicat tense (toVAgr np.a)) ant pol ;
o : Str = vp.s2 ! np.a ;
} ;
} ;
@@ -40,7 +39,7 @@ concrete SentenceMlt of Sentence = CatMlt ** open
-- VP -> Imp
ImpVP vp = {
s = \\pol,n => joinVParts (vp.s ! VPImperat n ! Simul ! pol)
s = \\pol,n => joinVP vp (VPImperat n) Simul pol
} ;
-- NP -> VPSlash -> ClSlash
@@ -57,7 +56,15 @@ concrete SentenceMlt of Sentence = CatMlt ** open
-- Cl -> Prep -> ClSlash
-- (with whom) he walks
SlashPrep cl prep = cl ** {c2 = prep} ;
-- SlashPrep cl prep = cl ** {c2 = prep} ;
SlashPrep cl prep = cl ** {c2 = {
s = prep.s ;
enclitic = prep.enclitic ;
takesDet = prep.takesDet ;
joinsVerb = prep.joinsVerb ;
isPresent = True ;
}
} ;
-- NP -> VS -> SSlash -> ClSlash
-- (whom) she says that he loves