(Kor) Minor fixes and cleanup

This commit is contained in:
Inari Listenmaa committed 2020-03-26 16:06:03 +01:00
1 parent 602da07d3d
commit 85babd3730
5 files changed
+6 -10

No files matched your search

+1 -1
View File
@@ -10,7 +10,7 @@ concrete NounKor of Noun = CatKor ** open ResKor, Prelude in {
DetCN det cn = cn ** {s =
\\c =>
let cns : Str = case det.n of {
-- Pl => n.s ! Bare ++ BIND ++ plural ! c ;
-- Pl => cn.s ! Bare ++ BIND ++ plural ! c ;
_Sg => cn.s ! c } ;
dets : Str = det.s ! cn.c.origin ;
detnum : Str = case det.numtype of {