* :case-node is synthetic - no :form

clojure · Oct 25, 2024 · 45bc823 · 45bc823
1 parent fd5b19f
commit 45bc823
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/src/test/clojure/cljs/analyzer/specs.cljc b/src/test/clojure/cljs/analyzer/specs.cljc
@@ -118,9 +118,8 @@
       :req-un [::test ::nodes ::default])))
 
 (defmethod node :case-node [_]
-  (s/merge ::base
-    (s/keys
-      :req-un [::tests ::then])))
+  (s/keys
+    :req-un [::op ::env ::tests ::then]))
 
 (defmethod node :case-test [_]
   (s/merge ::base