make specs in test more strict (more than they need to be)

ekoontz · Jul 30, 2024 · c12d3bd · c12d3bd
1 parent 0cc4acd
commit c12d3bd
Showing 1 changed file with 9 additions and 2 deletions.
diff --git a/test/menard/test/translate/en_es.cljc b/test/menard/test/translate/en_es.cljc
@@ -37,10 +37,17 @@
                 first)))))
 
 (def have-fun-spec {:comp {:agr {:gender :fem, :number :plur, :person :3rd}}
-                    :sem {:tense :present, :aspect :simple}
-                    :head {:canonical "divertirse"}
+                    :sem {:tense :present, :aspect :simple, :pred :have-fun}
                     :subcat []})
 
+(def sentence-specs
+  [{:rule "s" :head {:rule "vp"
+                     :head {:phrasal? false :canonical "divertirse"}
+                     :comp {:phrasal? false
+                            :sem {:pred :top}}}}
+
+   {:rule "s" :head {:phrasal? false :canonical "divertirse"}}])
+
 (deftest reflexive-roundtrip
   (let [input-sem (u/get-in have-fun-spec [:sem])]
     (->> (-> have-fun-spec es/generate