From f06d54837b219bd2b92a0efcf7115506d8d5f0cf Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Fri, 28 May 2010 12:25:26 +0000
Subject: [PATCH] genitive s in Nor possessives ; some Nor words in Phrasebook

---
 src/norwegian/ExtraNor.gf | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/src/norwegian/ExtraNor.gf b/src/norwegian/ExtraNor.gf
index 6bcd7a19a..31f17b336 100644
--- a/src/norwegian/ExtraNor.gf
+++ b/src/norwegian/ExtraNor.gf
@@ -1,8 +1,11 @@
-concrete ExtraNor of ExtraNorAbs = ExtraScandNor ** open CommonScand, ResNor in {
+concrete ExtraNor of ExtraNorAbs = ExtraScandNor ** open CommonScand, ResNor, Prelude in {
 
   lin
     PossNP np pro = {
-      s = \\c => np.s ! NPNom ++ pro.s ! NPPoss (gennumAgr np.a) ; ---- c 
+      s = table {
+            NPPoss _ => np.s ! NPNom ++ pro.s ! NPPoss (gennumAgr np.a) ++ BIND ++ "s" ; ----
+            _ => np.s ! NPNom ++ pro.s ! NPPoss (gennumAgr np.a)
+            } ;
       a = np.a
       } ;
 }