mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 04:59:31 -06:00
compatibility modules started to deal with WebALT grammars
This commit is contained in:
9
lib/resource/abstract/Compatibility.gf
Normal file
9
lib/resource/abstract/Compatibility.gf
Normal file
@@ -0,0 +1,9 @@
|
||||
abstract Compatibility = Cat ** {
|
||||
|
||||
-- from Noun 19/4/2008
|
||||
|
||||
fun
|
||||
NumInt : Int -> Num ; -- 57
|
||||
OrdInt : Int -> Ord ; -- 57
|
||||
|
||||
}
|
||||
11
lib/resource/english/CompatibilityEng.gf
Normal file
11
lib/resource/english/CompatibilityEng.gf
Normal file
@@ -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"} ;
|
||||
|
||||
}
|
||||
11
lib/resource/spanish/CompatibilitySpa.gf
Normal file
11
lib/resource/spanish/CompatibilitySpa.gf
Normal file
@@ -0,0 +1,11 @@
|
||||
--# -path=.:../romance:../abstract:../common
|
||||
|
||||
concrete CompatibilitySpa of Compatibility = CatSpa ** open Prelude, CommonRomance in {
|
||||
|
||||
-- from Noun 19/4/2008
|
||||
|
||||
lin
|
||||
NumInt n = {s = \\_ => n.s ; isNum = True ; n = Pl} ;
|
||||
OrdInt n = {s = \\_ => n.s ++ "."} ; ---
|
||||
|
||||
}
|
||||
11
lib/resource/swedish/CompatibilitySwe.gf
Normal file
11
lib/resource/swedish/CompatibilitySwe.gf
Normal file
@@ -0,0 +1,11 @@
|
||||
--# -path=.:../scandinavian:../abstract:../common
|
||||
|
||||
concrete CompatibilitySwe of Compatibility = CatSwe ** open Prelude, CommonScand in {
|
||||
|
||||
-- from Noun 19/4/2008
|
||||
|
||||
lin
|
||||
NumInt n = {s = \\_ => n.s ; isDet = True ; n = Pl} ;
|
||||
OrdInt n = {s = n.s ++ ":e" ; isDet = True} ;
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user