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

fix in PositA in Slovenian

Browse Source
This commit is contained in:
krasimir
2016-03-25 06:23:23 +00:00
parent ec6758d0e4
commit 39c7865e67
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/src/slovenian/AdjectiveSlv.gf
View File

@@ -3,9 +3,9 @@ concrete AdjectiveSlv of Adjective = CatSlv ** open ResSlv in {
lin lin
PositA a = { PositA a = {
s = \\spec,g,c,n => s = \\spec,g,c,n =>
case <spec,c> of { case <spec,g,n,c> of {
<Def,Nom> => a.s ! APositDefNom ; <Def,Masc,Sg,Nom> => a.s ! APositDefNom ;
<Def,Acc> => a.s ! APositDefAcc ; <Def,Masc,Sg,Acc> => a.s ! APositDefAcc ;
_ => a.s ! APosit g n c _ => a.s ! APosit g n c
} }
} ; } ;