2020-09-21 08:56:33 +00:00
|
|
|
(ns spartan.spec-test
|
|
|
|
|
(:require [clojure.test :as t :refer [deftest is]]))
|
|
|
|
|
|
2021-11-27 14:58:24 +00:00
|
|
|
(time (require '[spartan.spec]))
|
|
|
|
|
(require '[clojure.spec.alpha :as s])
|
2020-09-21 08:56:33 +00:00
|
|
|
|
|
|
|
|
(deftest spec-test
|
|
|
|
|
(time (s/explain (s/cat :i int? :s string?) [1 :foo]))
|
|
|
|
|
(is (time (s/conform (s/cat :i int? :s string?) [1 "foo"]))))
|
|
|
|
|
|
