quakeforge/ruamoko/lib/AutoreleasePool.r
Bill Currie d6b10c99aa Most, if not all, of the fixes needed to get qwaq building.
This is pretty much just changing [] to * and moving [N] to the other side
of the variable name.
2011-02-07 22:16:16 +09:00

61 lines
943 B
R

#include "AutoreleasePool.h"
#include "Array+Private.h"
#include "Array.h"
#include "Array+Private.h"
@static Array *poolStack;
@implementation AutoreleasePool
- (id) init
{
if (!(self = [super init]))
return nil;
if (!poolStack)
poolStack = [[Array alloc] initWithCapacity: 1];
[poolStack addObjectNoRetain: self];
array = [Array new];
return self;
}
+ (void) addObject: (id)anObject
{
if (!poolStack || [poolStack count])
[[AutoreleasePool alloc] init];
[[poolStack lastObject] addObject: anObject];
}
- (void) addObject: (id)anObject
{
[array addObjectNoRetain: anObject];
}
- (id) retain
{
[self error: "Don't send -retain to an autorelease pool."];
}
- (id) autorelease
{
[self error: "Don't send -autorelease to an autorelease pool."];
}
- (void) dealloc
{
[array release];
[poolStack removeObjectNoRelease: self];
[super dealloc];
}
@end
void
ARP_FreeAllPools (void)
{
[poolStack removeAllObjects];
}