void iter_float(t_iter *x, double f) { iter_resize(x,1); x->i_ac = 1; atom_setfloat(x->i_av,f); outlet_float(x->i_ob.o_outlet,f); }
void iter_int(t_iter *x, long n) { iter_resize(x,1); x->i_ac = 1; atom_setlong(x->i_av,n); outlet_int(x->i_ob.o_outlet,n); }
void iter_float(t_iter *x, double f) { iter_resize(x,1); x->i_ac = 1; SETFLOAT(x->i_av,f); outlet_float(x->i_ob.o_outlet,f); }
void iter_int(t_iter *x, long n) { iter_resize(x,1); x->i_ac = 1; SETLONG(x->i_av,n); outlet_int(x->i_ob.o_outlet,n); }
void iter_list(t_iter *x, Symbol *s, short ac, t_atom *av) { short i; iter_resize(x,ac); for (i=0; i < ac; i++,av++) { x->i_av[i] = *av; if (atom_gettype(av)==A_LONG) outlet_int(x->i_ob.o_outlet,atom_getlong(av)); else if (atom_gettype(av)==A_FLOAT) outlet_float(x->i_ob.o_outlet,atom_getfloat(av)); else if (atom_gettype(av)==A_SYM) outlet_anything(x->i_ob.o_outlet,atom_getsym(av),0,0); } x->i_ac = ac; }
void iter_list(t_iter *x, Symbol *s, short ac, Atom *av) { short i; iter_resize(x,ac); for (i=0; i < ac; i++,av++) { x->i_av[i] = *av; if (av->a_type==A_LONG) outlet_int(x->i_ob.o_outlet,av->a_w.w_long); else if (av->a_type==A_FLOAT) outlet_float(x->i_ob.o_outlet,av->a_w.w_float); else if (av->a_type==A_SYM) outlet_anything(x->i_ob.o_outlet,av->a_w.w_sym,0,0); } x->i_ac = ac; }
void iter_anything(t_iter *x, Symbol *s, short ac, t_atom *av) { short i; iter_resize(x,ac+1); outlet_anything(x->i_ob.o_outlet,s,0,0); x->i_av[0].a_w.w_sym = s; x->i_av[0].a_type = A_SYM; for (i=0; i < ac; i++,av++) { x->i_av[i+1] = *av; if (atom_gettype(av)==A_LONG) outlet_int(x->i_ob.o_outlet,atom_getlong(av)); else if (atom_gettype(av)==A_FLOAT) outlet_float(x->i_ob.o_outlet,atom_getfloat(av)); else if (atom_gettype(av)==A_SYM) outlet_anything(x->i_ob.o_outlet,atom_getsym(av),0,0); } x->i_ac = ac+1; }