GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-20 00:22:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

extension of DictHin and ParseHin

Browse Source
This commit is contained in:
virk.shafqat
2013-04-08 11:14:29 +00:00
parent 830e7bfa53
commit f81f902bdd
7 changed files with 33533 additions and 28157 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
lib/src/hindustani/DiffHindustani.gf
View File

@@ -6,6 +6,7 @@ interface DiffHindustani = open Prelude in {
kwd : Str ;
ky : Str ;
ka : Str ;
agr : Str ;
awr : Str ;
jn : Str ;

8
lib/src/hindustani/NounHindustani.gf
View File

@@ -140,5 +140,13 @@ incomplete concrete NounHindustani of Noun =
} ;
ApposCN cn np = {s = \\n,c => cn.s ! n ! Dir ++ np.s ! NPC c ; g = cn.g} ;
PossNP cn np = {s = \\n,c => case cn.g of {Masc => cn.s ! n ! c ++ ka ++ np.s ! NPC Dir ;
Fem => cn.s ! n ! c ++ ky ++ np.s ! NPC Dir } ;
g = cn.g} ;
PartNP cn np = {s = \\n,c => case cn.g of {Masc => cn.s ! n ! c ++ ka ++ np.s ! NPC Dir ;
Fem => cn.s ! n ! c ++ ky ++ np.s ! NPC Dir } ;
g = cn.g} ;
}

6
lib/src/hindustani/VerbHindustani.gf
View File

@@ -31,6 +31,12 @@ incomplete concrete VerbHindustani of Verb = CatHindustani ** open CommonHindust
AdvVP vp adv = insertObj (\\a => adv.s ! giveGender a) vp ;
AdVVP adv vp = insertAdV adv.s vp ;
AdvVPSlash vp adv = insertObj (\\a => adv.s ! giveGender a) vp ** {c2 = vp.c2} ; --need to confirm
AdVVPSlash adv vp = insertAdV adv.s vp ** {c2 = vp.c2} ; -- need to confirm
ReflVP v = insertObjPre (\\_ => RefPron) v ;
PassV2 v = predV v ; -- need to be fixed
CompAP ap ={s = \\a => ap.s ! giveNumber a ! giveGender a ! Dir ! Posit } ;