From 8f650f9da30581a8846a407844f53508e0bf24ad Mon Sep 17 00:00:00 2001 From: Inari Listenmaa Date: Wed, 14 Aug 2019 16:24:52 +0200 Subject: [PATCH] (Som) Correct form for RS when it modifies a NP in nominative case --- src/somali/RelativeSom.gf | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/src/somali/RelativeSom.gf b/src/somali/RelativeSom.gf index 7b648ce8b..eee914013 100644 --- a/src/somali/RelativeSom.gf +++ b/src/somali/RelativeSom.gf @@ -8,17 +8,19 @@ lin -- : RP -> VP -> RCl ; {- NB. this works because vfSubord only puts different forms from vfStatement - in Pres,Simul,Pos. RelVP needs a third set of forms: "Reduced present - general" (Sayeed p. 95-96 + ch 8). + in Pres,Simul,Pos. RelVP needs a third set of forms in Abs,Pres,Simul,Pos, + called "reduced present general" (Sayeed p. 95-96 + ch 8). These forms are found in VRel in VP, and aren't chosen by predVP, so we put them in manually in RelVP. -} RelVP rp vp = {s = \\g,c,t,a,p => let cls = predVPSlash impersNP vp ; - rcl = mergeRCl (cls.s ! True) ; + rclSubord = mergeRCl (cls.s ! True) ; + rclStatement = mergeRCl (cls.s ! False) ; in rp.s ++ case of { - => linVP (VRel g) vp ; - _ => rcl.s ! t ! a ! p } + => linVP (VRel g) vp ; -- reduced present only in absolutive + <_,Nom,Pres,Simul,Pos> => rclStatement.s ! t ! a ! p ; -- the usual forms, not subordinate + _ => rclSubord.s ! t ! a ! p } -- the rest is Subord because of negation. } ; -- : RP -> ClSlash -> RCl ; -- whom John loves