Added some compatibility methods

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@13883 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
CaS 2002-06-14 08:59:28 +00:00
parent e763d56b5e
commit e44f133476
2 changed files with 24 additions and 0 deletions

View file

@ -4,6 +4,8 @@
* Tools/gsdoc.m: Adjust path to headers. Add warning about * Tools/gsdoc.m: Adjust path to headers. Add warning about
deprecation. deprecation.
Patch by e.sammer <eric@linuxstep.org> Patch by e.sammer <eric@linuxstep.org>
* Source/NSObject.m: Added some compatibility methods in a
categpory of Object.
2002-06-13 Richard Frith-Macdonald <rfm@gnu.org> 2002-06-13 Richard Frith-Macdonald <rfm@gnu.org>

View file

@ -1918,13 +1918,21 @@ _fastMallocBuffer(unsigned size)
* Stuff for compatibility with 'Object' derived classes. * Stuff for compatibility with 'Object' derived classes.
*/ */
@interface Object (NSObjectCompat) @interface Object (NSObjectCompat)
+ (NSString*) description;
+ (void) release; + (void) release;
+ (id) retain; + (id) retain;
- (NSString*) className;
- (NSString*) description;
- (void) release; - (void) release;
- (BOOL) respondsToSelector: (SEL)aSel;
- (id) retain; - (id) retain;
@end @end
@implementation Object (NSObjectCompat) @implementation Object (NSObjectCompat)
+ (NSString*) description
{
return NSStringFromClass(self);
}
+ (void) release + (void) release
{ {
return; return;
@ -1933,10 +1941,24 @@ _fastMallocBuffer(unsigned size)
{ {
return self; return self;
} }
- (NSString*) className
{
return NSStringFromClass([self class]);
}
- (NSString*) description
{
return [NSString stringWithFormat: @"<%s: %lx>",
object_get_class_name(self), (unsigned long)self];
}
- (void) release - (void) release
{ {
return; return;
} }
- (BOOL) respondsToSelector: (SEL)aSelector
{
/* Object implements -respondsTo: */
return [self respondsTo: aSelector];
}
- (id) retain - (id) retain
{ {
return self; return self;