aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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"))