static void buddy_check(t_buddy *x) { t_buddy_proxy **p = (t_buddy_proxy **)x->x_proxies; int i = x->x_nslots; while (i--) if (!(*p++)->p_selector) return; p = (t_buddy_proxy **)x->x_proxies; i = x->x_nslots; while (i--) { t_symbol *s = p[i]->p_selector; if (s == &s_bang) outlet_bang(x->x_outs[i]); else if (s == &s_float) outlet_float(x->x_outs[i], p[i]->p_float); else if (s == &s_symbol && p[i]->p_symbol) outlet_symbol(x->x_outs[i], p[i]->p_symbol); else if (s == &s_pointer) { /* LATER */ } else if (s == &s_list) outlet_list(x->x_outs[i], s, p[i]->p_natoms, p[i]->p_message); else if (s) outlet_anything(x->x_outs[i], s, p[i]->p_natoms, p[i]->p_message); } buddy_clear(x); }
void Tclear() { buddy_clear(T_mem_struct); }