Update SCI: minor refactor for vararg recur (#1161)
This commit is contained in:
parent
c9f4b51369
commit
26cb47eac4
2 changed files with 10 additions and 2 deletions
2
sci
2
sci
|
|
@ -1 +1 @@
|
||||||
Subproject commit ddc1d11d6fa05afe9701fb7b7dac72cf9f8b34e9
|
Subproject commit c9ed929da361eab8fcefb7c216a135f321fad2c6
|
||||||
|
|
@ -2,7 +2,15 @@
|
||||||
(:require [babashka.core :refer [windows?]]
|
(:require [babashka.core :refer [windows?]]
|
||||||
[clojure.edn :as edn]
|
[clojure.edn :as edn]
|
||||||
[clojure.java.io :as io]
|
[clojure.java.io :as io]
|
||||||
[clojure.test :as t]))
|
[clojure.test :as t :refer [*report-counters*]]))
|
||||||
|
|
||||||
|
(defmethod clojure.test/report :end-test-var [_m]
|
||||||
|
(when-let [rc *report-counters*]
|
||||||
|
(let [{:keys [:fail :error]} @rc]
|
||||||
|
(when (and (= "true" (System/getenv "BABASHKA_FAIL_FAST"))
|
||||||
|
(or (pos? fail) (pos? error)))
|
||||||
|
(println "=== Failing fast")
|
||||||
|
(System/exit 1)))))
|
||||||
|
|
||||||
(def ns-args (set (map symbol *command-line-args*)))
|
(def ns-args (set (map symbol *command-line-args*)))
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue