diff options
author | musil <tmusil@users.sourceforge.net> | 2012-09-06 15:54:46 +0000 |
---|---|---|
committer | musil <tmusil@users.sourceforge.net> | 2012-09-06 15:54:46 +0000 |
commit | 33dd6d603830640766aa1a5fe70137c856e2c145 (patch) | |
tree | 6e4a73f9100aec46971aa947a5f285c1d01ec35d /iemlib1/src/peakenv_hold~.c | |
parent | 48cb10a8590255f952f53f3ff558ce345b86a3fe (diff) |
other variable names, t_float to t_sample change, array access 64 bit
svn path=/trunk/externals/iemlib/; revision=16193
Diffstat (limited to 'iemlib1/src/peakenv_hold~.c')
-rw-r--r-- | iemlib1/src/peakenv_hold~.c | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/iemlib1/src/peakenv_hold~.c b/iemlib1/src/peakenv_hold~.c index 3e9b09a..f21a8d2 100644 --- a/iemlib1/src/peakenv_hold~.c +++ b/iemlib1/src/peakenv_hold~.c @@ -35,8 +35,8 @@ static void peakenv_hold_tilde_ft1(t_peakenv_hold_tilde *x, t_float t_hold)/* ho { double dhold; - if(t_hold < 0.0f) - t_hold = 0.0f; + if(t_hold < 0.0) + t_hold = 0.0; x->x_holdtime = (double)t_hold; dhold = x->x_sr*0.001*x->x_holdtime; if(dhold > 2147483647.0) @@ -46,16 +46,16 @@ static void peakenv_hold_tilde_ft1(t_peakenv_hold_tilde *x, t_float t_hold)/* ho static void peakenv_hold_tilde_ft2(t_peakenv_hold_tilde *x, t_float t_rel)/* release-time in ms */ { - if(t_rel < 0.0f) - t_rel = 0.0f; + if(t_rel < 0.0) + t_rel = 0.0; x->x_releasetime = (double)t_rel; x->x_c1 = exp(-1.0/(x->x_sr*0.001*x->x_releasetime)); } static t_int *peakenv_hold_tilde_perform(t_int *w) { - t_float *in = (t_float *)(w[1]); - t_float *out = (t_float *)(w[2]); + t_sample *in = (t_sample *)(w[1]); + t_sample *out = (t_sample *)(w[2]); t_peakenv_hold_tilde *x = (t_peakenv_hold_tilde *)(w[3]); int n = (int)(w[4]); double peak = x->x_old_peak; @@ -66,7 +66,7 @@ static t_int *peakenv_hold_tilde_perform(t_int *w) counter = x->x_counter; for(i=0; i<n; i++) { - absolute = (double)fabs(*in++); + absolute = (double)abs((double)(*in++)); if(counter > 0) counter--;// hold peride else @@ -76,7 +76,7 @@ static t_int *peakenv_hold_tilde_perform(t_int *w) peak = absolute; counter = x->x_n_hold;// new hold initialisation } - *out++ = (t_float)peak; + *out++ = (t_sample)peak; } /* NAN protect */ //if(IEM_DENORMAL(peak)) @@ -106,7 +106,7 @@ static void *peakenv_hold_tilde_new(t_float t_hold, t_float t_rel) inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("ft1")); inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("ft2")); outlet_new(&x->x_obj, &s_signal); - x->x_float_sig_in = 0.0f; + x->x_float_sig_in = 0.0; return(x); } |