generalize infVP to support negative VP in Romance

2021-04-27 13:18:27 +02:00
parent 617cb25f1e
commit adb1cffb75
10 changed files with 31 additions and 33 deletions
@@ -53,7 +53,7 @@ concrete IdiomPor of Idiom = CatPor **
      } ;

    ImpP3 np vp = {
-      s = "deixe" ++ (np.s ! Nom).ton ++ infVP vp np.a ;
+      s = "deixe" ++ (np.s ! Nom).ton ++ infVP vp RPos np.a ;
        } ;

    SelfAdvVP vp = variants {} ;