diff options
author | musil <tmusil@users.sourceforge.net> | 2009-02-01 05:25:21 +0000 |
---|---|---|
committer | musil <tmusil@users.sourceforge.net> | 2009-02-01 05:25:21 +0000 |
commit | bb04075ca94cfbb8391e3bbb0e693d2ebd079e95 (patch) | |
tree | 32f4367b8587b533724b2b04c2060d815415efa1 /src/tab_sub.c | |
parent | 0c2bbab79dd04ed75310ae10358b613c20179fc5 (diff) |
changed for 64 bit array access
svn path=/trunk/externals/iem/iem_tab/; revision=10706
Diffstat (limited to 'src/tab_sub.c')
-rw-r--r-- | src/tab_sub.c | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/src/tab_sub.c b/src/tab_sub.c index 8d978f7..f1efd9c 100644 --- a/src/tab_sub.c +++ b/src/tab_sub.c @@ -1,7 +1,7 @@ /* 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" @@ -9,6 +9,7 @@ iem_tab written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2006 /* -------------------------- tab_sub ------------------------------ */ +/* x_beg_mem_dst[i] = x_beg_mem_src1[i] - x_offset_src2[i] */ typedef struct _tab_sub { @@ -19,9 +20,9 @@ typedef struct _tab_sub int x_offset_src1; int x_offset_src2; int x_offset_dst; - t_float *x_beg_mem_src1; - t_float *x_beg_mem_src2; - t_float *x_beg_mem_dst; + iemarray_t *x_beg_mem_src1; + iemarray_t *x_beg_mem_src2; + iemarray_t *x_beg_mem_dst; t_symbol *x_sym_scr1; t_symbol *x_sym_scr2; t_symbol *x_sym_dst; @@ -48,7 +49,7 @@ static void tab_sub_bang(t_tab_sub *x) { int i, n; int ok_src1, ok_src2, ok_dst; - t_float *vec_src1, *vec_src2, *vec_dst; + iemarray_t *vec_src1, *vec_src2, *vec_dst; ok_src1 = iem_tab_check_arrays(gensym("tab_sub"), x->x_sym_scr1, &x->x_beg_mem_src1, &x->x_size_src1, 0); ok_src2 = iem_tab_check_arrays(gensym("tab_sub"), x->x_sym_scr2, &x->x_beg_mem_src2, &x->x_size_src2, 0); @@ -71,7 +72,7 @@ static void tab_sub_bang(t_tab_sub *x) t_garray *a; for(i=0; i<n; i++) - vec_dst[i] = vec_src1[i] - vec_src2[i]; + iemarray_setfloat(vec_dst, i, iemarray_getfloat(vec_src1, i) - iemarray_getfloat(vec_src2, i)); outlet_bang(x->x_obj.ob_outlet); a = (t_garray *)pd_findbyclass(x->x_sym_dst, garray_class); garray_redraw(a); @@ -84,7 +85,7 @@ static void tab_sub_list(t_tab_sub *x, t_symbol *s, int argc, t_atom *argv) int beg_src1, beg_src2, beg_dst; int i, n; int ok_src1, ok_src2, ok_dst; - t_float *vec_src1, *vec_src2, *vec_dst; + iemarray_t *vec_src1, *vec_src2, *vec_dst; if((argc >= 4) && IS_A_FLOAT(argv,0) && @@ -119,7 +120,7 @@ static void tab_sub_list(t_tab_sub *x, t_symbol *s, int argc, t_atom *argv) t_garray *a; for(i=0; i<n; i++) - vec_dst[i] = vec_src1[i] - vec_src2[i]; + iemarray_setfloat(vec_dst, i, iemarray_getfloat(vec_src1, i) - iemarray_getfloat(vec_src2, i)); outlet_bang(x->x_obj.ob_outlet); a = (t_garray *)pd_findbyclass(x->x_sym_dst, garray_class); garray_redraw(a); @@ -141,7 +142,6 @@ static void *tab_sub_new(t_symbol *s, int argc, t_atom *argv) { t_tab_sub *x = (t_tab_sub *)pd_new(tab_sub_class); t_symbol *src1, *src2, *dst; - t_float time; if((argc >= 3) && IS_A_SYMBOL(argv,0) && |