| Here's a version of details that avoids double-quoting the error message, if it is already a string: (xdef 'details (lambda (c)
(let ((m (exn-message c)))
(if (string? m)
m
(write-to-string m)))))
arc> (on-err details (fn () (/ 1 0)))
"/: division by zero"
arc>
|