From e65cadbd0db3f8b6f1701b35ca6427fca4e0dfcb Mon Sep 17 00:00:00 2001
From: krasimir <krasimir@chalmers.se>
Date: Fri, 25 Mar 2016 06:23:23 +0000
Subject: [PATCH] fix in PositA in Slovenian

---
 src/slovenian/AdjectiveSlv.gf | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/slovenian/AdjectiveSlv.gf b/src/slovenian/AdjectiveSlv.gf
index 34060deb1..1a379c669 100644
--- a/src/slovenian/AdjectiveSlv.gf
+++ b/src/slovenian/AdjectiveSlv.gf
@@ -3,10 +3,10 @@ concrete AdjectiveSlv of Adjective = CatSlv ** open ResSlv in {
   lin
     PositA a = {
       s = \\spec,g,c,n => 
-        case <spec,c> of {
-          <Def,Nom> => a.s ! APositDefNom ;
-          <Def,Acc> => a.s ! APositDefAcc ;
-          _         => a.s ! APosit g n c
+        case <spec,g,n,c> of {
+          <Def,Masc,Sg,Nom> => a.s ! APositDefNom ;
+          <Def,Masc,Sg,Acc> => a.s ! APositDefAcc ;
+          _                 => a.s ! APosit g n c
         }
       } ;