diff --git a/lib/src/catalan/DiffCat.gf b/lib/src/catalan/DiffCat.gf index 28b26ee65..64034f4f5 100644 --- a/lib/src/catalan/DiffCat.gf +++ b/lib/src/catalan/DiffCat.gf @@ -45,15 +45,15 @@ oper artIndef = \isNP,g,n,c -> case isNP of { - _ => case of { - => genForms ["d' un"] ["d' una"] ! g ; + True => case of { + => genForms ["d' ++ Predef.BIND ++ un"] ["d' ++ Predef.BIND ++ una"] ! g ; => prepCase c ++ genForms "un" "una" ! g ; + => genForms ["d' ++ Predef.BIND ++ uns"] ["d' ++ Predef.BIND ++ unes"] ! g ; -- AR 3/12/2014 => prepCase c ++ genForms "uns" "unes" ! g } ; _ => case of { - => genForms ["d' un"] ["d' una"] ! g ; + => genForms ["d' ++ Predef.BIND ++ un"] ["d' ++ Predef.BIND ++ una"] ! g ; => prepCase c ++ genForms "un" "una" ! g ; - --- => genForms ["d' uns"] ["d' unes"] ! g ; => prepCase c --- ++ genForms "uns" "unes" ! g --- take this as a determiner } } ; diff --git a/lib/src/spanish/DiffSpa.gf b/lib/src/spanish/DiffSpa.gf index e4a7954ab..0c3e26558 100644 --- a/lib/src/spanish/DiffSpa.gf +++ b/lib/src/spanish/DiffSpa.gf @@ -49,8 +49,6 @@ instance DiffSpa of DiffRomance - [partAgr,vpAgrSubj,vpAgrClits] = open CommonRo } } ; --- In these two, "de de/du/des" becomes "de". - artIndef = \isNP,g,n,c -> case isNP of { True => case n of { Sg => prepCase c ++ genForms "uno" "una" ! g ;