--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/symlist.c Mon Feb 16 18:04:44 2004 +0100
@@ -0,0 +1,95 @@
+/*
+ * libtu/symlist.c
+ *
+ * Copyright (c) Tuomo Valkonen 1999-2004.
+ *
+ * You may distribute and modify this library under the terms of either
+ * the Clarified Artistic License or the GNU LGPL, version 2.1 or later.
+ */
+
+#include "obj.h"
+#include "symlist.h"
+#include "types.h"
+#include "dlist.h"
+#include "misc.h"
+
+
+static void free_node(Symlist **symlist, Symlist *node)
+{
+ UNLINK_ITEM(*symlist, node, next, prev);
+ free(node);
+}
+
+
+bool symlist_insert(Symlist **symlist, void *symbol)
+{
+ Symlist *node;
+
+ if(symbol==NULL)
+ return FALSE;
+
+ node=ALLOC(Symlist);
+
+ if(node==NULL)
+ return FALSE;
+
+ node->symbol=symbol;
+
+ LINK_ITEM_FIRST(*symlist, node, next, prev);
+
+ return TRUE;
+}
+
+
+void symlist_remove(Symlist **symlist, void *symbol)
+{
+ Symlist *node=*symlist;
+
+ while(node!=NULL){
+ if(node->symbol==symbol){
+ free_node(symlist, node);
+ return;
+ }
+ node=node->next;
+ }
+}
+
+
+void symlist_clear(Symlist **symlist)
+{
+ while(*symlist!=NULL)
+ free_node(symlist, *symlist);
+}
+
+
+/* Warning: not thread-safe */
+
+
+static Symlist *iter_next=NULL;
+
+
+void *symlist_init_iter(Symlist *symlist)
+{
+ if(symlist==NULL){
+ iter_next=NULL;
+ return NULL;
+ }
+
+ iter_next=symlist->next;
+ return symlist->symbol;
+}
+
+
+void *symlist_iter()
+{
+ Symlist *ret;
+
+ if(iter_next==NULL)
+ return NULL;
+
+ ret=iter_next;
+ iter_next=iter_next->next;
+
+ return ret->symbol;
+}
+