mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-23 19:42:50 -06:00
in vocative case don't use definite possesive pronouns
This commit is contained in:
@@ -66,7 +66,7 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
|
|||||||
} ;
|
} ;
|
||||||
|
|
||||||
DetQuant quant num = {
|
DetQuant quant num = {
|
||||||
s = \\g,c => quant.s ! aform (gennum g num.n) Def c ++
|
s = \\g,c => quant.s ! aform (gennum g num.n) (case c of {RVocative=>Indef; _=>Def}) c ++
|
||||||
num.s ! dgenderSpecies g Indef c ;
|
num.s ! dgenderSpecies g Indef c ;
|
||||||
n = num.n ;
|
n = num.n ;
|
||||||
countable = num.nonEmpty ;
|
countable = num.nonEmpty ;
|
||||||
@@ -74,7 +74,7 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
|
|||||||
} ;
|
} ;
|
||||||
|
|
||||||
DetQuantOrd = \quant, num, ord -> {
|
DetQuantOrd = \quant, num, ord -> {
|
||||||
s = \\g,c => quant.s ! aform (gennum g num.n) Def c ++
|
s = \\g,c => quant.s ! aform (gennum g num.n) (case c of {RVocative=>Indef; _=>Def}) c ++
|
||||||
num.s ! dgenderSpecies g Indef c ++
|
num.s ! dgenderSpecies g Indef c ++
|
||||||
ord.s ! aform (gennum g num.n) Indef c ;
|
ord.s ! aform (gennum g num.n) Indef c ;
|
||||||
n = num.n ;
|
n = num.n ;
|
||||||
|
|||||||
Reference in New Issue
Block a user