diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-02-17 14:17:53 +0100 |
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-02-17 14:17:53 +0100 |
| commit | 938a371de94ecbe2b4ccc72670dbfc8a68b50aa1 (patch) | |
| tree | ef1da0dca61195ec46ecb7176ef78a040e9cbe6d /Objective-C | |
| parent | 061a969f39f50c365369e28b5182d547f81ee11d (diff) | |
Fix ENSURE-OBJECTIVE-C-CLASS-PAIR.
darcs-hash:cd2b28bb4e252e25afb6807e32d092fcbd9c0977
Diffstat (limited to 'Objective-C')
| -rw-r--r-- | Objective-C/libobjcl.h | 3 | ||||
| -rw-r--r-- | Objective-C/libobjcl.m | 11 |
2 files changed, 14 insertions, 0 deletions
diff --git a/Objective-C/libobjcl.h b/Objective-C/libobjcl.h index 758c831..89292f4 100644 --- a/Objective-C/libobjcl.h +++ b/Objective-C/libobjcl.h @@ -90,6 +90,9 @@ objcl_class_name (Class class); Class objcl_class_superclass (Class class); +MetaClass +objcl_class_metaclass (Class class); + const char * objcl_selector_name (SEL selector); diff --git a/Objective-C/libobjcl.m b/Objective-C/libobjcl.m index dc44c2d..c933e49 100644 --- a/Objective-C/libobjcl.m +++ b/Objective-C/libobjcl.m @@ -284,6 +284,17 @@ objcl_class_superclass (Class class) } +MetaClass +objcl_class_metaclass (Class class) +{ +#ifdef __NEXT_RUNTIME__ + return objc_getMetaClass (class); +#else + return class_get_meta_class (class); +#endif +} + + const char * objcl_selector_name (SEL selector) { |