From 9ad1cb574991c6825f8dbd5575f1379669535133 Mon Sep 17 00:00:00 2001 From: krasimir Date: Fri, 13 Jun 2008 22:12:07 +0000 Subject: [PATCH] fix the imperative forms and the subjRole in SlashVV and SlashV2VNP --- lib/resource-1.4/bulgarian/VerbBul.gf | 16 ++++++++++++---- 1 file changed, 12 insertions(+), 4 deletions(-) diff --git a/lib/resource-1.4/bulgarian/VerbBul.gf b/lib/resource-1.4/bulgarian/VerbBul.gf index 67205432d..cb29d490c 100644 --- a/lib/resource-1.4/bulgarian/VerbBul.gf +++ b/lib/resource-1.4/bulgarian/VerbBul.gf @@ -55,10 +55,14 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in { vv_verb = (predV vv).s ! t ! a ! p ! agr ! q ! asp ; slash_verb = slash.s ! Pres ! Simul ! Pos ! agr ! False ! Perf ; in vv_verb ++ slash.ad ! False ++ "да" ++ slash_verb ; - imp = slash.imp ; + imp = \\p,n,asp => + let + vv_verb = (predV vv).imp ! p ! n ! asp ; + slash_verb = slash.s ! Pres ! Simul ! Pos ! {gn = gennum DMasc n; p = P2} ! False ! Perf ; + in vv_verb ++ slash.ad ! False ++ "да" ++ slash_verb ; ad = \\_ => [] ; s2 = slash.s2 ; - subjRole = slash.subjRole + subjRole = (predV vv).subjRole } ** {c2 = slash.c2} ; -- test: I saw a car whom she begged me to buy @@ -68,10 +72,14 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in { vv_verb = (predV vv).s ! t ! a ! p ! agr ! q ! asp ; slash_verb = slash.s ! Pres ! Simul ! Pos ! np.a ! False ! Perf ; in vv_verb ++ vv.c2.s ++ np.s ! RObj vv.c2.c ++ slash.ad ! False ++ "да" ++ slash_verb ; - imp = slash.imp ; + imp = \\p,n,asp => + let + vv_verb = (predV vv).imp ! p ! n ! asp ; + slash_verb = slash.s ! Pres ! Simul ! Pos ! np.a ! False ! Perf ; + in vv_verb ++ vv.c2.s ++ np.s ! RObj vv.c2.c ++ slash.ad ! False ++ "да" ++ slash_verb ; ad = \\_ => [] ; s2 = slash.s2 ; - subjRole = slash.subjRole + subjRole = (predV vv).subjRole } ** {c2 = slash.c2} ; ComplSlash slash np = {