function | removed v1.9.183 | added v1.9.14 | Edit |
(coll-checker pred)
returns a predicate function that checks *coll-check-limit* items in a collection with pred
(defn coll-checker
[pred]
(let [check? #(valid? pred %)]
(fn [coll]
(c/or (nil? coll)
(c/and
(coll? coll)
(every? check? (take *coll-check-limit* coll)))))))