diff --git a/src/polish/ExtendPol.gf b/src/polish/ExtendPol.gf index 58cf42744..f787007fe 100644 --- a/src/polish/ExtendPol.gf +++ b/src/polish/ExtendPol.gf @@ -2,11 +2,11 @@ concrete ExtendPol of Extend = CatPol ** ExtendFunctor - [ - iFem_Pron, youFem_Pron, theyFem_Pron, ProDrop + iFem_Pron, youFem_Pron, theyFem_Pron, ProDrop, PassVPSlash ] with (Grammar = GrammarPol) ** - open PronounMorphoPol in { + open PronounMorphoPol, Prelude in { lin iFem_Pron = pronJa FemSg ; lin youFem_Pron = pronTy FemSg ; @@ -37,6 +37,9 @@ oper p = P3 }; +-- KA: PassVPSlash is derived from PassV2. Objects might be ignored +lin PassVPSlash vps = setImienne vps True; + lin GivenName, MaleSurname, FemaleSurname = \n -> n ; lin FullName gn sn = { nom = gn.nom ++ sn.nom ;