pike.git/
src/
multiset.c
Branch:
Tag:
Non-build tags
All tags
No tags
1996-12-05
1996-12-05 02:32:36 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
4d58590927679e51343e73c456abf7a3fc821bab (
10
lines) (+
7
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
bugfixes
Rev: src/builtin_functions.c:1.17
Rev: src/multiset.c:1.3
53:
free_array(l->ind);
-
if(l->prev) l->prev->next = l->next;
-
if(l->next) l->next->prev = l->prev;
-
if(first_multiset
==
l)
first_multiset =
0
;
+
if(l->prev)
+
l->prev->next = l->next;
+
else
+
first_multiset = l
->next
;
-
+
if(l->next) l->next->prev = l->prev;
+
free((char *)l); GC_FREE(); }