有没有办法显示任何Dr.Retet Exception的信息消息？

Question

我目前有以下几行来尝试和测试部分代码。

(with-handlers ([exn:fail? (lambda (exn) 'Error)]) (car 17)) 

我想知道是否有任何方法可以将'错误修改为被捕获的异常的函数，以帮助打印出失败的原因？

我也一直在使用check-not-exn，但是该函数向控制台写入了太多的信息。

Answer 1

为什么不直接向控制台输出异常？

(with-handlers ([exn:fail? displayln]) (car 17)) 
=> #(struct:exn:fail:contract car: contract violation 
    expected: pair? 
    given: 17 #<continuation-mark-set>)