(Hun) WIP: have_V2 adds possessive suffixes to its object NP

2020-04-24 08:18:53 +02:00
parent efcfb3cefa
commit 14bed283f4
6 changed files with 131 additions and 93 deletions
@@ -15,7 +15,7 @@ lin

 --2 Clauses missing object noun phrases
  -- : NP -> VPSlash -> ClSlash ;
-  SlashVP np vps = predVP np (vps ** {s = vps.s ! Indef ; obj = []}) ;
+  SlashVP np vps = predVP np (vps ** {s = vps.s ! Indef ; obj = \\_ => []}) ;
 {-
  -- : ClSlash -> Adv -> ClSlash ;     -- (whom) he sees today
  AdvSlash cls adv = cls ** insertAdv adv cls ;