summaryrefslogtreecommitdiff
path: root/Lisp/tests.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/tests.lisp
parent4157d85957b1b89fabf1a55f2896ec58ee6d99d6 (diff)
Replace all occurrences of OBJC-CLASS with OBJECTIVE-C-CLASS.
darcs-hash:1ba389d5a50343a134892bde78ba62e21842f684
Diffstat (limited to 'Lisp/tests.lisp')
-rw-r--r--Lisp/tests.lisp6
1 files changed, 3 insertions, 3 deletions
diff --git a/Lisp/tests.lisp b/Lisp/tests.lisp
index 1df4895..e362774 100644
--- a/Lisp/tests.lisp
+++ b/Lisp/tests.lisp
@@ -21,7 +21,7 @@
(:export #:run-all-tests)
(:shadowing-import-from #:objcl
#:struct #:union #:pointer #:oneway #:out #:in
- #:inout #:const #:parse-typespec #:objc-class
+ #:inout #:const #:parse-typespec #:objective-c-class
#:bit-field #:opaque #:bycopy #:byref
#:primitive-invoke))
(in-package #:mulk.objective-cl.tests)
@@ -89,7 +89,7 @@
((ensure-same (primitive-invoke (find-objc-class 'ns-object)
'self 'id)
(primitive-invoke (find-objc-class 'ns-object)
- 'class 'objc-class)))
+ 'class 'objective-c-class)))
((ensure-different (primitive-invoke (find-objc-class 'ns-object)
'self 'id)
(primitive-invoke (find-objc-class 'ns-number)
@@ -193,7 +193,7 @@
(:unsigned-long-long ())
(:float ())
(:double ())
- (id ()) (objc-class ()) (selector ())
+ (id ()) (objective-c-class ()) (selector ())
(:string ())
(:unknown ()))))
((ensure (let ((funky-spec (parse-typespec "{?=cC}")))