diff options
Diffstat (limited to 'Lisp/class-definition.lisp')
| -rw-r--r-- | Lisp/class-definition.lisp | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/Lisp/class-definition.lisp b/Lisp/class-definition.lisp index ea77362..75481d0 100644 --- a/Lisp/class-definition.lisp +++ b/Lisp/class-definition.lisp @@ -119,6 +119,26 @@ wrapped-foreign-class) (call-next-method)) +(defmethod initialize-instance ((class objective-c-meta-class) + &key documentation + name + plist + direct-superclasses + direct-slots + direct-default-initargs + pointer) + (call-next-method)) + +(defmethod reinitialize-instance ((class objective-c-meta-class) + &key documentation + name + plist + direct-superclasses + direct-slots + direct-default-initargs + pointer) + (call-next-method)) + #+(or) (defmethod c2mop:compute-effective-slot-definition ((class objective-c-class) slot-name |