diff --git a/src/malay/ParamMay.gf b/src/malay/ParamMay.gf
index 95212a54..0c153302 100644
--- a/src/malay/ParamMay.gf
+++ b/src/malay/ParamMay.gf
@@ -142,6 +142,7 @@ param
   VForm =
       Root  -- infinitive, imperative, …
     | Active
+    | Imperative
     ;
 
  Prefix =
diff --git a/src/malay/PhraseMay.gf b/src/malay/PhraseMay.gf
index 3a1fb5b2..3e7c99e4 100644
--- a/src/malay/PhraseMay.gf
+++ b/src/malay/PhraseMay.gf
@@ -9,6 +9,7 @@ concrete PhraseMay of Phrase = CatMay ** open Prelude, ResMay in {
     UttNP np = {s = np.s ! Bare} ;
     UttIP ip = {s = ip.sp ! NF Sg Bare} ;
     UttImpSg pol imp = { s = pol.s ++ imp.s ! Sg ! pol.p } ;
+    UttImpPol pol imp = {s = pol.s ++ imp.s ! Sg ! pol.p} ;
 {-
     UttImpSg pol imp =
     UttImpPl pol imp =
diff --git a/src/malay/ResMay.gf b/src/malay/ResMay.gf
index 047bf7c4..d70c8f55 100644
--- a/src/malay/ResMay.gf
+++ b/src/malay/ResMay.gf
@@ -224,7 +224,8 @@ oper
   mkVerb : Str -> Prefix -> Verb = \str,p -> {
     s = table {
       Root => str ;
-      Active => prefix p str
+      Active => prefix p str ;
+      Imperative => str ++ BIND ++ "kan"
       }
     } ;
 
diff --git a/src/malay/SentenceMay.gf b/src/malay/SentenceMay.gf
index d27c3f8e..e9075f17 100644
--- a/src/malay/SentenceMay.gf
+++ b/src/malay/SentenceMay.gf
@@ -29,8 +29,8 @@ lin
   -- : VP -> Imp ;
   ImpVP vp = {
     s = \\num,pol => case pol of {
-      Neg => "jangan" ++ vp.s ! Root ! Pos;
-      Pos => vp.s ! Root ! Pos
+      Neg => "jangan" ++ vp.s ! Imperative ! Pos;
+      Pos => vp.s ! Imperative ! Pos
     }
   } ;
 
diff --git a/src/malay/unittest/verbal_affixes.gftest b/src/malay/unittest/verbal_affixes.gftest
index 9e06ad3d..26e1c5df 100644
--- a/src/malay/unittest/verbal_affixes.gftest
+++ b/src/malay/unittest/verbal_affixes.gftest
@@ -113,5 +113,9 @@ 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
+
+Lang: UttImpPol PPos (ImpVP (ComplSlash (SlashV2a open_V2) (DetCN (DetQuant DefArt NumSg) (UseN door_N))))
+LangEng: open the door
+LangMay: bukakan pintu
 ----------------------------------------
 -- Questions