X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=retrieval%2Fd1_read.c;h=d4a14bde58623a95a22e20cc9fae17bd4e61b2b6;hp=1740c21494fe295caacd0f8c58d5b223fe0a33c9;hb=7eb2f0de616840d9a340519eac4c271820cd1248;hpb=44c7c8b6a256ed36e88ea3fbe4d6e88c202b1e23

diff --git a/retrieval/d1_read.c b/retrieval/d1_read.c
index 1740c21..d4a14bd 100644
--- a/retrieval/d1_read.c
+++ b/retrieval/d1_read.c
@@ -4,7 +4,10 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: d1_read.c,v $
- * Revision 1.14  1997-05-14 06:54:04  adam
+ * Revision 1.15  1997-09-05 09:50:57  adam
+ * Removed global data1_tabpath - uses data1_get_tabpath() instead.
+ *
+ * Revision 1.14  1997/05/14 06:54:04  adam
  * C++ support.
  *
  * Revision 1.13  1996/10/29 13:35:38  adam
@@ -101,7 +104,7 @@
 #include <log.h>
 #include <data1.h>
 
-char *data1_tabpath = 0; /* global path for tables */
+static char *data1_tabpath = 0; /* global path for tables */
 
 void data1_set_tabpath(const char *p)
 {
@@ -122,9 +125,6 @@ const char *data1_get_tabpath (void)
     return data1_tabpath;
 }
 
-#if 0
-static data1_node *freelist = 0;
-#endif
 
 /*
  * get the tag which is the immediate parent of this node (this may mean
@@ -142,29 +142,13 @@ data1_node *data1_mk_node(NMEM m)
 {
     data1_node *r;
 
-#if 0
-    if ((r = freelist))
-	freelist = r->next;
-    else
-	if (!(r = xmalloc(sizeof(*r))))
-	    abort();
-#else
     r = nmem_malloc(m, sizeof(*r));
-#endif
     r->next = r->child = r->last_child = r->parent = 0;
     r->num_children = 0;
     r->destroy = 0;
     return r;
 }
 
-#if 0
-static void fr_node(data1_node *n)
-{
-    n->next = freelist;
-    freelist = n;
-}
-#endif
-
 void data1_free_tree(data1_node *t)
 {
     data1_node *p = t->child, *pn;
@@ -177,9 +161,6 @@ void data1_free_tree(data1_node *t)
     }
     if (t->destroy)
 	(*t->destroy)(t);
-#if 0
-    fr_node(t);
-#endif
 }
 
 /*
@@ -413,9 +394,6 @@ data1_node *data1_read_node(char **buf, data1_node *parent, int *line,
     {
 	int len = 0;
 	char *data = *buf, *pp = *buf;
-#if 0
-	data1_node *partag = get_parent_tag(parent);
-#endif
 
         if (!parent)      /* abort if abstract syntax is undefined */
             return 0;