diff --git a/feature-spec-alpha/babashka/impl/spec.clj b/feature-spec-alpha/babashka/impl/spec.clj index c51f1cf7..c2ff211b 100644 --- a/feature-spec-alpha/babashka/impl/spec.clj +++ b/feature-spec-alpha/babashka/impl/spec.clj @@ -84,7 +84,9 @@ 'keys* (copy-var s/keys* sns) 'with-gen (copy-var s/with-gen sns) 'check-asserts (copy-var s/check-asserts sns) - '*explain-out* s/explain-out-var}) + '*explain-out* s/explain-out-var + 'multi-spec (copy-var s/multi-spec sns) + 'multi-spec-impl (copy-var s/multi-spec-impl sns)}) #_:clj-kondo/ignore (def test-namespace diff --git a/src/babashka/impl/clojure/spec/alpha.clj b/src/babashka/impl/clojure/spec/alpha.clj index ba1ac2d8..17264721 100644 --- a/src/babashka/impl/clojure/spec/alpha.clj +++ b/src/babashka/impl/clojure/spec/alpha.clj @@ -418,7 +418,7 @@ though those values are not evident in the spec. " [mm retag] - `(multi-spec-impl '~(res mm) (var ~mm) ~retag)) + `(clojure.spec.alpha/multi-spec-impl '~(res mm) (var ~mm) ~retag)) (defmacro keys "Creates and returns a map validating spec. :req and :opt are both