generalize infinitive_form

2026-06-28 20:36:29 -06:00 · 2021-04-27 10:06:12 +02:00
parent 85282418a7
commit 617cb25f1e
3 changed files with 7 additions and 8 deletions
@@ -88,7 +88,7 @@ lin
 --     EmbedVP   : VP -> SC ;               -- to go
    EmbedVP vp = {
        s = vp.prefix ++
-            (infinitive_form vp.verb vp.imienne Pos) ++ 
+            (infinitive_form vp.verb vp.imienne Pos MascPersSg) ++ 
            vp.sufix !Pos !MascPersSg 
    };