typos in the Slovenian grammar

This commit is contained in:
krasimir
2016-12-08 11:47:48 +00:00
parent b75bca14de
commit 74e4f58b9c
3 changed files with 6 additions and 7 deletions

View File

@@ -13,8 +13,7 @@ concrete AdjectiveSlv of Adjective = CatSlv ** open ResSlv in {
UseComparA a = { UseComparA a = {
s = \\spec,g,c,n => s = \\spec,g,c,n =>
case <spec,g,n,c> of { case <spec,g,n,c> of {
<Def,AMasc _,Sg,Nom> => a.s ! AComparDefNom ; <Def,AMasc _,Sg,Acc> => a.s ! AComparDefAcc ;
<Def,AMasc _,Sg,Acc> => a.s ! AComparDefNom ;
_ => a.s ! ACompar (agender2gender g) n c _ => a.s ! ACompar (agender2gender g) n c
} }
} ; } ;

View File

@@ -120,7 +120,7 @@ oper
Gen => table {Sg=>gensg; Dl=>gendl; Pl=>genpl}; Gen => table {Sg=>gensg; Dl=>gendl; Pl=>genpl};
Dat => table {Sg=>datsg; Dl=>datdl; Pl=>datpl}; Dat => table {Sg=>datsg; Dl=>datdl; Pl=>datpl};
Acc => table {Sg=>accsg; Dl=>accdl; Pl=>accpl}; Acc => table {Sg=>accsg; Dl=>accdl; Pl=>accpl};
Loc => table {Sg=>locsg; Dl=>nomdl; Pl=>locpl}; Loc => table {Sg=>locsg; Dl=>locdl; Pl=>locpl};
Instr => table {Sg=>instrsg; Dl=>instrdl; Pl=>instrpl} Instr => table {Sg=>instrsg; Dl=>instrdl; Pl=>instrpl}
}; };
g = g g = g
@@ -216,7 +216,7 @@ oper
(imp + "va") (imp+"mo") imp (imp +"ta") (imp + "te"); --Imper P1 Dl Pl + P2 Sg Dl Pl (imp + "va") (imp+"mo") imp (imp +"ta") (imp + "te"); --Imper P1 Dl Pl + P2 Sg Dl Pl
worstV : (_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> V = worstV : (_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> V =
\inf,sup,partsgm,partdlm,partplm,partsgf,partdlf,partplf,partsgn,partdln,partpln,pres1sg,pres2sg,pres3sg,pres1dl,pres2dl,pres3dl,pres1pl,pres2pl,pres3pl,imp1dl,imp1pl,imp2sg,imp2dl,imp2pl -> lin V { \inf,sup,partsgm,partdlm,partplm,partsgf,partdlf,partplf,partsgn,partdln,partpln,pres1sg,pres2sg,pres3sg,pres1dl,pres2dl,pres3dl,pres1pl,pres2pl,pres3pl,imp1pl,imp1sg,imp2sg,imp2dl,imp2pl -> lin V {
s = table { s = table {
VInf => inf; VInf => inf;
VSup => sup; VSup => sup;
@@ -238,7 +238,7 @@ oper
VPres Pl P1 => pres1pl; VPres Pl P1 => pres1pl;
VPres Pl P2 => pres2pl; VPres Pl P2 => pres2pl;
VPres Pl P3 => pres3pl; VPres Pl P3 => pres3pl;
VImper1Sg => imp1dl; VImper1Sg => imp1sg;
VImper1Dl => imp1pl; VImper1Dl => imp1pl;
VImper2 Sg => imp2sg; VImper2 Sg => imp2sg;
VImper2 Dl => imp2dl; VImper2 Dl => imp2dl;

View File

@@ -28,8 +28,8 @@ param
| APositDefNom | APositDefNom
| APositIndefAcc | APositIndefAcc
| APositDefAcc | APositDefAcc
| AComparDefNom | AComparDefAcc
| ASuperlDefNom ; | ASuperlDefAcc ;
oper oper
Agr = {g : Gender; n : Number; p : Person} ; Agr = {g : Gender; n : Number; p : Person} ;