       (umd/flush-module "npm-publish/parinfer.js"))
   :done)
 
-(defn extract-test [name-]
+(defn extract-test
+  "Extracts the test case data from a Markdown doc, and dumps it into JSON.
+  (allows people porting Parinfer to have easy access to test cases)"
+  [name-]
   (let [in-file (str cases-path "/" name- ".md")
         out-file (str cases-path "/" name- ".json")
         in-str (slurp in-file)

            [parinfer.test :refer [cases-path]]
            [parinfer.parse-md-tests :refer [parse-test-cases]]))

(defn release []
  (-> (cljs/init-state)
      (cljs/find-resources-in-classpath)
      (umd/create-module

         :public-path "target/cljs-tests"})
      (cljs/find-resources-in-classpath)))

(defn run-all-tests
  "Build and run all ClojureScript tests under Node.
  Ensures that the exit code reflects test results."
  []
  (-> (test-setup)
      (node/execute-all-tests-and-exit!))
  :done)
