aboutsummaryrefslogtreecommitdiff
path: root/src/tab_counter.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/tab_counter.c')
-rw-r--r--src/tab_counter.c33
1 files changed, 20 insertions, 13 deletions
diff --git a/src/tab_counter.c b/src/tab_counter.c
index 87b97cc..e1b9553 100644
--- a/src/tab_counter.c
+++ b/src/tab_counter.c
@@ -1,13 +1,20 @@
/* 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_counter ------------------------------ */
+/* for(i=0; i<x_size_src1; i++) */
+/* { */
+/* if(x_beg_mem_src1[i] == 0.0f) */
+/* x_beg_mem_dst[i] = 0.0f; */
+/* else */
+/* x_beg_mem_dst[i] += 1.0f; */
+/* } */
typedef struct _tab_counter
{
@@ -16,8 +23,8 @@ typedef struct _tab_counter
int x_size_dst;
int x_offset_src1;
int x_offset_dst;
- t_float *x_beg_mem_src1;
- t_float *x_beg_mem_dst;
+ iemarray_t *x_beg_mem_src1;
+ iemarray_t *x_beg_mem_dst;
t_symbol *x_sym_scr1;
t_symbol *x_sym_dst;
} t_tab_counter;
@@ -33,7 +40,7 @@ static void tab_counter_bang(t_tab_counter *x)
{
int i, n;
int ok_src1, ok_dst;
- t_float *vec_src1, *vec_dst;
+ iemarray_t *vec_src1, *vec_dst;
ok_src1 = iem_tab_check_arrays(gensym("tab_counter"), x->x_sym_scr1, &x->x_beg_mem_src1, &x->x_size_src1, 0);
ok_dst = iem_tab_check_arrays(gensym("tab_counter"), x->x_sym_dst, &x->x_beg_mem_dst, &x->x_size_dst, 0);
@@ -53,10 +60,10 @@ static void tab_counter_bang(t_tab_counter *x)
for(i=0; i<n; i++)
{
- if(vec_src1[i] == 0.0f)
- vec_dst[i] = 0.0f;
+ if(iemarray_getfloat(vec_src1, i) == 0.0f)
+ iemarray_setfloat(vec_dst, i, 0.0f);
else
- vec_dst[i] += 1.0f;
+ iemarray_setfloat(vec_dst, i, iemarray_getfloat(vec_dst, i)+1.0f);
}
outlet_bang(x->x_obj.ob_outlet);
a = (t_garray *)pd_findbyclass(x->x_sym_dst, garray_class);
@@ -75,7 +82,7 @@ static void tab_counter_list(t_tab_counter *x, t_symbol *s, int argc, t_atom *ar
int beg_src1, beg_dst;
int i, n;
int ok_src1, ok_dst;
- t_float *vec_src1, *vec_dst;
+ iemarray_t *vec_src1, *vec_dst;
if((argc >= 3) &&
IS_A_FLOAT(argv,0) &&
@@ -105,10 +112,10 @@ static void tab_counter_list(t_tab_counter *x, t_symbol *s, int argc, t_atom *ar
for(i=0; i<n; i++)
{
- if(vec_src1[i] == 0.0f)
- vec_dst[i] = 0.0f;
+ if(iemarray_getfloat(vec_src1, i) == 0.0f)
+ iemarray_setfloat(vec_dst, i, 0.0f);
else
- vec_dst[i] += 1.0f;
+ iemarray_setfloat(vec_dst, i, iemarray_getfloat(vec_dst, i)+1.0f);
}
outlet_bang(x->x_obj.ob_outlet);
a = (t_garray *)pd_findbyclass(x->x_sym_dst, garray_class);
@@ -128,7 +135,7 @@ static void tab_counter_reset(t_tab_counter *x)
int beg_dst;
int i, n;
int ok_dst;
- t_float *vec_dst;
+ iemarray_t *vec_dst;
ok_dst = iem_tab_check_arrays(gensym("tab_counter"), x->x_sym_dst, &x->x_beg_mem_dst, &x->x_size_dst, 0);
@@ -141,7 +148,7 @@ static void tab_counter_reset(t_tab_counter *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);