luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

clojure.test: print SCI stacktrace [skip ci]

Browse source
This commit is contained in:
Michiel Borkent 2023-01-02 20:40:08 +01:00
parent 1e06b07d0f
commit fc2762bdd2
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/babashka/impl/clojure/test.clj
View file

@ -372,7 +372,9 @@
(print " actual: ") (print " actual: ")
(let [actual (:actual m)] (let [actual (:actual m)]
(if (instance? Throwable actual) (if (instance? Throwable actual)
(stack/print-cause-trace actual @stack-trace-depth) (if-let [st (sci/stacktrace actual)]
(run! println (sci/format-stacktrace st))
(stack/print-cause-trace actual @stack-trace-depth))
(prn actual))))) (prn actual)))))
(defmethod report-impl :summary [m] (defmethod report-impl :summary [m]