diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-02-02 23:26:55 +0100 | 
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-02-02 23:26:55 +0100 | 
| commit | 3d0e2eda9285b91a998b86cb72c806c2aa5d789e (patch) | |
| tree | 05faddca66b1b032d9f2f6464c984a5e0bd68f6e /Lisp/tests.lisp | |
| parent | 4157d85957b1b89fabf1a55f2896ec58ee6d99d6 (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.lisp | 6 | 
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}"))) | 
