improve diagnostic log

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/sqlclient/trunk@39138 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Richard Frith-MacDonald 2015-11-04 07:38:50 +00:00
parent bd4f1bcf96
commit 182fa71ff3

View file

@ -912,15 +912,30 @@
static Class cls = Nil;
unsigned long rc;
unsigned long ac;
unsigned long uc;
int index;
if (Nil == cls)
{
cls = [NSAutoreleasePool class];
}
rc = (unsigned long)[o retainCount];
ac = (unsigned long)[cls autoreleaseCountForObject: o];
return [NSString stringWithFormat: @" refs %ld (%lu-%lu)",
rc - ac, rc, ac];
[_lock lock];
uc = 0;
for (index = 0; index < _max; index++)
{
if (o == _items[index].c)
{
uc = _items[index].u;
break;
}
}
[self _unlock];
return [NSString stringWithFormat:
@" provided %ld times (retained:%lu - autoreleased:%lu)",
uc, rc, ac];
}
#endif
return @"";