diff options
| author | Miller Puckette <millerpuckette@users.sourceforge.net> | 2005-07-29 19:01:22 +0000 |
|---|---|---|
| committer | Miller Puckette <millerpuckette@users.sourceforge.net> | 2005-07-29 19:01:22 +0000 |
| commit | 18c47474a668d7bbbabd525686355c16a45f6ec4 (patch) | |
| tree | 034625615da54aafc44661aabfcaf8f82578f007 /pd/src/d_filter.c | |
| parent | 819bc4309313e32809dff7cfd99df930c5055082 (diff) | |
Mac to work with tcl/tk 8.4.5; pd extension added automatically in saveas
bug fix writing aiff gfiles
bug fix (tcl error messages when starting open dialogs)
svn path=/trunk/; revision=3385
Diffstat (limited to 'pd/src/d_filter.c')
| -rw-r--r-- | pd/src/d_filter.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/pd/src/d_filter.c b/pd/src/d_filter.c index 39cc9f6f..93aeac4c 100644 --- a/pd/src/d_filter.c +++ b/pd/src/d_filter.c @@ -512,9 +512,11 @@ static void sigsamphold_dsp(t_sigsamphold *x, t_signal **sp) x, sp[0]->s_n); } -static void sigsamphold_reset(t_sigsamphold *x) +static void sigsamphold_reset(t_sigsamphold *x, t_symbol *s, int argc, + t_atom *argv) { - x->x_lastin = 1e20; + x->x_lastin = ((argc > 0 && (argv[0].a_type == A_FLOAT)) ? + argv[0].a_w.w_float : 1e20); } static void sigsamphold_set(t_sigsamphold *x, t_float f) @@ -530,7 +532,7 @@ void sigsamphold_setup(void) class_addmethod(sigsamphold_class, (t_method)sigsamphold_set, gensym("set"), A_DEFFLOAT, 0); class_addmethod(sigsamphold_class, (t_method)sigsamphold_reset, - gensym("reset"), 0); + gensym("reset"), A_GIMME, 0); class_addmethod(sigsamphold_class, (t_method)sigsamphold_dsp, gensym("dsp"), 0); } |