From 2d429489bb3cf70384548a231357ef9fd0ab8840 Mon Sep 17 00:00:00 2001 From: Inari Listenmaa Date: Tue, 23 May 2023 10:19:10 +0200 Subject: [PATCH 1/2] (Chi) add ByVP --- src/chinese/ExtendChi.gf | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/src/chinese/ExtendChi.gf b/src/chinese/ExtendChi.gf index dfcabd29..a0aa933f 100644 --- a/src/chinese/ExtendChi.gf +++ b/src/chinese/ExtendChi.gf @@ -11,7 +11,7 @@ concrete ExtendChi of Extend = CatChi ** , MkVPI2, BaseVPI2, ConsVPI2, ConjVPI2, ComplVPI2 , ProDrop, ComplDirectVS, ComplDirectVQ , PassVPSlash, PassAgentVPSlash - , GerundAdv, GerundNP ] + , GerundAdv, GerundNP, ByVP ] with (Grammar=GrammarChi) ** open Prelude , Coordination @@ -68,6 +68,10 @@ concrete ExtendChi of Extend = CatChi ** GerundAdv vp = mkAdv (infVP vp) ; GerundNP vp = ResChi.mkNP (infVP vp) ; + ByVP vp = + let adv : Adv = GerundAdv vp + in adv ** {s = adv.s ++ "来" ; advType = ATTime} ; + GenNP np = {s,pl = np.s ++ possessive_s ; detType = DTPoss} ; GenRP nu cn = {s = \\_ => cn.s ++ relative_s} ; From 760210c2197b9ad4a9d0e1533666b78507b1586d Mon Sep 17 00:00:00 2001 From: Inari Listenmaa Date: Tue, 23 May 2023 10:19:53 +0200 Subject: [PATCH 2/2] (May) add ByVP --- src/malay/ExtendMay.gf | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/malay/ExtendMay.gf b/src/malay/ExtendMay.gf index 85fec824..da91b944 100644 --- a/src/malay/ExtendMay.gf +++ b/src/malay/ExtendMay.gf @@ -17,6 +17,7 @@ concrete ExtendMay of Extend = CatMay ,GenModNP, GenNP, GenRP ,CompoundN ,GerundNP, GerundAdv + ,ByVP -- VPS2 ; -- have loved (binary version of VPS) @@ -97,6 +98,7 @@ concrete ExtendMay of Extend = CatMay GerundAdv vp = ss (linVP vp) ; + ByVP vp = cc2 by8means_Prep (GerundAdv vp) ; -- MkVPS2 : Temp -> Pol -> VPSlash -> VPS2 ; -- has loved -- ConjVPS2 : Conj -> [VPS2] -> VPS2 ; -- has loved and now hates