aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorColin Okay <okay@toyful.space>2021-09-03 08:06:39 -0500
committerColin Okay <okay@toyful.space>2021-09-03 08:06:39 -0500
commit6990d42faca35cab8d832d55e35dc3f128eb94b5 (patch)
treefa13c6852c541436e6ba109ac86f5861a9f64cdd
parentd42f764fecc92697020b079db2819a500e5f619d (diff)
demethod+ not implemented
-rw-r--r--testiere.lisp6
1 files changed, 1 insertions, 5 deletions
diff --git a/testiere.lisp b/testiere.lisp
index c7b8934..1f1d0ec 100644
--- a/testiere.lisp
+++ b/testiere.lisp
@@ -84,10 +84,6 @@
(defmacro defmethod+ (name &rest args)
"Like regular DEFMETHOD, but with embedded unit tests. If those
test would fail, the method fails to be defined. "
- (destructuring-bind (qual-and-lambda-list body) (parse-defmethod args)
- (destructuring-bind (tests function-body) (extract-tests name body)
- `(progn
- (defmethod ,name ,@qual-and-lambda-list ,@function-body)
- ,@tests))))
+ (ERROR "Not yet implemented"))