From f773272437ebd3495a7b98d223ccbdfd455fcfea Mon Sep 17 00:00:00 2001
From: Meowyam <maryam@chilon.net>
Date: Fri, 14 Jul 2023 10:41:57 +0800
Subject: [PATCH] add speak and but to Malay

---
 src/malay/LexiconMay.gf    | 3 ++-
 src/malay/ParadigmsMay.gf  | 4 +++-
 src/malay/StructuralMay.gf | 2 +-
 3 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/src/malay/LexiconMay.gf b/src/malay/LexiconMay.gf
index 33eb7c11..d3101bcd 100644
--- a/src/malay/LexiconMay.gf
+++ b/src/malay/LexiconMay.gf
@@ -349,7 +349,8 @@ lin small_A = mkA "kecil" ;
 -- lin snow_N = mkN "" ;
 -- lin sock_N = mkN "" ;
 lin song_N = mkN "lagu" ;
--- lin speak_V2 = mkV2 "" ;
+lin speak_V2 = mkV2 (prefixV (mkV "cakap" Ber)) emptyPrep  ;
+
 -- lin spit_V = mkV "" ;
 -- lin split_V2 = mkV2 "" ;
 -- lin squeeze_V2 = mkV2 "" ;
diff --git a/src/malay/ParadigmsMay.gf b/src/malay/ParadigmsMay.gf
index 58aa653e..18cb71f7 100644
--- a/src/malay/ParadigmsMay.gf
+++ b/src/malay/ParadigmsMay.gf
@@ -75,7 +75,9 @@ oper
   -- mkVQ : Str -> VQ
   --   = \s -> lin VQ (regV s) ;
 
-
+  mkV2A : overload {
+    mkV2A : Str -> V2A ;
+  } ;
   --
   -- mkV2A : Str -> V2A
   --   = \s -> lin V2A (regV s ** {c2 = noPrep}) ;
diff --git a/src/malay/StructuralMay.gf b/src/malay/StructuralMay.gf
index a5b058d5..3018932f 100644
--- a/src/malay/StructuralMay.gf
+++ b/src/malay/StructuralMay.gf
@@ -47,7 +47,7 @@ lin or_Conj = {s2 = "atau" ; s1 = [] ; n = Sg} ;
 -- lin both7and_DConj = mkConj "" "" pl ;
 -- lin either7or_DConj = {s2 = \\_ => "" ; s1 = "" ; n = Sg} ;
 --
--- lin but_PConj = ss "" ;
+lin but_PConj = ss "tetapi" ;
 -- lin otherwise_PConj = ss "" ;
 -- lin therefore_PConj = ss "" ;