diff --git a/src/malay/GrammarMay.gf b/src/malay/GrammarMay.gf
index aa5dafd04..eeb0b6a29 100644
--- a/src/malay/GrammarMay.gf
+++ b/src/malay/GrammarMay.gf
@@ -12,11 +12,13 @@ concrete GrammarMay of Grammar =
   TextX,
   StructuralMay,
   IdiomMay,
-  TenseX - [AAnter]
+  TenseX - [AAnter, TFut]
   ** open ParamX in {
 
   flags startcat = Phr ;
 
   lin
     AAnter = {s = "sudah" ; a = ParamX.Anter} ;
+    TFut  = {s = "akan" ; t = ParamX.Fut} ;
+
 } ;
diff --git a/src/malay/unittest/tenses.gftest b/src/malay/unittest/tenses.gftest
new file mode 100644
index 000000000..0fe8ff759
--- /dev/null
+++ b/src/malay/unittest/tenses.gftest
@@ -0,0 +1,11 @@
+Lang: UseCl (TTAnt TPres AAnter) PPos (PredVP (DetCN (DetQuant DefArt NumSg) (UseN cat_N)) (UseV walk_V))
+LangEng: the cat has walked
+LangMay: kucing sudah berjalan
+
+Lang: UseCl (TTAnt TPres ASimul) PPos (PredVP (DetCN (DetQuant DefArt NumSg) (UseN cat_N)) (UseV walk_V))
+LangEng: the cat walks
+LangMay: kucing berjalan
+
+Lang: UseCl (TTAnt TFut ASimul) PPos (PredVP (DetCN (DetQuant DefArt NumSg) (UseN cat_N)) (UseV walk_V))
+LangEng: the cat will walk
+LangMay: kucing akan berjalan