Improved exception messages for methods non implemented etc - print out

if we are an instance or a class object


git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@12332 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
nico 2002-01-31 15:41:47 +00:00
parent d632f43c61
commit cc9f20c222

View file

@ -833,8 +833,10 @@ static BOOL double_release_check_enabled = NO;
- (void) doesNotRecognizeSelector: (SEL)aSelector
{
[NSException raise: NSInvalidArgumentException
format: @"%s does not recognize %s",
object_get_class_name(self), sel_get_name(aSelector)];
format: @"%s(%s) does not recognize %s",
object_get_class_name(self),
GSObjCIsInstance(self) ? "instance" : "class",
sel_get_name(aSelector)];
}
- (retval_t) forward:(SEL)aSel :(arglist_t)argFrame
@ -1246,15 +1248,19 @@ static BOOL double_release_check_enabled = NO;
{
[NSException
raise: NSGenericException
format: @"method %s not implemented in %s", sel_get_name(aSel), object_get_class_name(self)];
format: @"method %s not implemented in %s(%s)", sel_get_name(aSel),
object_get_class_name(self),
GSObjCIsInstance(self) ? "instance" : "class"];
return nil;
}
- (id) doesNotRecognize: (SEL)aSel
{
[NSException raise: NSGenericException
format: @"%s does not recognize %s",
object_get_class_name(self), sel_get_name(aSel)];
format: @"%s(%s) does not recognize %s",
object_get_class_name(self),
GSObjCIsInstance(self) ? "instance" : "class",
sel_get_name(aSel)];
return nil;
}
@ -2364,8 +2370,10 @@ GSSetValue(NSObject *self, NSString *key, id val, SEL sel,
- (id) subclassResponsibility: (SEL)aSel
{
[NSException raise: NSGenericException
format: @"subclass %s should override %s", object_get_class_name(self),
sel_get_name(aSel)];
format: @"subclass %s(%s) should override %s",
object_get_class_name(self),
GSObjCIsInstance(self) ? "instance" : "class",
sel_get_name(aSel)];
return nil;
}
@ -2373,8 +2381,10 @@ GSSetValue(NSObject *self, NSString *key, id val, SEL sel,
{
[NSException
raise: NSGenericException
format: @"%s should not implement %s",
object_get_class_name(self), sel_get_name(aSel)];
format: @"%s(%s) should not implement %s",
object_get_class_name(self),
GSObjCIsInstance(self) ? "instance" : "class",
sel_get_name(aSel)];
return nil;
}