From 507c9bd8238f634f4131620909125948b4f3693e Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Wed, 12 Mar 2008 15:48:19 +0100
Subject: Minor cleanups.

darcs-hash:397e13965e72e0107e762dbf715564a29b9d092c
---
 Lisp/class-definition.lisp | 6 ------
 1 file changed, 6 deletions(-)

(limited to 'Lisp/class-definition.lisp')

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
-- 
cgit v1.2.3