Minimum viable implementation for MassNP

2017-08-22 16:42:56 +03:00
parent 3cb82fb035
commit 2c32566d3a
1 changed files with 2 additions and 0 deletions
--- a/src/turkish/NounTur.gf
+++ b/src/turkish/NounTur.gf
@@ -43,6 +43,8 @@ concrete NounTur of Noun = CatTur ** open ResTur, SuffixTur, HarmonyTur, Prelude

    UseN2 n = n;

+    MassNP cn = { s = cn.s ! Sg; a = { n = Sg; p = P1 } } ;
+
    ComplN2 f x =
      let
        h : Harmony = {vow = f.harmony.vow; con = f.harmony.con}