diff options
Diffstat (limited to 'tests/error.lisp')
| -rw-r--r-- | tests/error.lisp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/error.lisp b/tests/error.lisp index e0e0c4a..c774622 100644 --- a/tests/error.lisp +++ b/tests/error.lisp @@ -1,4 +1,5 @@ (assert-error (error "")) +(assert-error (let ((x (error ""))) #t)) (assert-error (let () (error "") #t)) (assert-error (if (error "") #t #t)) (assert-error (and (error ""))) |