 
 (declare report)
 
-(defn- run-test [project encoding opts]
+(defn- run-test
+  "Given a project name, an encoding and user provided options, run
+  tests against this project."
+  [project encoding opts]
   (println "testing" project "...")
   (let [command (str "../" project "/bin/roundtrip")]
     (if (= encoding :msgpack)

                        :count (count transit-exemplars)
                        :encoding encoding})}])))

(defn verify-impl-encoding [command encoding opts]
  (assert (contains? extension encoding)
          (str "encoding must be on of" (keys extension)))
  (let [proc (start-process command encoding)

(ns transit.verify
  "Provides tools for testing all transit implementations at
  once. Tests each implementaion with several sources of data:
  exemplar files, problem EDN data, problem transit data and generated
  data. In addition, it can capture comparative timing results.

  From the REPL, the main entry point is `verify-all` which takes an
