diff options
author | colin <colin@cicadas.surf> | 2023-09-10 07:24:34 -0700 |
---|---|---|
committer | colin <colin@cicadas.surf> | 2023-09-10 07:24:34 -0700 |
commit | 6be426978c86bc7a061cc66c8fda738be2e59a16 (patch) | |
tree | 1c7c007707f6976a45785cd56134cf2448c0d6fc /src | |
parent | a5615cba16837146573230a453632bd2f88ac1b1 (diff) |
Added :do
Diffstat (limited to 'src')
-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)) |