* :case-node is synthetic - no :form

Author: swannodette

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