From ffd1f28b4262549a20aa1d7fdd69756f15ebee46 Mon Sep 17 00:00:00 2001
From: Meowyam <maryam@chilon.net>
Date: Wed, 30 Mar 2022 23:32:08 +0800
Subject: [PATCH] negative imperative

---
 src/malay/SentenceMay.gf                 | 5 ++++-
 src/malay/unittest/verbal_affixes.gftest | 4 ++++
 2 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/src/malay/SentenceMay.gf b/src/malay/SentenceMay.gf
index e6d827b2..d27c3f8e 100644
--- a/src/malay/SentenceMay.gf
+++ b/src/malay/SentenceMay.gf
@@ -28,7 +28,10 @@ lin
 --2 Imperatives
   -- : VP -> Imp ;
   ImpVP vp = {
-    s = \\num,pol => vp.s ! Root ! pol
+    s = \\num,pol => case pol of {
+      Neg => "jangan" ++ vp.s ! Root ! Pos;
+      Pos => vp.s ! Root ! Pos
+    }
   } ;
 
  {-
diff --git a/src/malay/unittest/verbal_affixes.gftest b/src/malay/unittest/verbal_affixes.gftest
index d36f9be6..9e06ad3d 100644
--- a/src/malay/unittest/verbal_affixes.gftest
+++ b/src/malay/unittest/verbal_affixes.gftest
@@ -109,5 +109,9 @@ LangMay: sekiranya tidak hujan sekarang , aku akan berjalan
 Lang: UttImpSg PPos (ImpVP (ComplSlash (SlashV2a open_V2) (DetCN (DetQuant DefArt NumSg) (UseN door_N))))
 LangEng: open the door
 LangMay: buka pintu
+
+Lang: UttImpSg PNeg (ImpVP (ComplSlash (SlashV2a open_V2) (DetCN (DetQuant DefArt NumSg) (UseN door_N))))
+LangEng: don't open the door
+LangMay: jangan buka pintu
 ----------------------------------------
 -- Questions