New class methods.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@2814 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Adam Fedor 1998-06-24 17:22:34 +00:00
parent f8e6d9b280
commit 1a3d7230f0
2 changed files with 25 additions and 0 deletions

View file

@ -1,3 +1,9 @@
Fri Jun 19 13:37:37 1998 Adam Fedor <fedor@doc.com>
* NSObject (+isKindOfClass:): New method (patch from Bruce Ide
<greyfox@greyfox.org>).
(+isMemberOfClass): Likewise.
Tue Jun 16 09:48:18 1998 Adam Fedor <fedor@doc.com>
* src/NSProtocolChecker.m, src/include/NSProtocolChecker.h: New files.

View file

@ -356,6 +356,20 @@ extraRefCount (id anObject)
return (self == anObject);
}
+ (BOOL) isKindOfClass: (Class)aClass
{
Class class;
for (class = self;
class != Nil;
class = class_get_super_class (class))
{
if (class == aClass)
return YES;
}
return NO;
}
- (BOOL) isKindOfClass: (Class)aClass
{
Class class;
@ -370,6 +384,11 @@ extraRefCount (id anObject)
return NO;
}
+ (BOOL) isMemberOfClass: (Class)aClass
{
return self == aClass;
}
- (BOOL) isMemberOfClass: (Class)aClass
{
return self->isa==aClass;