From b9d45f2c6c342fd97a2e3b9a3c46bb8e6c599228 Mon Sep 17 00:00:00 2001 From: EuAndreh Date: Sun, 21 Dec 2025 20:18:00 -0300 Subject: tests/: Require datomic.api in tests and capture more things to stderr --- tests/integration.clj | 15 ++++++++------- tests/unit.clj | 15 ++++++++------- 2 files changed, 16 insertions(+), 14 deletions(-) diff --git a/tests/integration.clj b/tests/integration.clj index c47b501..790e053 100644 --- a/tests/integration.clj +++ b/tests/integration.clj @@ -1,5 +1,6 @@ (ns integration (:require [clojure.test :as t :refer [are deftest is testing]] + [datomic.api :as d] [dtmc]) (:gen-class)) @@ -7,10 +8,10 @@ (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))) + (binding [*out* *err*] + (let [{:keys [fail error] :as res} (t/run-tests 'integration) + status (if (zero? (+ fail error)) + 0 + 1)] + (prn res) + (System/exit status)))) diff --git a/tests/unit.clj b/tests/unit.clj index 7c2f589..d260d28 100644 --- a/tests/unit.clj +++ b/tests/unit.clj @@ -1,5 +1,6 @@ (ns unit (:require [clojure.test :as t :refer [are deftest is testing]] + [datomic.api :as d] [dtmc]) (:gen-class)) @@ -7,10 +8,10 @@ (defn -main [& _args] - (let [{:keys [fail error] :as res} (t/run-tests 'unit) - status (if (zero? (+ fail error)) - 0 - 1)] - (binding [*out* *err*] - (prn res)) - (System/exit status))) + (binding [*out* *err*] + (let [{:keys [fail error] :as res} (t/run-tests 'unit) + status (if (zero? (+ fail error)) + 0 + 1)] + (prn res) + (System/exit status)))) -- cgit v1.2.3