summaryrefslogtreecommitdiff
path: root/Lisp/class-definition.lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2008-02-04 15:32:37 +0100
committerMatthias Benkard <code@mail.matthias.benkard.de>2008-02-04 15:32:37 +0100
commit4700986fb98b7b0685aa8d351d39cf14b67f6cf3 (patch)
tree7774aeea3ad10c69d8b0bd84c4b3853f58e2630a /Lisp/class-definition.lisp
parent94383388101170742989e188e020f91b81a2ddfe (diff)
Make ID the root of the Objective-C class hierarchy.
darcs-hash:7d709124e74a1782fecaf2ee75a0a229783fec8b
Diffstat (limited to 'Lisp/class-definition.lisp')
-rw-r--r--Lisp/class-definition.lisp4
1 files changed, 4 insertions, 0 deletions
diff --git a/Lisp/class-definition.lisp b/Lisp/class-definition.lisp
index e331d83..cac6041 100644
--- a/Lisp/class-definition.lisp
+++ b/Lisp/class-definition.lisp
@@ -45,6 +45,10 @@
t)
(defmethod c2mop:validate-superclass ((class objective-c-class)
+ (superclass standard-class))
+ t)
+
+(defmethod c2mop:validate-superclass ((class objective-c-class)
(superclass objective-c-class))
t)