diff options
Diffstat (limited to 'src/testiere.lisp')
| -rw-r--r-- | src/testiere.lisp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/testiere.lisp b/src/testiere.lisp index df516e0..9c9e4bb 100644 --- a/src/testiere.lisp +++ b/src/testiere.lisp @@ -84,6 +84,9 @@ restarts to try when tests fail." ((list* :let (list* bindings) body) `(let ,bindings ,@(expand-test-forms body))) + ((list :do form) + form) + ((list :is form) `(assert ,form () "~s failed" ',form)) |