GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-24 02:12:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

getting started with overloaded API for 1.4; some determiner syntax missing

Browse Source
This commit is contained in:
aarne
2008-05-26 14:06:56 +00:00
parent 6d0adbb2cb
commit 089b930d7c
7 changed files with 1518 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/resource-1.4/abstract/Noun.gf
View File

@@ -61,11 +61,11 @@ abstract Noun = Cat ** {
-- The construction of numerals is defined in [Numeral Numeral.html]. -- The construction of numerals is defined in [Numeral Numeral.html].
-- $Num$ can be modified by certain adverbs. -- A $Card$ can be modified by certain adverbs.
AdNum : AdN -> Card -> Card ; -- almost 51 AdNum : AdN -> Card -> Card ; -- almost 51
-- $Ord$ consists of either digits or numeral words. -- An $Ord$ consists of either digits or numeral words.
-- Also superlative forms of adjectives behave syntactically like ordinals. -- Also superlative forms of adjectives behave syntactically like ordinals.
OrdDigits : Digits -> Ord ; -- 51st OrdDigits : Digits -> Ord ; -- 51st

1500
lib/resource-1.4/api/Constructors.gf Normal file
View File

File diff suppressed because it is too large Load Diff

3
lib/resource-1.4/api/ConstructorsEng.gf Normal file
View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses:prelude
resource ConstructorsEng = Constructors with (Grammar = GrammarEng) ;

4
lib/resource-1.4/api/Syntax.gf Normal file
View File

@@ -0,0 +1,4 @@
--# -path=.:alltenses:prelude
interface Syntax = Constructors, Cat, Structural, Numeral ;

4
lib/resource-1.4/api/SyntaxEng.gf Normal file
View File

@@ -0,0 +1,4 @@
--# -path=.:alltenses:prelude
instance SyntaxEng of Syntax = ConstructorsEng, CatEng, StructuralEng, NumeralEng ;

3
lib/resource-1.4/api/TryEng.gf Normal file
View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses-1.4:prelude
resource TryEng = SyntaxEng, LexiconEng, ParadigmsEng - [mkAdv] ;

5
src-3.0/GF/Grammar/API.hs
View File

@@ -18,7 +18,7 @@ import GF.Grammar.PrGrammar
import GF.Compile.Rename (renameSourceTerm) import GF.Compile.Rename (renameSourceTerm)
import GF.Compile.CheckGrammar (justCheckLTerm) import GF.Compile.CheckGrammar (justCheckLTerm)
import GF.Compile.Compute (computeConcreteRec) import GF.Compile.Compute (computeConcrete)
import GF.Data.Operations import GF.Data.Operations
import qualified Data.ByteString.Char8 as BS import qualified Data.ByteString.Char8 as BS
@@ -47,6 +47,5 @@ checkTermAny gr m t = do
justCheckLTerm gr t1 justCheckLTerm gr t1
computeTerm :: Grammar -> Term -> Err Term computeTerm :: Grammar -> Term -> Err Term
computeTerm = computeConcreteRec computeTerm = computeConcrete