Tracking object creation and removal with permanent EOGlobalID

#import <Foundation/Foundation.h>
#import <EOControl/EOControl.h>
 
 
@interface PermanentGlobalID : EOTemporaryGlobalID
@end
 
@implementation PermanentGlobalID : EOTemporaryGlobalID
 
- (BOOL) isTemporary
{
   return( NO);
}
 
@end
 
 
int main (int argc, const char * argv[])
{
   NSAutoreleasePool   *pool;
   EOEditingContext    *context;
   NSString            *obj;
   NSString            *obj2;
   EOGlobalID          *gid;
 
   pool = [NSAutoreleasePool new];
 
   context = [[EOEditingContext new] autorelease];
 
   obj = @"VfL Bochum 1848";
   gid = [[PermanentGlobalID new] autorelease];
 
   NSLog( @"A) %d insertedObjects, %d registeredObjects, %d deletedObjects",
         [[context insertedObjects] count], [[context registeredObjects] count],  [[context deletedObjects] count]);
 
   [context recordObject:obj
                globalID:gid];
 
   NSLog( @"B) %d insertedObjects, %d registeredObjects, %d deletedObjects",
         [[context insertedObjects] count], [[context registeredObjects] count],  [[context deletedObjects] count]);
   NSLog( @"C) GlobalIDForObject %@ = %@", obj, [context globalIDForObject:obj]);
 
   obj2 = @"Mulle kybernetiK";
   [context insertObject:obj2];
 
   NSLog( @"D) %d insertedObjects, %d registeredObjects, %d deletedObjects",
         [[context insertedObjects] count], [[context registeredObjects] count],  [[context deletedObjects] count]);
   NSLog( @"E) GlobalIDForObject %@ = %@", obj2, [context globalIDForObject:obj2]);
 
   [context deleteObject:obj2];
   NSLog( @"F) %d insertedObjects, %d registeredObjects, %d deletedObjects",
         [[context insertedObjects] count], [[context registeredObjects] count],  [[context deletedObjects] count]);
 
   [context deleteObject:obj];
   NSLog( @"G) %d insertedObjects, %d registeredObjects, %d deletedObjects",
         [[context insertedObjects] count], [[context registeredObjects] count],  [[context deletedObjects] count]);
 
   [pool release];
   return( 0);
}