         ::s/invalid))))
 
 (defn -string->keyword [x]
-  (if (string? x)
+  (if (clojure.core/string? x)
     (keyword x)))
 
 (defn -string->boolean [x]
-  (if (string? x)
+  (if (clojure.core/string? x)
     (cond
       (= "true" x) true
       (= "false" x) false
       :else ::s/invalid)))
 
 (defn -string->uuid [x]
-  (if (string? x)
+  (if (clojure.core/string? x)
     (try
       #?(:clj  (UUID/fromString x)
          :cljs (uuid x))

;; types
;;

(def integer? (dynamic-conformer clojure.core/integer?))
(def int? (dynamic-conformer clojure.core/int?))
(def double? (dynamic-conformer double-like?))

      :cljs number?) x))

(defn -string->int [x]
  (if (clojure.core/string? x)
    (try
      #?(:clj  (Integer/parseInt x)
         :cljs (js/parseInt x 10))
