latest specs alpha

Author: ikitommi

CHANGELOG.md

@@ -1,3 +1,10 @@
+# UNRELEASED
+
+```clj
+[org.clojure/spec.alpha "0.2.168"] is available but we use "0.1.143"
+[org.clojure/clojurescript "1.10.339"] is available but we use "1.10.329"
+```
+
 # 0.7.1 (25.6.2018)
 
 * Not setting a Swagger response model doesn't emit empty schema `{}`.

project.clj

@@ -11,7 +11,7 @@
           :source-uri "https://github.com/metosin/spec-tools/{version}/{filepath}#L{line}"
           :metadata {:doc/format :markdown}}
 
-  :dependencies [[org.clojure/spec.alpha "0.1.143"]
+  :dependencies [[org.clojure/spec.alpha "0.2.168"]
                  [com.fasterxml.jackson.core/jackson-databind "2.9.6"]]
 
   :profiles {:dev {:plugins [[jonase/eastwood "0.2.6"]
@@ -23,7 +23,7 @@
                    :jvm-opts ^:replace ["-server"]
                    ;:global-vars {*warn-on-reflection* true}
                    :dependencies [[org.clojure/clojure "1.9.0"]
-                                  [org.clojure/clojurescript "1.10.329"]
+                                  [org.clojure/clojurescript "1.10.339"]
                                   [criterium "0.4.4"]
                                   [prismatic/schema "1.1.9"]
                                   [org.clojure/test.check "0.9.0"]

src/spec_tools/impl.cljc

@@ -114,7 +114,7 @@
 (defn nilable-spec? [spec]
   (let [form (and spec (s/form spec))]
     (boolean
-      (if-not (= form ::s/unknown)
+      (if (seq? form)
         (some-> form
                 seq
                 first

test/cljc/spec_tools/visitor_all_test.cljc

@@ -118,9 +118,10 @@
 ;; tests
 ;;
 
-(deftest CLJ-2152-test
-  (testing "this should fail when the issues is fixed"
-    (is (not (= `(s/& int?) (s/form (s/& int?)))))))
+#?(:cljs
+   (deftest CLJ-2152-test
+     (testing "this should fail when the issues is fixed"
+       (is (not (= `(s/& int?) (s/form (s/& int?))))))))
 
 (deftest nested-regexp-test
   (is (= #{::p1 ::p2 ::p3}
@@ -134,7 +135,7 @@
   (testing "visitor visits all specs but not s/& & s/keys* inner specs"
     (is (= #{::p1 ::p2 ::p3 ::p4 ::p5 ::p6 ::p7 ::p8 ::p9 ::p10
              ::p11 ::p12 ::p13 ::p14 ::p15 ::p16 ::p17 ::p18 ::p19 ::p20
-             ::p21 ::p22 ::p23 ::p24 #_::p25 ::p26 ::p27 #_::p28 #_::p29 #_::p30
+             ::p21 ::p22 ::p23 ::p24 #?(:clj ::p25) ::p26 ::p27 #_::p28 #_::p29 #_::p30
              #_::p31 #_::p32 #_:p33 ::p34
              ::pred ::keys ::keys2 ::keys3
              ::or ::and ::merge ::every ::every-kv ::coll-of ::map-of