the parameter for RS and RCl should be Agr and not GenNum (bulgarian)

This commit is contained in:
krasimir
2008-10-07 18:17:32 +00:00
parent 43dcd61cbf
commit 21028dbe94
5 changed files with 11 additions and 16 deletions

View File

@@ -10,7 +10,7 @@ concrete IdiomBul of Idiom = CatBul ** open Prelude, ParadigmsBul, ResBul in {
CleftNP np rs =
mkClause (np.s ! RSubj)
{gn=GSg Neut; p=np.a.p}
(insertObj (\\_ => thisRP ! np.a.gn ++ rs.s ! np.a.gn) (predV verbBe)) ;
(insertObj (\\_ => thisRP ! np.a.gn ++ rs.s ! np.a) (predV verbBe)) ;
CleftAdv ad s = {s = \\t,a,p,o => case p of {Pos=>[]; Neg=>"íå"} ++ ad.s ++ s.s } ;