mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
fix active verb form for love
This commit is contained in:
@@ -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;
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -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
|
||||||
|
|||||||
Reference in New Issue
Block a user