Added case parameter for stand-alone forms of determiners. I had to move mkPron from ResEng to MorphoEng, and mkQuant from StructuralEng to MorphoEng. I also removed the unused mkPronoun stuff from MorphoEng.

This commit is contained in:
bjorn
2008-10-30 14:09:27 +00:00
parent d4d94f6c23
commit a726630bb7
7 changed files with 50 additions and 60 deletions
+4 -10
View File
@@ -148,21 +148,15 @@ resource ResEng = ParamX ** open Prelude in {
n = n
} ;
mkPron : (i,me,my,mine : Str) -> Number -> Person -> Gender ->
{s : Case => Str ; sp : Str ; a : Agr} =
\i,me,my,mine,n,p,g -> {
s = table {
mkNP : (i,me,my : Str) -> Number -> Person -> Gender ->
{s : Case => Str ; a : Agr} = \i,me,my,n,p,g ->
{ s = table {
Nom => i ;
Acc => me ;
Gen => my
} ;
a = toAgr n p g ;
sp = mine
} ;
mkNP : (i,me,my : Str) -> Number -> Person -> Gender ->
{s : Case => Str ; a : Agr} =
\i,me,my,n,p,g -> mkPron i me my me n p g ;
};
-- These functions cover many cases; full coverage inflectional patterns are
-- in $MorphoEng$.