gnustep/libs-base
0
0
Fork 0
mirror of https://github.com/gnustep/libs-base.git synced 2025-05-30 08:21:25 +00:00
Code Issues Projects Releases Packages Wiki Activity

Tidyups

Browse source 
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@17804 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
CaS 2003-10-08 16:26:59 +00:00
parent 2c18a5ea43
commit c4b038113d
4 changed files with 127 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

65
Source/NSDebug.m
View file

@ -62,6 +62,12 @@ static NSLock *uniqueLock;
static const char* _GSDebugAllocationList(BOOL difference);
static const char* _GSDebugAllocationListAll(void);
void _GSDebugAllocationAdd(Class c, id o);
void _GSDebugAllocationRemove(Class c, id o);
void (*_GSDebugAllocationAddFunc)(Class c, id o) = _GSDebugAllocationAdd;
void (*_GSDebugAllocationRemoveFunc)(Class c, id o) = _GSDebugAllocationRemove;
@interface GSDebugAlloc : NSObject
+ (void) initialize;
+ (void) _becomeThreaded: (NSNotification*)notification;
@ -92,6 +98,37 @@ static const char* _GSDebugAllocationListAll(void);
@end
/**
* This functions allows to set own function backcalls for debugging allocation
* of objects. Useful if you intend to write your own objectalloc.
*/
void
GSSetDebugAllocationFunctions(void (*newAddObjectFunc)(Class c, id o),
void (*newRemoveObjectFunc)(Class c, id o))
{
if (uniqueLock != nil)
{
[uniqueLock lock];
}
if (newAddObjectFunc && newRemoveObjectFunc)
{
_GSDebugAllocationAddFunc = newAddObjectFunc;
_GSDebugAllocationRemoveFunc = newRemoveObjectFunc;
}
else
{
// Back to default
_GSDebugAllocationAddFunc = _GSDebugAllocationAdd;
_GSDebugAllocationRemoveFunc = _GSDebugAllocationRemove;
}
if (uniqueLock != nil)
{
[uniqueLock unlock];
}
}
/**
* This function activates or deactivates object allocation debugging.<br />
* Returns the previous state.<br />
@ -189,6 +226,12 @@ GSDebugAllocationActiveRecordingObjects(Class c)
void
GSDebugAllocationAdd(Class c, id o)
{
(*_GSDebugAllocationAddFunc)(c,o);
}
void
_GSDebugAllocationAdd(Class c, id o)
{
if (debug_allocation)
{
@ -455,11 +498,15 @@ GSDebugAllocationList(BOOL changeFlag)
return "Debug allocation system is not active!\n";
}
if (uniqueLock != nil)
[uniqueLock lock];
{
[uniqueLock lock];
}
ans = _GSDebugAllocationList(changeFlag);
d = [NSData dataWithBytes: ans length: strlen(ans) + 1];
if (uniqueLock != nil)
[uniqueLock unlock];
{
[uniqueLock unlock];
}
return (const char*)[d bytes];
}
@ -555,11 +602,15 @@ GSDebugAllocationListAll()
return "Debug allocation system is not active!\n";
}
if (uniqueLock != nil)
[uniqueLock lock];
{
[uniqueLock lock];
}
ans = _GSDebugAllocationListAll();
d = [NSData dataWithBytes: ans length: strlen(ans)+1];
if (uniqueLock != nil)
[uniqueLock unlock];
{
[uniqueLock unlock];
}
return (const char*)[d bytes];
}
@ -619,6 +670,12 @@ _GSDebugAllocationListAll(void)
void
GSDebugAllocationRemove(Class c, id o)
{
(*_GSDebugAllocationRemoveFunc)(c,o);
}
void
_GSDebugAllocationRemove(Class c, id o)
{
if (debug_allocation)
{