fix active verb form for love

This commit is contained in:
Meowyam
2022-02-21 16:15:33 +08:00
parent ce9618b945
commit 066a9f6170
2 changed files with 4 additions and 1 deletions
+1
View File
@@ -125,4 +125,5 @@ concrete CatMay of Cat = CommonX - [IAdv] ** open ResMay, Prelude in {
CN = \cn -> cn.s ! NF Sg Bare ++ cn.heavyMod; CN = \cn -> cn.s ! NF Sg Bare ++ cn.heavyMod;
ClSlash = \cl -> cl.subj ++ cl.pred ! Root ! Pos ++ cl.c2.s; ClSlash = \cl -> cl.subj ++ cl.pred ! Root ! Pos ++ cl.c2.s;
RCl = \cl -> cl.subj ++ cl.pred ! P1 ! Pos; RCl = \cl -> cl.subj ++ cl.pred ! P1 ! Pos;
Cl = \cl -> cl.subj ++ cl.pred ! Active ! Pos;
} }
+3 -1
View File
@@ -224,7 +224,9 @@ lin long_A = mkA "panjang" ;
-- lin lose_V2 = mkV2 "" ; -- lin lose_V2 = mkV2 "" ;
-- lin louse_N = mkN "" ; -- lin louse_N = mkN "" ;
-- lin love_N = mkN "" ; -- lin love_N = mkN "" ;
lin love_V2 = mkV2 "cinta" ; lin love_V2 = let love' : V2 = mkV2 "cinta" in love' ** {
s = \\_ => "mencintai" ;
} ;
---- ----
-- M -- M