GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-30 10:28:53 -06:00
Code Issues Packages Projects Releases Wiki Activity

Define the param UseGen and make use of that

Browse Source
This commit is contained in:
Ayberk Tosun
2017-08-22 11:38:38 +03:00
parent 1362bbdd03
commit 2665910dc2
4 changed files with 14 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/turkish/NounTur.gf
View File

@@ -6,12 +6,18 @@ concrete NounTur of Noun = CatTur ** open ResTur, SuffixTur, HarmonyTur, Prelude
lin
DetCN det cn = {
s = \\c => det.s ++ cn.s ! det.n ! c ;
s =
case det.useGen of {
NoGen => \\c => det.s ++ cn.s ! det.n ! c ;
YesGen a => \\c => det.s ++ cn.gen ! det.n ! a
} ;
a = agrP3 det.n
} ;
UsePron p = p ;
PossPron p = {s = []; useGen = YesGen p.a} ;
DetQuant quant num = {
s = quant.s ++ num.s ! Sg ! Nom ;
n = num.n;
@@ -29,8 +35,8 @@ concrete NounTur of Noun = CatTur ** open ResTur, SuffixTur, HarmonyTur, Prelude
OrdNumeral num = {s = \\c => num.s ! NOrd ! c} ;
OrdSuperl a = {s = \\n,c => "en" ++ a.s ! n ! c} ;
DefArt = {s = []; useGen = False} ;
IndefArt = {s = []; useGen = False} ;
DefArt = {s = []; useGen = NoGen} ;
IndefArt = {s = []; useGen = NoGen} ;
UseN n = n ;