Fixed bug in russian regular compartives. Predef.tk/dp have *really* confusing names, I don't think I ever got it right on the first try.

This commit is contained in:
bjorn
2008-08-18 19:05:46 +00:00
parent 4925580877
commit 6360d3f473

View File

@@ -383,7 +383,7 @@ foreign = Foreign; -- +++ MG_UR: added +++
} ;
mk1A : Str -> A = \positive ->
let stem = Predef.dp 2 positive in mk2A positive (stem+"ее") ;
let stem = Predef.tk 2 positive in mk2A positive (stem+"ее") ;
mk2A : Str -> Str -> A = \positive, comparative ->
case positive of {