added slavic to some paths in Bulgaria, and Inanimate to one place in SymbolBul, to be able to compile them

This commit is contained in:
aarne
2008-12-02 08:49:04 +00:00
parent d0a129dabc
commit 90ca53d18a
5 changed files with 12 additions and 7 deletions

View File

@@ -1,4 +1,4 @@
--# -path=.:../abstract:../common:prelude
--# -path=.:../abstract:../common:../slavic
concrete AllBul of AllBulAbs =
LangBul,

View File

@@ -1,4 +1,4 @@
--# -path=.:abstract:common
--# -path=.:../abstract:../common:../slavic
concrete SymbolBul of Symbol = CatBul ** open Prelude, ResBul in {
@@ -15,7 +15,9 @@ lin
a = agrP3 (gennum cn.g Sg)
} ;
CNSymbNP det cn xs = {
s = \\c => det.s ! False ! cn.g ! RSubj ++ cn.s ! NF det.n Indef ++ xs.s ;
s = \\c =>
det.s ! False ! cn.g ! Inanimate ! RSubj ++ ---- AR 2/12: Inanimate
cn.s ! NF det.n Indef ++ xs.s ;
a = agrP3 (gennum cn.g det.n)
} ;
CNNumNP cn i = {

View File

@@ -10,7 +10,7 @@ concrete NounGer of Noun = CatGer ** open ResGer, Prelude in {
} ;
DetNP det = {
s = \\c => det.s ! Neutr ! c ; ---- genders
s = \\c => det.sp ! Neutr ! c ; ---- genders
a = agrP3 det.n ;
isPron = False
} ;
@@ -99,7 +99,10 @@ concrete NounGer of Noun = CatGer ** open ResGer, Prelude in {
Pl => \\_,_ => []
}
} ;
sp = \\_,g,c => "ein" + pronEnding ! GSg g ! c ; ---- plural ; einer
sp = table {
Sg => \\g,c => "ein" + pronEnding ! GSg g ! c ;
Pl => \\_ => caselist "einige" "einige" "einigen" "einiger"
} ;
a = Strong
} ;

View File

@@ -1,4 +1,4 @@
--# -path=.:../abstract:../common:prelude
--# -path=.:../abstract:../common:../slavic
concrete AllRus of AllRusAbs =
LangRus,

View File

@@ -2,7 +2,7 @@ incomplete concrete ExtraScand of ExtraScandAbs = CatScand **
open CommonScand,Coordination,ResScand in {
lin
GenNP np = {
s = \\n,_,_,g => np.s ! NPPoss (gennum g n) ;
s,sp = \\n,_,_,g => np.s ! NPPoss (gennum g n) ;
det = DDef Indef
} ;