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

ExtAdvVP added to some languages where it was missing

Browse Source
This commit is contained in:
aarne
2014-12-08 13:21:28 +00:00
parent 6067bc4932
commit 025ce90634
4 changed files with 8 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/src/bulgarian/VerbBul.gf
View File

@@ -79,6 +79,8 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in {
UseCopula = predV verbBe ;
AdvVP vp adv = insertObj (\\_ => adv.s) Pos vp ;
ExtAdvVP vp adv = insertObj (\\_ => embedInCommas adv.s) Pos vp ;
AdvVPSlash vp adv = insertSlashObj1 (\\_ => adv.s) Pos vp ;
AdVVP adv vp = {

2
lib/src/dutch/VerbDut.gf
View File

@@ -76,6 +76,8 @@ concrete VerbDut of Verb = CatDut ** open Prelude, ResDut in {
CompAdv a = {s = \\_ => a.s} ;
AdvVP vp adv = insertAdv adv.s vp ;
ExtAdvVP vp adv = insertAdv (embedInCommas adv.s) vp ;
AdVVP adv vp = insertAdV adv.s vp ;
ReflVP vp = insertObj (\\a => appPrep vp.c2.p1 (\\_ => reflPron ! a)) vp ;

2
lib/src/german/VerbGer.gf
View File

@@ -79,6 +79,8 @@ concrete VerbGer of Verb = CatGer ** open Prelude, ResGer, Coordination in {
} ;
AdvVP vp adv = insertAdv adv.s vp ;
ExtAdvVP vp adv = insertAdv (embedInCommas adv.s) vp ;
AdVVP adv vp = insertAdv adv.s vp ; -- not AdV 27/5/2012: nicht immer
AdvVPSlash vp adv = insertAdv adv.s vp ** {c2 = vp.c2} ;

2
lib/src/romance/VerbRomance.gf
View File

@@ -100,6 +100,8 @@ incomplete concrete VerbRomance of Verb =
CompAdv a = {s = \\_ => a.s} ;
AdvVP vp adv = insertAdv adv.s vp ;
ExtAdvVP vp adv = insertAdv (embedInCommas adv.s) vp ;
AdVVP adv vp = insertAdV adv.s vp ;
PassV2 v = insertComplement