aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorcolin <colin@cicadas.surf>2023-09-10 07:24:34 -0700
committercolin <colin@cicadas.surf>2023-09-10 07:24:34 -0700
commit6be426978c86bc7a061cc66c8fda738be2e59a16 (patch)
tree1c7c007707f6976a45785cd56134cf2448c0d6fc /src
parenta5615cba16837146573230a453632bd2f88ac1b1 (diff)
Added :do
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))