Improve panic message reporting
This commit is contained in:
parent
9cd4fccfb9
commit
f7809d5ddf
|
@ -36,7 +36,7 @@
|
||||||
|
|
||||||
(def panic! {:name "panic!"
|
(def panic! {:name "panic!"
|
||||||
::data/type ::data/clj
|
::data/type ::data/clj
|
||||||
:body (fn [& args] (throw (ex-info "Ludus panicked!" {:args args})))})
|
:body (fn [& args] (throw (ex-info (apply str (interpose " " args)) {})))})
|
||||||
|
|
||||||
(def print- {:name "print"
|
(def print- {:name "print"
|
||||||
::data/type ::data/clj
|
::data/type ::data/clj
|
||||||
|
|
Loading…
Reference in New Issue
Block a user