fixed some spurious errors in romance

This commit is contained in:
aarne
2008-10-31 14:39:47 +00:00
parent 0eaba1fe1f
commit 830bb7e9b0
9 changed files with 20 additions and 21 deletions

View File

@@ -92,7 +92,7 @@ lin
something_NP = pn2np (mkPN ["quelcom"] Masc) ;
somewhere_Adv = ss ["a algun lloc"] ;
that_Quant =
let aquell : Number => Gender => Case => Str = table {
let aquell : ParadigmsCat.Number => ParadigmsCat.Gender => Case => Str = table {
Sg => \\g,c => prepCase c ++ genForms "aquell" "aquella" ! g ;
Pl => \\g,c => prepCase c ++ genForms "aquells" "aquelles" ! g
}
@@ -111,7 +111,7 @@ lin
Fem Pl P3 ;
this_Quant =
let aquest : Number => Gender => Case => Str = table {
let aquest : ParadigmsCat.Number => ParadigmsCat.Gender => Case => Str = table {
Sg => \\g,c => prepCase c ++ genForms "aquest" "aquesta" ! g ;
Pl => \\g,c => prepCase c ++ genForms "aquests" "aquestes" ! g
}