fixed definiteness of Dan Def+Num (de tre konger)

2018-02-08 17:37:53 +01:00
parent 3bda85cae1
commit 346f089946
1 changed files with 4 additions and 1 deletions
--- a/src/scandinavian/NounScand.gf
+++ b/src/scandinavian/NounScand.gf
@@ -81,7 +81,10 @@ incomplete concrete NounScand of Noun =
      sp = \\b,g => quant.sp ! num.n ! b ! md b ! g ++ 
                    num.s ! g ;
      n = num.n ;
-      det = quant.det
+      det = case <quant.det,num.isDet> of {
+        <DDef Def,True> => DDef detDef ;
+        <d,_> => d
+        }
      } ;

    DetNP det =