diff options
Diffstat (limited to 'next-lib/src/bulgarian/QuestionBul.gf')
| -rw-r--r-- | next-lib/src/bulgarian/QuestionBul.gf | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/next-lib/src/bulgarian/QuestionBul.gf b/next-lib/src/bulgarian/QuestionBul.gf index 9a02bf333..33781a46b 100644 --- a/next-lib/src/bulgarian/QuestionBul.gf +++ b/next-lib/src/bulgarian/QuestionBul.gf @@ -41,20 +41,20 @@ concrete QuestionBul of Question = CatBul ** open ResBul, Prelude in { IdetCN idet cn = { s = \\_,qform => let nf = case <idet.n, idet.nonEmpty> of { <Pl,True> => NFPlCount ; - _ => NF idet.n Indef + _ => NF idet.n Indef } - in idet.s ! cn.g ! qform ++ cn.s ! nf ; + in idet.s ! cn.g ! cn.anim ! qform ++ cn.s ! nf ; gn = gennum cn.g idet.n } ; IdetIP idet = { - s = \\_ => idet.s ! DNeut ; - gn = gennum DNeut idet.n + s = \\_ => idet.s ! Neut ! Inanimate ; + gn = gennum Neut idet.n } ; IdetQuant iquant num = { - s = \\g,qform => iquant.s ! gennum g num.n ! qform ++ - num.s ! dgenderSpecies g Indef RSubj ; + s = \\g,anim,qform => iquant.s ! gennum g num.n ! qform ++ + num.s ! dgenderSpecies g anim Indef RSubj ; n = num.n ; nonEmpty = num.nonEmpty } ; |