french lexicon bug fixes

This commit is contained in:
aarne
2007-01-15 16:50:06 +00:00
parent 2f9319d7fd
commit 69e0d13380
3 changed files with 11 additions and 121 deletions

View File

@@ -101,7 +101,9 @@ lin
Masc Pl P3 ;
this_Quant = {s = \\_ =>
table {
Sg => \\g,c => prepCase c ++ genForms "ce" "cette" ! g ; ---- cet ; ci
Sg => \\g,c =>
prepCase c ++
genForms (pre {"ce" ; "cet" / voyelle}) "cette" ! g ; --- ci
Pl => \\_,_ => "ces"
}
} ;