CLJS-2119: s/form for s/& is qualified with clojure.spec.alpha

Author: athos

src/main/cljs/cljs/spec/alpha.cljs

@@ -1100,7 +1100,7 @@
       (case op
         ::accept nil
         nil p
-        ::amp (list* 'clojure.spec.alpha/& (op-describe p1) forms)
+        ::amp (list* 'cljs.spec.alpha/& (op-describe p1) forms)
         ::pcat (if rep+
                  (list `+ rep+)
                  (cons `cat (mapcat vector (c/or (seq ks) (repeat :_)) forms)))

src/test/cljs/cljs/spec_test.cljs

@@ -211,7 +211,7 @@
 
       andre nil nil nil
       andre [] nil nil
-      andre :k ::s/invalid '[{:pred (clojure.spec.alpha/& (cljs.spec.alpha/* cljs.core/keyword?) cljs.spec-test/even-count?), :val :k}]
+      andre :k ::s/invalid '[{:pred (cljs.spec.alpha/& (cljs.spec.alpha/* cljs.core/keyword?) cljs.spec-test/even-count?), :val :k}]
       andre [:k] ::s/invalid '[{:pred cljs.spec-test/even-count?, :val [:k]}]
       andre [:j :k] [:j :k] nil