bug fix in VerbGer: added fields of CN to CompCN

GrammaticalFramework · Jun 9, 2021 · a3701d1 · a3701d1
1 parent b6f37ab
commit a3701d1
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/german/VerbGer.gf b/src/german/VerbGer.gf
@@ -144,10 +144,10 @@ concrete VerbGer of Verb = CatGer ** open Prelude, ResGer, Coordination in {
     CompAdv a = {s = \\_ => a.s ; ext = []} ;
 
     CompCN cn = {s = \\a => case numberAgr a of {
-        Sg => "ein" + pronEnding ! GSg cn.g ! Nom ++ cn.s ! Strong ! Sg ! Nom ;
-        Pl => cn.s ! Strong ! Pl ! Nom
+        Sg => "ein" + pronEnding ! GSg cn.g ! Nom ++ cn.s ! Strong ! Sg ! Nom ++ cn.rc ! Sg ; ---
+        Pl => cn.s ! Strong ! Pl ! Nom ++ cn.rc ! Pl ---
         } ;
-		ext = []
+		ext = cn.adv ++ cn.ext
       } ;
 
     AdvVP vp adv = insertAdv adv.s vp ;