diff options
Diffstat (limited to 'src/tab_const.c')
| -rw-r--r-- | src/tab_const.c | 21 |
1 files changed, 11 insertions, 10 deletions
diff --git a/src/tab_const.c b/src/tab_const.c index 2ab8fe3..461f950 100644 --- a/src/tab_const.c +++ b/src/tab_const.c @@ -1,21 +1,22 @@ /* For information on usage and redistribution, and for a DISCLAIMER OF ALL * WARRANTIES, see the file, "LICENSE.txt," in this distribution. -iem_tab written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2006 */ +iem_tab written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2009 */ #include "m_pd.h" #include "iemlib.h" #include "iem_tab.h" /* -------------------------- tab_const ------------------------------ */ +/* x_beg_mem_dst[i] = c */ typedef struct _tab_const { t_object x_obj; int x_size_dst; int x_offset_dst; - t_float x_const; - t_float *x_beg_mem_dst; + t_float x_const; + iemarray_t *x_beg_mem_dst; t_symbol *x_sym_dst; } t_tab_const; @@ -30,7 +31,7 @@ static void tab_const_bang(t_tab_const *x) { int i, n; int ok_dst; - t_float *vec_dst; + iemarray_t *vec_dst; ok_dst = iem_tab_check_arrays(gensym("tab_const"), x->x_sym_dst, &x->x_beg_mem_dst, &x->x_size_dst, 0); @@ -43,7 +44,7 @@ static void tab_const_bang(t_tab_const *x) t_garray *a; for(i=0; i<n; i++) - vec_dst[i] = 0.0f; + iemarray_setfloat(vec_dst, i, 0.0f); outlet_bang(x->x_obj.ob_outlet); a = (t_garray *)pd_findbyclass(x->x_sym_dst, garray_class); garray_redraw(a); @@ -55,7 +56,7 @@ static void tab_const_float(t_tab_const *x, t_floatarg c) { int i, n; int ok_dst; - t_float *vec_dst; + iemarray_t *vec_dst; ok_dst = iem_tab_check_arrays(gensym("tab_const"), x->x_sym_dst, &x->x_beg_mem_dst, &x->x_size_dst, 0); @@ -68,7 +69,7 @@ static void tab_const_float(t_tab_const *x, t_floatarg c) t_garray *a; for(i=0; i<n; i++) - vec_dst[i] = c; + iemarray_setfloat(vec_dst, i, c); outlet_bang(x->x_obj.ob_outlet); a = (t_garray *)pd_findbyclass(x->x_sym_dst, garray_class); garray_redraw(a); @@ -81,7 +82,8 @@ static void tab_const_list(t_tab_const *x, t_symbol *s, int argc, t_atom *argv) int beg_dst; int i, n; int ok_dst; - t_float *vec_dst, c; + iemarray_t *vec_dst; + t_float c; if((argc >= 3) && IS_A_FLOAT(argv,0) && @@ -106,7 +108,7 @@ static void tab_const_list(t_tab_const *x, t_symbol *s, int argc, t_atom *argv) t_garray *a; for(i=0; i<n; i++) - vec_dst[i] = c; + iemarray_setfloat(vec_dst, i, c); outlet_bang(x->x_obj.ob_outlet); a = (t_garray *)pd_findbyclass(x->x_sym_dst, garray_class); garray_redraw(a); @@ -128,7 +130,6 @@ static void *tab_const_new(t_symbol *s, int argc, t_atom *argv) { t_tab_const *x = (t_tab_const *)pd_new(tab_const_class); t_symbol *dst; - t_float time; if((argc >= 1) && IS_A_SYMBOL(argv,0)) |