1
0
forked from GitHub/gf-rgl

started a separate module for names

This commit is contained in:
Krasimir Angelov
2023-07-24 17:24:13 +02:00
parent 8b1309c99d
commit 645de9955a
100 changed files with 611 additions and 227 deletions

View File

@@ -49,7 +49,7 @@ concrete CatTur of Cat = CommonX - [CAdv,AdN] ** open ResTur, HarmonyTur, Prelud
N = Noun ;
N2 = Noun ** {c : Prep} ;
N3 = Noun ** {c1,c2 : Prep} ;
GN, SN, PN = {
GN, SN, LN, PN = {
s : Case => Str ;
h : Harmony ;
n : Number

View File

@@ -7,12 +7,4 @@ concrete ExtendTur of Extend = CatTur ** open ResTur in {
a = {n=num.n; p=P3} ;
} ;
lin GivenName, MaleSurname, FemaleSurname = \n -> n ** {n = Sg};
lin PlSurname = \n -> n ** {n = Pl};
lin FullName gn sn = {
s = \\c => gn.s ! Nom ++ sn.s ! c ;
h = sn.h ;
n = Sg
} ;
}

View File

@@ -14,7 +14,8 @@ concrete GrammarTur of Grammar =
StructuralTur,
PhraseTur,
IdiomTur,
TenseX - [CAdv, AdN]
TenseX - [CAdv, AdN],
NamesTur
** {
flags startcat = Phr ;

19
src/turkish/NamesTur.gf Normal file
View File

@@ -0,0 +1,19 @@
concrete NamesTur of Names = CatTur ** open ResTur in {
lin GivenName, MaleSurname, FemaleSurname = \n -> {
s = \\c => n.s ! c;
h = n.h;
a = {n = Sg; p = P3}
} ;
lin PlSurname = \n -> {
s = \\c => n.s ! c;
h = n.h;
a = {n = Pl; p = P3}
} ;
lin FullName gn sn = {
s = \\c => gn.s ! Nom ++ sn.s ! c;
h = sn.h;
a = {n = Sg; p = P3}
} ;
}