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

new Afrikaans by L&L Pretorius

Browse Source
This commit is contained in:
aarne
2011-03-12 11:29:42 +00:00
parent afbfbaa73a
commit e6c353425c
19 changed files with 834 additions and 724 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
lib/src/afrikaans/VerbAfr.gf
View File

@@ -64,7 +64,15 @@ concrete VerbAfr of Verb = CatAfr ** open Prelude, ResAfr in {
predVv v)))) ** {c2 = v.c2} ;
UseComp comp = insertObj comp.s (predV zijn_V) ; -- agr not used
CompCN cn = {s = \\a => cn.s ! Strong ! NF a.n Nom} ;
--edited
CompCN cn = {s = \\a => case a.n of {
Sg => "'n" ++ cn.s ! Strong ! NF a.n Nom ;
Pl => cn.s ! Strong ! NF a.n Nom
}
} ;
CompAP ap = {s = \\_ => ap.s ! APred} ;
CompNP np = {s = \\_ => np.s ! NPNom} ;
CompAdv a = {s = \\_ => a.s} ;
@@ -72,7 +80,7 @@ concrete VerbAfr of Verb = CatAfr ** open Prelude, ResAfr in {
AdvVP vp adv = insertAdv adv.s vp ;
AdVVP adv vp = insertAdV adv.s vp ;
ReflVP vp = insertObj (\\a => appPrep vp.c2 (\\_ => reflPron ! a)) vp ;
ReflVP vp = insertObj (\\a => appPrep vp.c2 (\\_ => reflPron ! a )) vp ;
PassV2 v = insertInf (v.s ! VPerf) (predV word_V) ;