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

this/that_Quant in Turkish

Browse Source
This commit is contained in:
Krasimir Angelov
2017-08-19 22:19:14 +02:00
parent a90662218f
commit 128cae61d5
3 changed files with 5 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/turkish/ParadigmsTur.gf
View File

@@ -510,6 +510,8 @@ oper
dat_Case = mkPrep [] Dat; dat_Case = mkPrep [] Dat;
acc_Case = mkPrep [] Dat; acc_Case = mkPrep [] Dat;
mkQuant : Str -> Quant = \s -> lin Quant {s=s} ;
param param
AoristType = PlSyl -- more than one syllable, takes -ir AoristType = PlSyl -- more than one syllable, takes -ir
| SgSylConIrreg -- one syllable ending with consonant, but takes -ir (here is the list: al-, bil-, bul-, dur-, gel-, gör-, kal-, ol-, öl-, var-, ver-, vur-, san- ) | SgSylConIrreg -- one syllable ending with consonant, but takes -ir (here is the list: al-, bil-, bul-, dur-, gel-, gör-, kal-, ol-, öl-, var-, ver-, vur-, san- )

3
src/turkish/ResTur.gf
View File

@@ -45,9 +45,7 @@ resource ResTur = ParamX ** open Prelude, Predef, HarmonyTur in {
DForm = unit | ten ; DForm = unit | ten ;
CardOrd = NCard | NOrd ; CardOrd = NCard | NOrd ;
-- For $Numeral$.
oper oper
mkPron : (ben,beni,bana,banin,bende,benden,benli,bensiz:Str) -> Number -> Person -> Pron = mkPron : (ben,beni,bana,banin,bende,benden,benli,bensiz:Str) -> Number -> Person -> Pron =
\ben,beni,bana,benim,bende,benden,benli,bensiz,n,p -> { \ben,beni,bana,benim,bende,benden,benli,bensiz,n,p -> {
s = table { s = table {
@@ -63,7 +61,6 @@ resource ResTur = ParamX ** open Prelude, Predef, HarmonyTur in {
a = {n=n; p=p} ; a = {n=n; p=p} ;
} ; } ;
--Prep --Prep
no_Prep = mkPrep [] Acc; no_Prep = mkPrep [] Acc;

4
src/turkish/StructuralTur.gf
View File

@@ -1,7 +1,7 @@
--# -path=.:../abstract:../common:../../prelude --# -path=.:../abstract:../common:../../prelude
concrete StructuralTur of Structural = CatTur ** concrete StructuralTur of Structural = CatTur **
open ResTur in { open ResTur, ParadigmsTur in {
flags flags
optimize=all ; coding = utf8 ; optimize=all ; coding = utf8 ;
@@ -11,7 +11,9 @@ concrete StructuralTur of Structural = CatTur **
i_Pron = mkPron "ben" "beni" "bana" "benim" "bende" "benden" "benli" "bensiz" Sg P1 ; i_Pron = mkPron "ben" "beni" "bana" "benim" "bende" "benden" "benli" "bensiz" Sg P1 ;
it_Pron = mkPron "o" "onu" "ona" "onun" "onda" "ondan" "onlu" "onsuz" Sg P3 ; it_Pron = mkPron "o" "onu" "ona" "onun" "onda" "ondan" "onlu" "onsuz" Sg P3 ;
she_Pron = mkPron "o" "onu" "ona" "onun" "onda" "ondan" "onlu" "onsuz" Sg P3 ; she_Pron = mkPron "o" "onu" "ona" "onun" "onda" "ondan" "onlu" "onsuz" Sg P3 ;
that_Quant = mkQuant "o" ;
they_Pron = mkPron "onlar" "onları" "onlara" "onların" "onlarda" "onlardan" "onlarlı" "onlarsız" Pl P3 ; they_Pron = mkPron "onlar" "onları" "onlara" "onların" "onlarda" "onlardan" "onlarlı" "onlarsız" Pl P3 ;
this_Quant = mkQuant "bu" ;
we_Pron = mkPron "biz" "bizi" "bize" "bizim" "bizde" "bizden" "bizli" "bizsiz" Pl P1 ; we_Pron = mkPron "biz" "bizi" "bize" "bizim" "bizde" "bizden" "bizli" "bizsiz" Pl P1 ;
youSg_Pron = mkPron "sen" "seni" "sana" "senin" "sende" "senden" "senli" "sensiz" Sg P2 ; youSg_Pron = mkPron "sen" "seni" "sana" "senin" "sende" "senden" "senli" "sensiz" Sg P2 ;
youPl_Pron = mkPron "siz" "sizi" "size" "sizin" "sizde" "sizden" "sizli" "sizsiz" Pl P2 ; youPl_Pron = mkPron "siz" "sizi" "size" "sizin" "sizde" "sizden" "sizli" "sizsiz" Pl P2 ;