luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

spec

Browse source
This commit is contained in:
Michiel Borkent 2022-09-28 12:41:33 +02:00
parent d0d6d7c0f2
commit 2249f661a8
2 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
feature-spec-alpha/babashka/impl/spec.clj
View file

@ -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

2
src/babashka/impl/clojure/spec/alpha.clj
View file

@ -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