aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/testiere.lisp3
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))