summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Lisp/method-definition.lisp4
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))