(Hun) Combine the parameters on definiteness and Quant/Det type

This commit is contained in:
Inari Listenmaa
2020-04-26 15:51:34 +02:00
parent b6b462ca35
commit 22cadd2ac6
3 changed files with 37 additions and 26 deletions
+2 -6
View File
@@ -185,7 +185,6 @@ oper
BaseQuant : Type = {
poss : HarmForms ; -- Quants made by PossPron need this, empty for others
objdef : ObjDef ; -- How V2 agrees if NP with this Det is an object
caseagr : Bool ; -- If it agrees in case: "azoknak a nőknek" vs. "sok nőknek"
} ;
@@ -200,8 +199,7 @@ oper
mkQuant : (s,sp : Str) -> Quant = \s,sp -> {
s = mkCaseNoun s ;
sp = mkCaseNoun sp ;
qt = Other ;
objdef = Def ;
qt = DefQuant ;
caseagr = True ;
poss = harm1 [] ;
} ;
@@ -212,7 +210,6 @@ oper
s,
sp : Case => Str ;
n : Number ;
-- numtype : NumType ; -- Whether its Num component is digit, numeral or Sg/Pl
dt : DetType ;
} ;
@@ -221,9 +218,8 @@ oper
sp = mkCaseNoun s ! n ;
n = n ;
numtype = NoNum ;
objdef = d ;
caseagr = ca ;
dt = NoPoss ;
dt = objdef2dt d ;
poss = harm1 [] ;
} ;