diff options
Diffstat (limited to 'next-lib/src/finnish')
| -rw-r--r-- | next-lib/src/finnish/CompatibilityFin.gf | 11 | ||||
| -rw-r--r-- | next-lib/src/finnish/SymbolFin.gf | 4 |
2 files changed, 14 insertions, 1 deletions
diff --git a/next-lib/src/finnish/CompatibilityFin.gf b/next-lib/src/finnish/CompatibilityFin.gf new file mode 100644 index 000000000..a615f2eed --- /dev/null +++ b/next-lib/src/finnish/CompatibilityFin.gf @@ -0,0 +1,11 @@ +--# -path=.:../abstract:../common + +concrete CompatibilityFin of Compatibility = CatFin ** open Prelude, ResFin in { + +-- from Noun 19/4/2008 + +lin + NumInt n = {s = \\_,_ => n.s ; isNum = True ; n = Pl} ; + OrdInt n = {s = \\_ => n.s ++ "."} ; + +} diff --git a/next-lib/src/finnish/SymbolFin.gf b/next-lib/src/finnish/SymbolFin.gf index 922b19dcb..9ceac2105 100644 --- a/next-lib/src/finnish/SymbolFin.gf +++ b/next-lib/src/finnish/SymbolFin.gf @@ -1,3 +1,5 @@ +--# -path=.:abstract:common + concrete SymbolFin of Symbol = CatFin ** open Prelude, NounFin, ResFin in { lin @@ -25,7 +27,7 @@ lin SymbS sy = sy ; SymbNum n = {s = \\_,_ => n.s ; isNum = True ; n = Pl} ; - SymbOrd n = {s = \\_,_ => n.s ++ "."} ; + SymbOrd n = {s = \\_ => n.s ++ "."} ; lincat |