diff --git a/src/malay/NounMay.gf b/src/malay/NounMay.gf
index 83cecf64..2bfed1f7 100644
--- a/src/malay/NounMay.gf
+++ b/src/malay/NounMay.gf
@@ -158,8 +158,9 @@ concrete NounMay of Noun = CatMay ** open ResMay, Prelude in {
   -- : N3 -> N2 ;          -- distance (to Paris)
   -- Use3N3 n3 = lin N2 n3 ;
   -- : AP -> CN -> CN
-  -- AdjCN ap cn = cn ** {
-  --   } ;
+  AdjCN ap cn = cn ** {
+    s = \\nf => cn.s ! nf ++ ap.s
+    } ;
 
   -- : CN -> RS  -> CN ;
   RelCN cn rs = cn ** {
diff --git a/src/malay/ResMay.gf b/src/malay/ResMay.gf
index 87cab876..447726d4 100644
--- a/src/malay/ResMay.gf
+++ b/src/malay/ResMay.gf
@@ -145,10 +145,10 @@ oper
 --------------------------------------------------------------------------------
 -- Adjectives
 
-  Adjective : Type = Verb ; -- TODO check if meaningful
+  Adjective : Type = SS ;
   Adjective2 : Type = Adjective ;
 
-  mkAdj : Str -> Adjective = \str -> {s = \\_ => str} ;
+  mkAdj : Str -> Adjective = \str -> {s = str} ;
 
   AdjPhrase : Type = Adjective ; -- ** {compar : Str} ;
 --------------------------------------------------------------------------------
diff --git a/src/malay/VerbMay.gf b/src/malay/VerbMay.gf
index 2b338fef..d97fa932 100644
--- a/src/malay/VerbMay.gf
+++ b/src/malay/VerbMay.gf
@@ -112,7 +112,7 @@ lin
 -- Adjectival phrases, noun phrases, and adverbs can be used.
 
   -- : AP  -> Comp ;
-  CompAP ap = useV ap ;
+  CompAP ap = useComp ap.s ;
 
   -- : CN  -> Comp ;
   CompCN cn = useComp (cn.s ! NF Sg Bare) ;