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

Maltese RG: fix implementation of CountNP

Browse Source
This commit is contained in:
john
2013-06-11 07:55:48 +00:00
parent 1366c2a53e
commit 7f952b5f8f
4 changed files with 103 additions and 34 deletions
Download Patch File Download Diff File Expand all files Collapse all files

44
lib/src/maltese/ResMlt.gf
View File

@@ -348,6 +348,8 @@ resource ResMlt = ParamX ** open Prelude, Predef, Maybe in {
isPresent = False ;
} ;
{- Preposition ---------------------------------------------------------- -}
Preposition = {
s : Definiteness => Str ;
enclitic : Agr => Str ; -- when suffixed by pronouns; magħ-ha
@@ -355,6 +357,42 @@ resource ResMlt = ParamX ** open Prelude, Predef, Maybe in {
joinsVerb : Bool ; -- True for for_Prep (I.O. suffix)
} ;
prep_ta : Preposition = {
s = table {
Indefinite => "ta'" ;
Definite => makePreFull "tal-" "ta" "t'"
} ;
enclitic : Agr => Str = \\agr => case toVAgr agr of {
AgP1 Sg => "tiegħi" ;
AgP2 Sg => "tiegħek" ;
AgP3Sg Masc => "tiegħu" ;
AgP3Sg Fem => "tagħha" ;
AgP1 Pl => "tagħna" ;
AgP2 Pl => "tagħkom" ;
AgP2Pl => "tagħhom"
} ;
takesDet = True ;
joinsVerb = False ;
} ;
prep_minn : Preposition = {
s = table {
Indefinite => "minn" ;
Definite => makePreFull "mill-" "mi" "m"
} ;
enclitic : Agr => Str = \\agr => case toVAgr agr of {
AgP1 Sg => "minni" ;
AgP2 Sg => "minnek" ;
AgP3Sg Masc => "minnu" ;
AgP3Sg Fem => "minnha" ;
AgP1 Pl => "minna" ;
AgP2 Pl => "minnkom" ;
AgP2Pl => "minnhom"
} ;
takesDet = True ;
joinsVerb = False ;
} ;
{- Pronoun -------------------------------------------------------------- -}
oper
@@ -1164,6 +1202,12 @@ resource ResMlt = ParamX ** open Prelude, Predef, Maybe in {
_ => False
} ;
wiehed : Gender => Str =
table {
Masc => "wieħed" ;
Fem => "waħda"
} ;
artIndef : Str = [] ; --- is this a source of leaks?
artDef : Str =