1
0
forked from GitHub/gf-core

whichRP is replaced by suchRP to match closely the English grammar

This commit is contained in:
krasimir
2008-03-14 16:57:27 +00:00
parent 391814208c
commit 4fcf3bd7f2
2 changed files with 9 additions and 1 deletions

View File

@@ -4,7 +4,7 @@ concrete RelativeBul of Relative = CatBul ** open ResBul in {
lin
RelCl cl = {
s = \\t,a,p,gn => whichRP ! gn ++ cl.s ! t ! a ! p ! Main ;
s = \\t,a,p,gn => suchRP ! gn ++ "֌" ++ cl.s ! t ! a ! p ! Main ;
role = RSubj
} ;

View File

@@ -528,4 +528,12 @@ resource ResBul = ParamX ** open Prelude in {
GSg Neut => "êîåòî" ;
GPl => "êîèòî"
} ;
suchRP : GenNum => Str
= table {
GSg Masc => "òàêúâ" ;
GSg Fem => "òàêàâà" ;
GSg Neut => "òàêîâà" ;
GPl => "òàêèâà"
} ;
}