msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

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

Browse Source
This commit is contained in:
aarne
2008-12-02 08:49:04 +00:00
parent 683a776f83
commit f5c48cb49b
5 changed files with 12 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
next-lib/src/bulgarian/AllBul.gf
View File

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

6
next-lib/src/bulgarian/SymbolBul.gf
View File

@@ -1,4 +1,4 @@
--# -path=.:abstract:common --# -path=.:../abstract:../common:../slavic
concrete SymbolBul of Symbol = CatBul ** open Prelude, ResBul in { concrete SymbolBul of Symbol = CatBul ** open Prelude, ResBul in {
@@ -15,7 +15,9 @@ lin
a = agrP3 (gennum cn.g Sg) a = agrP3 (gennum cn.g Sg)
} ; } ;
CNSymbNP det cn xs = { 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) a = agrP3 (gennum cn.g det.n)
} ; } ;
CNNumNP cn i = { CNNumNP cn i = {

7
next-lib/src/german/NounGer.gf
View File

@@ -10,7 +10,7 @@ concrete NounGer of Noun = CatGer ** open ResGer, Prelude in {
} ; } ;
DetNP det = { DetNP det = {
s = \\c => det.s ! Neutr ! c ; ---- genders s = \\c => det.sp ! Neutr ! c ; ---- genders
a = agrP3 det.n ; a = agrP3 det.n ;
isPron = False isPron = False
} ; } ;
@@ -99,7 +99,10 @@ concrete NounGer of Noun = CatGer ** open ResGer, Prelude in {
Pl => \\_,_ => [] 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 a = Strong
} ; } ;

2
next-lib/src/russian/AllRus.gf
View File

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

2
next-lib/src/scandinavian/ExtraScand.gf
View File

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