diff --git a/src/dutch/ExtendDut.gf b/src/dutch/ExtendDut.gf index e8a2468b3..f1ed70fde 100644 --- a/src/dutch/ExtendDut.gf +++ b/src/dutch/ExtendDut.gf @@ -5,7 +5,8 @@ concrete ExtendDut of Extend = - [PastPartAP,ICompAP,IAdvAdv, VPS, BaseVPS, ConsVPS, - MkVPS, ConjVPS, PredVPS + MkVPS, ConjVPS, PredVPS, + PassVPSlash, PassAgentVPSlash ] with (Grammar = GrammarDut) ** @@ -102,6 +103,11 @@ lin IAdvAdv adv = {s = "hoe" ++ adv.s} ; +lin PassVPSlash vps = + insertInf (vps.s.s ! VPerf APred) (predV ResDut.worden_V) ; + PassAgentVPSlash vps np = + insertAdv (appPrep (mkPrep "door") np) (insertInf (vps.s.s ! VPerf APred) (predV ResDut.worden_V)) ; + lin UseDAP dap = dap ** { s = \\_ => dap.sp ! Neutr ;