summaryrefslogtreecommitdiff
path: root/Lisp/class-definition.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'Lisp/class-definition.lisp')
-rw-r--r--Lisp/class-definition.lisp6
1 files changed, 0 insertions, 6 deletions
diff --git a/Lisp/class-definition.lisp b/Lisp/class-definition.lisp
index 55c69a4..467965d 100644
--- a/Lisp/class-definition.lisp
+++ b/Lisp/class-definition.lisp
@@ -376,12 +376,6 @@ __define-objective-c-method__"
"Tried to SLOT-MAKUNBOUND a foreign slot"))
-(defmethod c2mop:compute-slots ((class objective-c-class))
- ;; FIXME: Maybe add lots of foreign slots here whose presence the
- ;; Objective-C runtime tells us.
- (call-next-method))
-
-
(defun ensure-objective-c-class-pair (name
direct-superclasses
direct-slots