diff options
-rw-r--r-- | Lisp/method-definition.lisp | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/Lisp/method-definition.lisp b/Lisp/method-definition.lisp index f057244..0d94401 100644 --- a/Lisp/method-definition.lisp +++ b/Lisp/method-definition.lisp @@ -419,10 +419,6 @@ __define-objective-c-generic-function__. ,(typespec->c-type return-type) ,cffi-lambda-list (declare (ignorable ,(cadr arg-symbols))) - #+(or) (progn ;for debugging - (print '(,(generic-function-name gf) - ,@arguments)) - (format t "~&~A" (list ,@arg-symbols))) (unwind-protect (,(if (member (typespec-primary-type return-type) '(:id :class :selector)) |