diff options
-rw-r--r-- | testiere.lisp | 6 |
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")) |