forked from GitHub/gf-core
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:
@@ -1,4 +1,4 @@
|
||||
--# -path=.:../abstract:../common:prelude
|
||||
--# -path=.:../abstract:../common:../slavic
|
||||
|
||||
concrete AllBul of AllBulAbs =
|
||||
LangBul,
|
||||
|
||||
@@ -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 = {
|
||||
|
||||
@@ -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
|
||||
} ;
|
||||
|
||||
|
||||
@@ -1,4 +1,4 @@
|
||||
--# -path=.:../abstract:../common:prelude
|
||||
--# -path=.:../abstract:../common:../slavic
|
||||
|
||||
concrete AllRus of AllRusAbs =
|
||||
LangRus,
|
||||
|
||||
@@ -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
|
||||
} ;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user