(Kor) Fixes in adverbs + related unit tests
This commit is contained in:
1 parent
1acaa57c49
commit
dbaa52be08
6 files changed
+27
-8
No files matched your search
@@ -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 "에게" ;
|
||||
|
||||
--------------------------------------------------------------------------------
|
||||
|
||||
Reference in new issue
Block a user