=Corrected an error in paradigms to recognize smartNoun paradigm

This commit is contained in:
David Bamutura
2019-06-03 20:46:19 +02:00
parent 22c6d5aae4
commit 458706694d
3 changed files with 5 additions and 2 deletions

View File

@@ -18,7 +18,7 @@ oper
mkN = overload {
mkN : (fish : Str) -> Gender -> N
= \fish,nclass -> lin N (mkNoun fish fish nclass) ;
= \fish,nclass -> lin N (smartNoun fish nclass) ;
mkN : (man,men : Str) -> Gender -> N
= \man,men,nclass -> lin N (mkNoun man men nclass) ;
};

View File

@@ -1080,7 +1080,7 @@ mkSubjPrefix : Agreement -> Str =\a ->case a of {
case <det.pos, det.num> of {
<PostDeterminer, Pl> => {s = \\_=> subjClitic ++ cn.s!det.num! det.ntype ++ subjClitic ++ det.s; agr = AgP3 det.num cn.gender; nounCat = cn.nounCat};
<PostDeterminer, Sg> => {s = \\_=>cn.s!det.num! det.ntype ++ subjClitic ++ det.s; agr = AgP3 det.num cn.gender; nounCat = cn.nounCat};
<PreDeterminer, n> => { s =\\_ => det.s ++ cn.s !n ! det.ntype; agr = AgP3 det.num cn.gender; nounCat = cn.nounCat} --;
<PreDeterminer, n> => { s =\\_ => det.s ++ cn.s !n ! det.ntype; agr = AgP3 det.num cn.gender; nounCat = cn.nounCat} --;
--<PostDeterminer, PFalse> => {s = \\_=> cn.s!det.ntype!det.num; agr = AgP3 det.num cn.gender }
};

View File

@@ -42,6 +42,8 @@ lin
in_Prep = mkPrep "omu" "omuri" False;
--aha-ri Kamukuzi??? works for places
on_Prep = mkPrep "aha" "ahari" False;
in8front_Prep = mkPrep "enyuma ya" [] False; --: Prep ; -- in front of
--na --please this string varies with vowels use combine_morphemes or
--combine_words when using it.
@@ -49,6 +51,7 @@ lin
from_Prep =mkPrep "kurunga" "" False;
under_Prep = mkPrep "hansi ya" "" False;
after_Prep = mkPrep "omu maisho" "" False; --: Prep ;
---Structural
{-