From d24bf91330fe27af0f7ef7dbb7c8044b74e1fc86 Mon Sep 17 00:00:00 2001 From: Ayberk Tosun Date: Tue, 22 Aug 2017 16:16:34 +0300 Subject: [PATCH] UseIndef in IndefArt --- src/turkish/NounTur.gf | 5 +++-- src/turkish/ResTur.gf | 2 +- 2 files changed, 4 insertions(+), 3 deletions(-) diff --git a/src/turkish/NounTur.gf b/src/turkish/NounTur.gf index 3833cfe45..37eb1f06c 100644 --- a/src/turkish/NounTur.gf +++ b/src/turkish/NounTur.gf @@ -9,7 +9,8 @@ concrete NounTur of Noun = CatTur ** open ResTur, SuffixTur, HarmonyTur, Prelude s = case det.useGen of { NoGen => \\c => det.s ++ cn.s ! det.n ! c ; - YesGen a => \\c => det.s ++ cn.gen ! det.n ! a + YesGen a => \\c => det.s ++ cn.gen ! det.n ! a ; + UseIndef => \\c => det.s ++ cn.s ! det.n ! Nom } ; a = agrP3 det.n } ; @@ -36,7 +37,7 @@ concrete NounTur of Noun = CatTur ** open ResTur, SuffixTur, HarmonyTur, Prelude OrdSuperl a = {s = \\n,c => "en" ++ a.s ! n ! c} ; DefArt = {s = []; useGen = NoGen} ; - IndefArt = {s = []; useGen = NoGen} ; + IndefArt = {s = []; useGen = UseIndef} ; UseN n = n ; diff --git a/src/turkish/ResTur.gf b/src/turkish/ResTur.gf index 9d793ad44..488ca93b9 100644 --- a/src/turkish/ResTur.gf +++ b/src/turkish/ResTur.gf @@ -34,7 +34,7 @@ resource ResTur = ParamX ** open Prelude, Predef, HarmonyTur in { | VInfinitive ; - UseGen = NoGen | YesGen Agr; + UseGen = NoGen | YesGen Agr | UseIndef ; oper Verb : Type = {