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

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

View File

@@ -61,11 +61,11 @@ abstract Noun = Cat ** {
-- 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
-- $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.
OrdDigits : Digits -> Ord ; -- 51st

File diff suppressed because it is too large Load Diff

View File

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

View File

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

View File

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

View File

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

View File

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