From 066a9f6170f0d42b01302363c3f70d1493f76135 Mon Sep 17 00:00:00 2001 From: Meowyam Date: Mon, 21 Feb 2022 16:14:53 +0800 Subject: [PATCH] fix active verb form for love --- src/malay/CatMay.gf | 1 + src/malay/LexiconMay.gf | 4 +++- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/src/malay/CatMay.gf b/src/malay/CatMay.gf index d564d2dd..04dead49 100644 --- a/src/malay/CatMay.gf +++ b/src/malay/CatMay.gf @@ -125,4 +125,5 @@ concrete CatMay of Cat = CommonX - [IAdv] ** open ResMay, Prelude in { CN = \cn -> cn.s ! NF Sg Bare ++ cn.heavyMod; ClSlash = \cl -> cl.subj ++ cl.pred ! Root ! Pos ++ cl.c2.s; RCl = \cl -> cl.subj ++ cl.pred ! P1 ! Pos; + Cl = \cl -> cl.subj ++ cl.pred ! Active ! Pos; } diff --git a/src/malay/LexiconMay.gf b/src/malay/LexiconMay.gf index e3b6643f..f2eceaa4 100644 --- a/src/malay/LexiconMay.gf +++ b/src/malay/LexiconMay.gf @@ -224,7 +224,9 @@ lin long_A = mkA "panjang" ; -- lin lose_V2 = mkV2 "" ; -- lin louse_N = mkN "" ; -- lin love_N = mkN "" ; -lin love_V2 = mkV2 "cinta" ; +lin love_V2 = let love' : V2 = mkV2 "cinta" in love' ** { + s = \\_ => "mencintai" ; +} ; ---- -- M