(Pes) Fix bug with negation in haveVerb and have_V2

2026-06-26 11:36:27 -06:00 · 2019-03-21 20:24:07 +01:00
parent 76c1c2453e
commit 70b8d2e5e3
2 changed files with 2 additions and 6 deletions
@@ -312,6 +312,7 @@ oper

  haveVerb : Verb = haveRegV ** {s = table {
    ImpPrefix _ => [] ;
+    VAor Neg agr => imperfectSuffix agr (addN "دار") ;
    vf          => haveRegV.s ! vf }
  } where { haveRegV = mkVerb "داشتن" "دار" } ;