summaryrefslogtreecommitdiff
path: root/Lisp/data-types.lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2008-02-02 23:26:55 +0100
committerMatthias Benkard <code@mail.matthias.benkard.de>2008-02-02 23:26:55 +0100
commit3d0e2eda9285b91a998b86cb72c806c2aa5d789e (patch)
tree05faddca66b1b032d9f2f6464c984a5e0bd68f6e /Lisp/data-types.lisp
parent4157d85957b1b89fabf1a55f2896ec58ee6d99d6 (diff)
Replace all occurrences of OBJC-CLASS with OBJECTIVE-C-CLASS.
darcs-hash:1ba389d5a50343a134892bde78ba62e21842f684
Diffstat (limited to 'Lisp/data-types.lisp')
-rw-r--r--Lisp/data-types.lisp6
1 files changed, 3 insertions, 3 deletions
diff --git a/Lisp/data-types.lisp b/Lisp/data-types.lisp
index bc66bf3..1f33af6 100644
--- a/Lisp/data-types.lisp
+++ b/Lisp/data-types.lisp
@@ -89,12 +89,12 @@ a suitable class method instead as you would in Objective-C.
__invoke__, __invoke-by-name__, __exception__"))
-(defclass objc-class (c-pointer-wrapper) ()
- (:documentation ""))
+(defclass objective-c-class (standard-class c-pointer-wrapper)
+ ())
(defclass objc-meta-class (c-pointer-wrapper)
- ((meta-class-for-class :type (or null id objc-class)
+ ((meta-class-for-class :type (or null id objective-c-class)
:initarg :meta-class-for-class
:reader meta-class-for-class))
(:documentation ""))