From 42b66d7277f00abfef54cd76debc79e6fb27dc8c Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Mon, 22 Dec 2014 09:03:28 +0000
Subject: [PATCH] genitive variant of PossNP in TranslateSwe; overgenerating
 just like in Eng, because it generates a CN and can hence take determiners

---
 lib/src/translator/TranslateSwe.gf | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

diff --git a/lib/src/translator/TranslateSwe.gf b/lib/src/translator/TranslateSwe.gf
index 0ee444b7d..9656df5db 100644
--- a/lib/src/translator/TranslateSwe.gf
+++ b/lib/src/translator/TranslateSwe.gf
@@ -2,7 +2,7 @@
 
 concrete TranslateSwe of Translate = 
   TenseSwe,
-  NounSwe - [PPartNP],
+  NounSwe - [PPartNP,PossNP],
   AdjectiveSwe,
   NumeralSwe,
   SymbolSwe [
@@ -31,9 +31,18 @@ concrete TranslateSwe of Translate =
     ],
 
   DictionarySwe ** 
-open MorphoSwe, ResSwe, ParadigmsSwe, SyntaxSwe, CommonScand, (E = ExtraSwe), Prelude in {
+open MorphoSwe, ResSwe, ParadigmsSwe, SyntaxSwe, CommonScand, (E = ExtraSwe), (G = GrammarSwe), Prelude in {
 
 flags
   literal=Symb ;
 
+-- exceptions
+
+lin 
+  PossNP cn np =   -- min frus stora bil
+     G.PossNP cn np 
+   | {s = \\n,d,c => np.s ! NPPoss (gennum (ngen2gen cn.g) n) Nom ++ cn.s ! n ! DDef Indef ! c ; g = cn.g ; isMod = True} ---- overgenerating
+   ;
+
+
 }