aboutsummaryrefslogtreecommitdiff
path: root/pd/src/d_resample.c
diff options
context:
space:
mode:
authorMiller Puckette <millerpuckette@users.sourceforge.net>2007-12-28 03:43:06 +0000
committerMiller Puckette <millerpuckette@users.sourceforge.net>2007-12-28 03:43:06 +0000
commit019c0e56579fe7f94982434d8efcd7b00d8df0aa (patch)
treeb221f8e00973d9a501ed7085e9f2b95fabb0009a /pd/src/d_resample.c
parent44e68e4348f7ca86f4209f3f86ac7b6cb49acd52 (diff)
... and again trying to check in 0.41-0 test 10
svn path=/trunk/; revision=9108
Diffstat (limited to 'pd/src/d_resample.c')
-rw-r--r--pd/src/d_resample.c38
1 files changed, 19 insertions, 19 deletions
diff --git a/pd/src/d_resample.c b/pd/src/d_resample.c
index 97ba1743..255af71d 100644
--- a/pd/src/d_resample.c
+++ b/pd/src/d_resample.c
@@ -8,8 +8,8 @@
/* --------------------- up/down-sampling --------------------- */
t_int *downsampling_perform_0(t_int *w)
{
- t_float *in = (t_float *)(w[1]); /* original signal */
- t_float *out = (t_float *)(w[2]); /* downsampled signal */
+ t_sample *in = (t_sample *)(w[1]); /* original signal */
+ t_sample *out = (t_sample *)(w[2]); /* downsampled signal */
int down = (int)(w[3]); /* downsampling factor */
int parent = (int)(w[4]); /* original vectorsize */
@@ -25,13 +25,13 @@ t_int *downsampling_perform_0(t_int *w)
t_int *upsampling_perform_0(t_int *w)
{
- t_float *in = (t_float *)(w[1]); /* original signal */
- t_float *out = (t_float *)(w[2]); /* upsampled signal */
+ t_sample *in = (t_sample *)(w[1]); /* original signal */
+ t_sample *out = (t_sample *)(w[2]); /* upsampled signal */
int up = (int)(w[3]); /* upsampling factor */
int parent = (int)(w[4]); /* original vectorsize */
int n=parent*up;
- t_float *dummy = out;
+ t_sample *dummy = out;
while(n--)*out++=0;
@@ -47,15 +47,15 @@ t_int *upsampling_perform_0(t_int *w)
t_int *upsampling_perform_hold(t_int *w)
{
- t_float *in = (t_float *)(w[1]); /* original signal */
- t_float *out = (t_float *)(w[2]); /* upsampled signal */
+ t_sample *in = (t_sample *)(w[1]); /* original signal */
+ t_sample *out = (t_sample *)(w[2]); /* upsampled signal */
int up = (int)(w[3]); /* upsampling factor */
int parent = (int)(w[4]); /* original vectorsize */
int i=up;
int n=parent;
- t_float *dum_out = out;
- t_float *dum_in = in;
+ t_sample *dum_out = out;
+ t_sample *dum_in = in;
while (i--) {
n = parent;
@@ -72,20 +72,20 @@ t_int *upsampling_perform_hold(t_int *w)
t_int *upsampling_perform_linear(t_int *w)
{
t_resample *x= (t_resample *)(w[1]);
- t_float *in = (t_float *)(w[2]); /* original signal */
- t_float *out = (t_float *)(w[3]); /* upsampled signal */
+ t_sample *in = (t_sample *)(w[2]); /* original signal */
+ t_sample *out = (t_sample *)(w[3]); /* upsampled signal */
int up = (int)(w[4]); /* upsampling factor */
int parent = (int)(w[5]); /* original vectorsize */
int length = parent*up;
int n;
- t_float *fp;
- t_float a=*x->buffer, b=*in;
+ t_sample *fp;
+ t_sample a=*x->buffer, b=*in;
for (n=0; n<length; n++) {
- t_float findex = (t_float)(n+1)/up;
+ t_sample findex = (t_sample)(n+1)/up;
int index = findex;
- t_float frac=findex - index;
+ t_sample frac=findex - index;
if (frac==0.)frac=1.;
*out++ = frac * b + (1.-frac) * a;
fp = in+index;
@@ -180,9 +180,9 @@ void resamplefrom_dsp(t_resample *x,
}
if (x->s_n != outsize) {
- t_float *buf=x->s_vec;
+ t_sample *buf=x->s_vec;
t_freebytes(buf, x->s_n * sizeof(*buf));
- buf = (t_float *)t_getbytes(outsize * sizeof(*buf));
+ buf = (t_sample *)t_getbytes(outsize * sizeof(*buf));
x->s_vec = buf;
x->s_n = outsize;
}
@@ -203,9 +203,9 @@ void resampleto_dsp(t_resample *x,
}
if (x->s_n != insize) {
- t_float *buf=x->s_vec;
+ t_sample *buf=x->s_vec;
t_freebytes(buf, x->s_n * sizeof(*buf));
- buf = (t_float *)t_getbytes(insize * sizeof(*buf));
+ buf = (t_sample *)t_getbytes(insize * sizeof(*buf));
x->s_vec = buf;
x->s_n = insize;
}