From 4a05094c9a009707674c079c0481eaf8e1f8490f Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Sat, 8 Oct 2011 17:22:41 +0000 Subject: converted float to t_float to support double-precision Pd, creb still needs to separate t_float and t_sample tho svn path=/trunk/externals/creb/; revision=15546 --- modules/bfft~.c | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'modules/bfft~.c') diff --git a/modules/bfft~.c b/modules/bfft~.c index b57f028..ae39ff1 100644 --- a/modules/bfft~.c +++ b/modules/bfft~.c @@ -102,11 +102,11 @@ static t_int *bfft_perform(t_int *w) { - t_float *in = (float *)(w[3]); - t_float *out = (float *)(w[4]); + t_float *in = (t_float *)(w[3]); + t_float *out = (t_float *)(w[4]); t_bfftctl *ctl = (t_bfftctl *)(w[1]); t_int n = (t_int)(w[2]); - t_float scale = sqrt(1.0f / (float)(n)); + t_float scale = sqrt(1.0f / (t_float)(n)); mayer_fht(out, n); bfft_perform_permutation(out, n, ctl->c_unclutter); @@ -123,11 +123,11 @@ static t_int *ibfft_perform(t_int *w) { - t_float *in = (float *)(w[3]); - t_float *out = (float *)(w[4]); + t_float *in = (t_float *)(w[3]); + t_float *out = (t_float *)(w[4]); t_bfftctl *ctl = (t_bfftctl *)(w[1]); t_int n = (t_int)(w[2]); - t_float scale = sqrt(1.0f / (float)(n)); + t_float scale = sqrt(1.0f / (t_float)(n)); if (ctl->c_kill_DC) {out[0] = 0.0f;} @@ -149,8 +149,8 @@ static t_int *fht_perform(t_int *w) { - t_float *in = (float *)(w[3]); - t_float *out = (float *)(w[4]); + t_float *in = (t_float *)(w[3]); + t_float *out = (t_float *)(w[4]); t_bfftctl *ctl = (t_bfftctl *)(w[1]); -- cgit v1.2.1