msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

rename the s2 field in VP and VPSlash to compl

Browse Source
This commit is contained in:
krasimir
2008-06-13 22:27:59 +00:00
parent 9ad1cb5749
commit 1ad2aad18f
6 changed files with 20 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
lib/resource-1.4/bulgarian/VerbBul.gf
View File

@@ -21,7 +21,7 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in {
in vv_verb ++ vp.ad ! False ++ "äà" ++ vp_verb ;
imp = vp.imp ;
ad = \\_ => [] ;
s2 = vp.s2 ;
compl = vp.compl ;
subjRole = vp.subjRole
} ;
@@ -61,7 +61,7 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in {
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 ;
compl = slash.compl ;
subjRole = (predV vv).subjRole
} ** {c2 = slash.c2} ;
@@ -78,7 +78,7 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in {
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 ;
compl = slash.compl ;
subjRole = (predV vv).subjRole
} ** {c2 = slash.c2} ;
@@ -86,7 +86,7 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in {
s = slash.s ;
imp = slash.imp ;
ad = slash.ad ;
s2 = \\_ => slash.c2.s ++ np.s ! RObj slash.c2.c ++ slash.s2 ! np.a ;
compl = \\_ => slash.c2.s ++ np.s ! RObj slash.c2.c ++ slash.compl ! np.a ;
subjRole = slash.subjRole
} ;
@@ -98,7 +98,7 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in {
s = \\t,a,p,agr,q,asp => vp.s ! t ! a ! p ! agr ! False ! asp ;
imp = vp.imp ;
ad = \\q => vp.ad ! q ++ adv.s ++ case q of {True => "ëè"; False => []} ;
s2 = vp.s2 ;
compl = vp.compl ;
subjRole = vp.subjRole
} ;