Quick Schema Benchmark

core.clj

(ns schemaspeed.core
  (require [schema.core :as s]))

(def S {:name s/Str
        :age s/Int
        :things [s/Int]})

(def xs
  (doall (repeat 100000
                 {:name "somename"
                  :age (rand-int 100)
                  :things (take 5 (repeatedly
                                   #(rand-int 100)))})))

;;; Q. Is there a difference between validating records individually, vs as a batch?
(time (do
        (s/check [S] xs)
        :ok))
;=> "Elapsed time: 955.266 msecs"

(time (doseq [x xs]
        (s/check S x)
        :ok))
;=> "Elapsed time: 3533.174 msecs"

;;; A. This quick benchmark says, yes. About 3-4x.