add past tense irregular of "hurt"

ekoontz · Aug 3, 2024 · b28026b · b28026b
1 parent 71682ee
commit b28026b
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/resources/english/lexicon/verbs.edn b/resources/english/lexicon/verbs.edn
@@ -522,8 +522,11 @@
           :subcat {:2 {:cat :comp
                        :rule "comp2"}}}]
  "hug" [{:sem {:pred :hug}}]
- "hurt" [{:sem {:pred :hurt-oneself}
-          :reflexive? true}]
+ "hurt" (let [exceptions [{:infl :past-simple :surface "hurt"}
+                          {:infl :past-participle :surface "hurt"}]]
+          [{:sem {:pred :hurt-oneself}
+            :reflexive? true
+            :exceptions exceptions}])
  "increase" [{:sem {:pred :increase}}]
  "inhibit" [{ :sem {:pred :inhibit}}]
  "insure" [{ :sem {:pred :insure}}]