summaryrefslogtreecommitdiff
path: root/Lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2008-03-12 15:26:00 +0100
committerMatthias Benkard <code@mail.matthias.benkard.de>2008-03-12 15:26:00 +0100
commit614297426c173788c3d6d0c12a425d45d834e9ee (patch)
treeede0f4ef8bdacbb82227292b5f46a7829350bd0b /Lisp
parentba7223d79163795d1b1f29698254ec628dc01538 (diff)
Pass class names instead of classes to ENSURE-GENERIC-FUNCTION-USING-CLASS.
darcs-hash:3309224dd0ddc7ea67830b7ff1a04b2cf49ecd43
Diffstat (limited to 'Lisp')
-rw-r--r--Lisp/method-definition.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/Lisp/method-definition.lisp b/Lisp/method-definition.lisp
index 2d42843..ad3b45a 100644
--- a/Lisp/method-definition.lisp
+++ b/Lisp/method-definition.lisp
@@ -239,9 +239,9 @@ __super__"
nil
',real-name
:generic-function-class
- (find-class 'objective-c-generic-function)
+ 'objective-c-generic-function
:method-class
- (find-class 'objective-c-method))))
+ 'objective-c-method)))
(defmethod ,real-name
argtypes-start ,@type-specifiers argtypes-end
,@qualifiers