portable-condition-system
portable-condition-system copied to clipboard
Add test for handler-case and `:no-error`
There is no test for handler-case when :no-error is defined and an error is thrown, demonstrating that the :no-error handler is not executed. Example from the repl:
CL-USER> (let ((a nil))
(handler-case (error "foo")
(error () (setq a (cons "error" a)))
(:no-error () (setq a (cons "no error" a))))
a)
("error")
(Found in farolero#8)
There's also no test for if there are two or more :no-error branches.
Ping @phoe
Hey - no chance for me to work on this any soon, too much on my plate at the moment. I'll gladly accept a PR and then forward it to ANSI-TEST, but I'll need someone else to write the code.
No worries at all, this is very low importance, haha. I'll see if I can get something working!