123456789101112131415161718 |
- (ns build
- (:refer-clojure :exclude [test])
- (:require [clojure.tools.build.api :as b]
- [clojure.tools.deps :as t]))
- (defn test "Run all the tests."
- [_opts]
- (println "\nRunning tests...")
- (let [basis (b/create-basis {:aliases [:test]})
- combined (t/combine-aliases basis [:test])
- cmds (b/java-command
- {:basis basis
- :java-opts (:jvm-opts combined)
- :main 'clojure.main
- :main-args ["-m" "cognitect.test-runner"]})
- {:keys [exit]} (b/process cmds)]
- (when-not (zero? exit)
- (throw (ex-info "Tests failed" {})))))
|