msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

(Kor) Fixes in adverbs + related unit tests

Browse Source
This commit is contained in:
Inari Listenmaa
2020-03-26 20:43:52 +01:00
parent 1acaa57c49
commit dbaa52be08
6 changed files with 27 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/korean/ResKor.gf
View File

@@ -121,11 +121,11 @@ oper
--------------------------------------------------------------------------------
-- Postpositions
Postposition : Type = SS ;
Postposition : Type = {s : Str ; attaches : Bool} ;
mkPrep : Str -> Postposition = \str -> ss str ;
mkPrep : Str -> Postposition = \str -> {s=str ; attaches=True} ;
emptyPP : Postposition = mkPrep [] ;
emptyPP : Postposition = mkPrep [] ** {attaches=False} ;
datPP : Postposition = mkPrep "에게" ;
--------------------------------------------------------------------------------