diff options
Diffstat (limited to 'next-lib/src/english')
| -rw-r--r-- | next-lib/src/english/CompatibilityCat.gf | 11 | ||||
| -rw-r--r-- | next-lib/src/english/CompatibilityEng.gf | 11 | ||||
| -rw-r--r-- | next-lib/src/english/SymbolEng.gf | 2 |
3 files changed, 24 insertions, 0 deletions
diff --git a/next-lib/src/english/CompatibilityCat.gf b/next-lib/src/english/CompatibilityCat.gf new file mode 100644 index 000000000..e12287c45 --- /dev/null +++ b/next-lib/src/english/CompatibilityCat.gf @@ -0,0 +1,11 @@ +--# -path=.:../romance:../abstract:../common + +concrete CompatibilityCat of Compatibility = CatCat ** open Prelude, CommonRomance 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/english/CompatibilityEng.gf b/next-lib/src/english/CompatibilityEng.gf new file mode 100644 index 000000000..28ede2a17 --- /dev/null +++ b/next-lib/src/english/CompatibilityEng.gf @@ -0,0 +1,11 @@ +--# -path=.:../abstract:../common + +concrete CompatibilityEng of Compatibility = CatEng ** open Prelude, ResEng in { + +-- from Noun 19/4/2008 + +lin + NumInt n = {s = n.s ; n = Pl ; hasCard = True} ; + OrdInt n = {s = n.s ++ "th"} ; + +} diff --git a/next-lib/src/english/SymbolEng.gf b/next-lib/src/english/SymbolEng.gf index 488c3fbdd..6092902c9 100644 --- a/next-lib/src/english/SymbolEng.gf +++ b/next-lib/src/english/SymbolEng.gf @@ -1,3 +1,5 @@ +--# -path=.:abstract:common + concrete SymbolEng of Symbol = CatEng ** open Prelude, ResEng in { lin |