diff options
author | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2010-12-13 05:02:47 +0000 |
---|---|---|
committer | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2010-12-13 05:02:47 +0000 |
commit | 918d61055b634b2210ec213573d489f4570120c5 (patch) | |
tree | 80a5bebec0cddac3ae4ab87cd8ba9c6f4a688048 /externals/vanilla | |
parent | f401bb9d53a662e2e78639d0d07f0d8e82e3bf7a (diff) |
split out general functions from d_dac.c to e_dac.c in Pd-extended
svn path=/trunk/; revision=14613
Diffstat (limited to 'externals/vanilla')
-rw-r--r-- | externals/vanilla/adc~.c | 46 |
1 files changed, 0 insertions, 46 deletions
diff --git a/externals/vanilla/adc~.c b/externals/vanilla/adc~.c index 831a122c..40aee13e 100644 --- a/externals/vanilla/adc~.c +++ b/externals/vanilla/adc~.c @@ -38,52 +38,6 @@ static void *adc_new(t_symbol *s, int argc, t_atom *argv) return (x); } -t_int *copy_perform(t_int *w) -{ - t_sample *in1 = (t_sample *)(w[1]); - t_sample *out = (t_sample *)(w[2]); - int n = (int)(w[3]); - while (n--) *out++ = *in1++; - return (w+4); -} - -t_int *copy_perf8(t_int *w) -{ - t_sample *in1 = (t_sample *)(w[1]); - t_sample *out = (t_sample *)(w[2]); - int n = (int)(w[3]); - - for (; n; n -= 8, in1 += 8, out += 8) - { - t_sample f0 = in1[0]; - t_sample f1 = in1[1]; - t_sample f2 = in1[2]; - t_sample f3 = in1[3]; - t_sample f4 = in1[4]; - t_sample f5 = in1[5]; - t_sample f6 = in1[6]; - t_sample f7 = in1[7]; - - out[0] = f0; - out[1] = f1; - out[2] = f2; - out[3] = f3; - out[4] = f4; - out[5] = f5; - out[6] = f6; - out[7] = f7; - } - return (w+4); -} - -void dsp_add_copy(t_sample *in, t_sample *out, int n) -{ - if (n&7) - dsp_add(copy_perform, 3, in, out, n); - else - dsp_add(copy_perf8, 3, in, out, n); -} - static void adc_dsp(t_adc *x, t_signal **sp) { t_int i, *ip; |