 ;(filter-trace-string-seq (trace-string-seq (IllegalStateException. "asdfa")))
 
 (defn stringify [^Throwable tr]
-  (map 
-    (fn [ex]
-      (str [ (with-out-str (stacktrace/print-throwable ex))
-            (filter-trace-string-seq (trace-string-seq ex))]))
-    (expand-to-seq tr)))
-
+  (string/join ", " (map 
+                      (fn [ex]
+                        (logging/debug {:ex ex})
+                        (str [ (with-out-str (stacktrace/print-throwable ex))
+                              (filter-trace-string-seq (trace-string-seq ex))]))
+                      (expand-to-seq tr))))
+  
 ;(stringify (IllegalStateException. "A"))
 ;(stringify (java.sql.SQLException. "SQ"))


(ns cider-ci.utils.exception
  (:require 
    [clojure.stacktrace :as stacktrace]
    ))


(defn expand-to-seq [^Throwable tr]


(defn trace-string-seq [ex]
  (map (fn [e] (with-out-str (stacktrace/print-trace-element e)))
       (.getStackTrace ex)))

;(trace-string-seq (IllegalStateException. "asdfa"))

