1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
(ns integration (:require [clojure.test :as t :refer [are deftest is testing]] [dtmc]) (:gen-class)) (defn -main [& _args] (let [{:keys [fail error] :as res} (t/run-tests 'integration) status (if (zero? (+ fail error)) 0 1)] (binding [*out* *err*] (prn res)) (System/exit status)))