allow plural PN

2026-06-29 04:46:30 -06:00 · 2021-02-17 09:42:40 +01:00
parent 24bc84627b
commit 2bb3630f00
5 changed files with 12 additions and 16 deletions
@@ -42,7 +42,7 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
                       RObj c => linCase c Pos ++ pn.s; 
                       _      => pn.s
                     } ;
-                 gn = GSg pn.g ;
+                 gn = pn.gn ;
                 p = NounP3 Pos
               } ;
    UsePron p = p ;