diff --git a/src/russian/ExtendRus.gf b/src/russian/ExtendRus.gf index 35929b063..03812a9d4 100644 --- a/src/russian/ExtendRus.gf +++ b/src/russian/ExtendRus.gf @@ -175,19 +175,30 @@ lin } ; -- : VPSlash -> VP ; -- be forced to sleep - PassVPSlash vps = vps ** { + PassVPSlash vps = case vps.verb.asp of { + Perfective => vps ** { verb=copulaEll ; compl=\\p,a => vps.compl ! p ! a ++ shortPastPassPart vps.verb (agrGenNum a) ++ vps.c.s } ; + Imperfective => vps ** { + verb=(passivate vps.verb); + } + }; + -- PresPartAP : VP -> AP ; -- (the man) looking at Mary -- use PlP2 + "ый" -- : VPSlash -> VP - PassAgentVPSlash vps np = - vps ** { - verb=copulaEll ; - compl=\\p,a => vps.compl ! p ! a ++ shortPastPassPart vps.verb (agrGenNum a) ++ vps.c.s ++ np.s ! Ins + PassAgentVPSlash vps np = case vps.verb.asp of { + Perfective => vps ** { + verb=copulaEll ; + compl=\\p,a => shortPastPassPart vps.verb (agrGenNum a) ++ vps.c.s ++ vps.compl ! p ! a ++ np.s ! Ins } ; + Imperfective => vps ** { + verb=(passivate vps.verb); + compl=\\p,a => vps.compl ! p ! a ++ np.s ! Ins + } + }; -- : Pron -> Pron ; -- unstressed subject pronoun becomes empty: "am tired"