summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/clj/clojure/main.clj1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/clj/clojure/main.clj b/src/clj/clojure/main.clj
index f7810c17..d52123fe 100644
--- a/src/clj/clojure/main.clj
+++ b/src/clj/clojure/main.clj
@@ -106,6 +106,7 @@
el (aget (.getStackTrace ex) 0)]
(.println *err*
(str (-> ex class .getSimpleName)
+ " " (.getMessage ex) " "
(when-not (instance? clojure.lang.Compiler$CompilerException ex)
(str " " (stack-element-str el)))))))