Source
swank/core.clj:151
top
(defn add-cause-restarts [restarts thrown]
(loop [restarts restarts
cause (.getCause thrown)
level 1]
(if cause
(recur
(conj restarts (cause-restart-for cause level))
(.getCause cause)
(inc level))
restarts)))
Comments top
No comments for add-cause-restarts. Log in to add a comment.