void list_unlink_all(list_t *list) {
link_t *link = NULL;
for (;;) {
link = link_prev_link(&(list->sentinel));
if (link == &(list->sentinel)) {
break;
}
link_unlink(link);
}
}
/* use this to send an unlink */
int ei_send_link_tmo(int fd, const erlang_pid *from, const erlang_pid *to,
unsigned ms)
{
return link_unlink(fd, from, to, ERL_LINK,ms);
}
/* use this to send an unlink */
int ei_send_link(int fd, const erlang_pid *from, const erlang_pid *to)
{
return link_unlink(fd, from, to, ERL_LINK,0);
}
