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

Merge pull request #325 from bulbulistan/master

Browse Source 
Corrections to ResSlo.gf, mostly pronouns and numerals.
This commit is contained in:
Aarne Ranta
2020-05-05 10:19:32 +02:00
committed by GitHub
parent 2cc2bc22c6 01efa368c3
commit aa1b97a1b4
2 changed files with 27 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Setup.bat
View File

@@ -7,7 +7,8 @@ REM ---
REM Modules to compile for each language REM Modules to compile for each language
REM TODO read from languages.csv REM TODO read from languages.csv
set langs=Afr Amh Ara Eus Bul Cat Chi Dan Dut Eng Est Fin Fre Grc Gre Heb Hin Ger Ice Ina Ita Jpn Lat Lav Mlt Mon Nep Nor Nno Pes Pol Por Pnb Ron Rus Snd Spa Swe Tha Tur Urd set langs=Slo
REM set langs=Afr Amh Ara Eus Bul Cat Chi Dan Dut Eng Est Fin Fre Grc Gre Heb Hin Ger Ice Ina Ita Jpn Lat Lav Mlt Mon Nep Nor Nno Pes Pol Por Pnb Ron Rus Snd Spa Swe Tha Tur Urd
set modules_langs=All Symbol Compatibility set modules_langs=All Symbol Compatibility
set modules_api=Try Symbolic set modules_api=Try Symbolic

41
src/slovak/ResSlo.gf
View File

@@ -739,10 +739,15 @@ adjFormsAdjective : AdjForms -> Adjective = \afs -> {
} ; } ;
Ag (Masc _) Sg P3 => { Ag (Masc _) Sg P3 => {
nom = "on" ; nom = "on" ;
gen,acc = "jeho" ; ---- + other forms gen,acc = "jeho" ;
cgen,cacc = "ho" ; cgen,cacc = "ho" ;
pgen,pacc = "neho" ; ---- + other forms pgen,pacc = "neho" ;
---- pgen = "ňho"; ---- bind, only with prepositions "do", "u"
---- pgen = "ň"; ---- bind, only with preposition "do", "u"
dat = "jemu" ; dat = "jemu" ;
---- pacc = "eň" ; ---- bind, only with preposition "cez"
---- pacc = "ňho" ; ---- bind, only with prepositions "na", "pre", "za"
---- pacc = "ň" ; ---- bind, only with preposition "na", "pre", "za"
cdat = "mu" ; cdat = "mu" ;
pdat = "nemu" ; pdat = "nemu" ;
loc = "ňom" ; loc = "ňom" ;
@@ -757,12 +762,16 @@ adjFormsAdjective : AdjForms -> Adjective = \afs -> {
} ; } ;
Ag Neutr Sg P3 => { Ag Neutr Sg P3 => {
nom = "ono" ; nom = "ono" ;
gen = "jeho" ; gen, acc = "jeho" ;
cgen,cacc = "ho" ; cgen,cacc = "ho" ;
pgen = "neho" ; pgen = "neho" ;
dat = "jemu" ; ---- pgen = "ňho"; ---- bind, only with prepositions "do", "u"
acc = "je" ; ---- pgen = "ň"; ---- bind, only with preposition "do", "u"
pacc = "eň" ; ---- bind? dat = "jemu" ;
---- pacc = "eň" ; ---- bind, only with preposition "cez"
---- pacc = "ňho" ; ---- bind, only with prepositions "na", "pre", "za"
---- pacc = "ň" ; ---- bind, only with preposition "na", "pre", "za"
pacc = "jeho"; ---- doublecheck
cdat = "mu" ; cdat = "mu" ;
pdat = "nemu" ; pdat = "nemu" ;
loc = "ňom" ; loc = "ňom" ;
@@ -844,7 +853,7 @@ oper
} ; } ;
mkDemPronForms : Str -> DemPronForms = \jedn -> { mkDemPronForms : Str -> DemPronForms = \jedn -> {
msnom = jedn + "y" ; msnom = jedn + "y" ; -- should be "jeden"
fsnom = jedn + "a" ; fsnom = jedn + "a" ;
nsnom = jedn + "o" ; nsnom = jedn + "o" ;
msgen = jedn + "ého" ; msgen = jedn + "ého" ;
@@ -855,7 +864,7 @@ oper
msins = jedn + "ým" ; msins = jedn + "ým" ;
fsins = jedn + "ou" ; fsins = jedn + "ou" ;
ampnom = jedn + "i" ; ampnom = jedn + "i" ;
fpnom = jedn + "é" ; ---- ? fpnom = jedn + "y" ;
pgen = jedn + "ých" ; pgen = jedn + "ých" ;
pdat = jedn + "ým" ; pdat = jedn + "ým" ;
pins = jedn + "ými" ; pins = jedn + "ými" ;
@@ -887,7 +896,7 @@ oper
-- interrogatives -- interrogatives
kdoForms : Case => Str = table { ktoForms : Case => Str = table {
Nom => "kto" ; Nom => "kto" ;
Gen | Acc => "koho" ; Gen | Acc => "koho" ;
Dat => "komu" ; Dat => "komu" ;
@@ -898,7 +907,7 @@ oper
coForms : Case => Str = table { coForms : Case => Str = table {
Nom|Acc => "čo" ; Nom|Acc => "čo" ;
Gen => "čoho" ; Gen => "čoho" ;
Dat => "čemu" ; Dat => "čomu" ;
Loc => "čom" ; Loc => "čom" ;
Ins => "čím" Ins => "čím"
} ; } ;
@@ -958,12 +967,12 @@ oper
fourNumeral : Determiner = fourNumeral : Determiner =
let forms = { let forms = {
---- amsnom = "štiraja" ; ---- amsnom = "štyria" ;
msnom, fsnom, nsnom, fsacc = "štiri" ; ---- amsacc = "štiroch" msnom, fsnom, nsnom, fsacc = "štyri" ; ---- amsacc = "štyroch"
msgen, fsgen = "štiroch" ; msgen, fsgen = "štyroch" ;
msdat = "štirom" ; msdat = "štyrom" ;
msloc = "štiroch" ; msloc = "štyroch" ;
msins,fsins = "štiromi" ; msins,fsins = "štyrmi" ;
} }
in numeralFormsDeterminer forms Num2_4 ; in numeralFormsDeterminer forms Num2_4 ;