missing syntax functions in Chi and some other languages

2014-12-08 10:19:38 +00:00
parent 7f95aff5f5
commit 03b15a8683
8 changed files with 33 additions and 2 deletions
@@ -17,6 +17,7 @@ concrete NounChi of Noun = CatChi ** open ResChi, Prelude in {
    PPartNP np v2 = mkNP ((predV v2 v2.part).verb.s ++ possessive_s ++ np.s) ; ---- ??

    AdvNP np adv = mkNP (adv.s ++ possessiveIf adv.advType ++ np.s) ;
+    ExtAdvNP np adv = mkNP (adv.s ++ possessiveIf adv.advType ++ embedInCommas np.s) ; ---- commas?

    DetQuant quant num = {
      s = case num.numType of {