146 lines
2.1 KiB
R
146 lines
2.1 KiB
R
#include "List.h"
|
|
|
|
struct list_bucket_s = {
|
|
struct list_bucket_s [] next;
|
|
struct list_bucket_s [][] prev;
|
|
id obj;
|
|
};
|
|
typedef struct list_bucket_s list_bucket_t;
|
|
|
|
@implementation List
|
|
|
|
- (id) init
|
|
{
|
|
count = 0;
|
|
head = NIL;
|
|
tail = &head;
|
|
return self;
|
|
}
|
|
|
|
- (void) free
|
|
{
|
|
local list_bucket_t [] e, t = NIL; //FIXME t uninitialized
|
|
|
|
for (e = head; e; e = t) {
|
|
t = e.next;
|
|
[e.obj free];
|
|
obj_free (e);
|
|
}
|
|
[super free];
|
|
}
|
|
|
|
- (id) getItemAt: (integer) index
|
|
{
|
|
local list_bucket_t [] e;
|
|
if (index < 0 || index >= count)
|
|
return NIL;
|
|
for (e = head; e && index; index--)
|
|
e = e.next;
|
|
return e.obj;
|
|
}
|
|
|
|
-(id) head
|
|
{
|
|
if (!head)
|
|
return NIL;
|
|
return head.obj;
|
|
}
|
|
|
|
-(id) tail
|
|
{
|
|
local list_bucket_t [] e = (list_bucket_t []) tail;
|
|
if (!e)
|
|
return NIL;
|
|
return e.obj;
|
|
}
|
|
|
|
-(void) addItemAtHead: (id) item
|
|
{
|
|
local list_bucket_t [] e = obj_malloc (@sizeof (list_bucket_t));
|
|
e.obj = item;
|
|
e.next = head;
|
|
e.prev = &head;
|
|
if (head)
|
|
head.prev = &e.next;
|
|
head = e;
|
|
}
|
|
|
|
-(void) addItemAtTail: (id) item
|
|
{
|
|
local list_bucket_t [] e = obj_malloc (@sizeof (list_bucket_t));
|
|
e.obj = item;
|
|
e.next = NIL;
|
|
e.prev = tail;
|
|
tail[0] = e;
|
|
tail = &e.next;
|
|
}
|
|
|
|
- (id) removeItem: (id) item
|
|
{
|
|
local list_bucket_t [] e;
|
|
|
|
for (e = head; e; e = e.next) {
|
|
if (e.obj == item) {
|
|
e.prev[0] = e.next;
|
|
if (e.next)
|
|
e.next.prev = e.prev;
|
|
obj_free (e);
|
|
return item;
|
|
}
|
|
}
|
|
return NIL;
|
|
}
|
|
|
|
- (id) removeItemAtHead
|
|
{
|
|
local list_bucket_t [] e;
|
|
local id obj;
|
|
|
|
if (!count)
|
|
return NIL;
|
|
e = head;
|
|
obj = e.obj;
|
|
e.prev[0] = e.next;
|
|
if (e.next)
|
|
e.next.prev = e.prev;
|
|
obj_free (e);
|
|
return obj;
|
|
}
|
|
|
|
- (id) removeItemAtTail
|
|
{
|
|
local list_bucket_t [] e;
|
|
local id obj;
|
|
|
|
if (!count)
|
|
return NIL;
|
|
e = (list_bucket_t []) tail;
|
|
obj = e.obj;
|
|
e.prev[0] = e.next;
|
|
if (e.next)
|
|
e.next.prev = e.prev;
|
|
obj_free (e);
|
|
return obj;
|
|
}
|
|
|
|
- (integer) count
|
|
{
|
|
return count;
|
|
}
|
|
|
|
-(void)makeObjectsPerformSelector:(SEL)selector
|
|
{
|
|
local list_bucket_t [] e;
|
|
for (e = head; e; e = e.next)
|
|
[e.obj performSelector:selector];
|
|
}
|
|
|
|
-(void)makeObjectsPerformSelector:(SEL)selector withObject:(id)arg
|
|
{
|
|
local list_bucket_t [] e;
|
|
for (e = head; e; e = e.next)
|
|
[e.obj performSelector:selector withObject:arg];
|
|
}
|
|
|
|
@end
|