[agd-cvs] server/src list.c,1.4,1.5

[Peep P. <so...@us...>]

Update of /cvsroot/agd/server/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3175

Modified Files:
	list.c 
Log Message:
Temporary hack.

Index: list.c
===================================================================
RCS file: /cvsroot/agd/server/src/list.c,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** list.c	12 Mar 2004 08:40:10 -0000	1.4
--- list.c	15 Mar 2004 18:48:45 -0000	1.5
***************
*** 34,40 ****
  void list_remove(list_t *l, void *data)
  {
! 	list_t *p, *prev;
  
  	prev = NULL;
  	p = l;
  	while(1) {
--- 34,41 ----
  void list_remove(list_t *l, void *data)
  {
! 	list_t *saved_l, *p, *prev;
  
  	prev = NULL;
+ 	saved_l = l;
  	p = l;
  	while(1) {
***************
*** 45,49 ****
  				prev->next = p->next;
  			}
! 			xfree(p); /* ? */
  			return;
  		}
--- 46,51 ----
  				prev->next = p->next;
  			}
! /*			if(p != saved_l)
! 				xfree(p);*/ /* Never free the root element. */
  			return;
  		}