diff --git a/src/turkish/NounTur.gf b/src/turkish/NounTur.gf index b93e05b4b..915d61329 100644 --- a/src/turkish/NounTur.gf +++ b/src/turkish/NounTur.gf @@ -78,4 +78,10 @@ concrete NounTur of Noun = CatTur ** open ResTur, SuffixTur, HarmonyTur, Prelude s = \\n,c => ap.s ! Sg ! Nom ++ cn.s ! n ! c; gen = \\n, a => ap.s ! Sg ! Nom ++ cn.gen ! n ! a } ; + + -- lin CN = {s : Number => Case => Str; gen : Number => Agr => Str} ; + AdvCN cn adv = { + s = \\n, c => adv.s ++ cn.s ! n ! c; + gen = \\n, a => adv.s ++ cn.gen ! n ! a + } ; } diff --git a/src/turkish/StructuralTur.gf b/src/turkish/StructuralTur.gf index 9a3710a76..3dea63731 100644 --- a/src/turkish/StructuralTur.gf +++ b/src/turkish/StructuralTur.gf @@ -42,7 +42,7 @@ concrete StructuralTur of Structural = CatTur ** mkPron "siz" "sizi" "size" "sizin" "sizde" "sizden" "sizli" "sizsiz" Pl P2 ; with_Prep = - mkPrep "ile" Nom ; + mkPrep [] (Abess Pos) ; -- ...den sonra after_Prep = @@ -74,9 +74,9 @@ concrete StructuralTur of Structural = CatTur ** -- ... ile ...nin arasında between_Prep = - mkPrep "arasında" Gen ; + mkPrep "arasındaki" Gen ; - and_Conj = ss "ve" ; + and_Conj = ss "ile" ; or_Conj = ss "veya" ;