summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2008-03-06 15:36:39 +0100
committerMatthias Benkard <code@mail.matthias.benkard.de>2008-03-06 15:36:39 +0100
commitcd731e66e6e8d758d114ebef0bb75a98a79230ee (patch)
tree399b78d46ee5318cc290bd34de21718d03829919
parente45e6f8f2202c8ade30ff36063da7d1f2ee52d38 (diff)
DECLARE local SUPER functions IGNORABLE.
darcs-hash:4d2d95b7fcfbed689cca92e90e864cd1e421f51a
-rw-r--r--Lisp/method-definition.lisp1
1 files changed, 1 insertions, 0 deletions
diff --git a/Lisp/method-definition.lisp b/Lisp/method-definition.lisp
index e69f5c1..14de1e9 100644
--- a/Lisp/method-definition.lisp
+++ b/Lisp/method-definition.lisp
@@ -222,6 +222,7 @@ __super__"
(find-objc-class ',(cadar lambda-list))
(or ,super-args-sym
(rest ,captured-args-sym)))))
+ (declare (ignorable (function super)))
,@body))))))))))