GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-27 08:58:55 -06:00
Code Issues Packages Projects Releases Wiki Activity

imppol for malay

Browse Source
This commit is contained in:
Meowyam
2022-04-27 11:40:04 +08:00
parent d35a709eb7
commit d14de723d0
5 changed files with 10 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/malay/ParamMay.gf
View File

@@ -142,6 +142,7 @@ param
VForm =
Root -- infinitive, imperative, …
| Active
| Imperative
;
Prefix =

1
src/malay/PhraseMay.gf
View File

@@ -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 =

3
src/malay/ResMay.gf
View File

@@ -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"
}
} ;

4
src/malay/SentenceMay.gf
View File

@@ -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
}
} ;

4
src/malay/unittest/verbal_affixes.gftest
View File

@@ -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