diff options
| -rw-r--r-- | packages/patches/delwrite~_nogui_fix-0.42.5.patch | 75 |
1 files changed, 75 insertions, 0 deletions
diff --git a/packages/patches/delwrite~_nogui_fix-0.42.5.patch b/packages/patches/delwrite~_nogui_fix-0.42.5.patch new file mode 100644 index 00000000..d1172156 --- /dev/null +++ b/packages/patches/delwrite~_nogui_fix-0.42.5.patch @@ -0,0 +1,75 @@ +Index: d_delay.c +=================================================================== +--- d_delay.c (révision 13558) ++++ d_delay.c (copie de travail) +@@ -24,6 +24,7 @@ + { + t_object x_obj; + t_symbol *x_sym; ++ t_float x_deltime; /* delay in msec (added by Mathieu Bouchard) */ + t_delwritectl x_cspace; + int x_sortno; /* DSP sort number at which this was last put on chain */ + int x_rsortno; /* DSP sort # for first delread or write in chain */ +@@ -34,6 +35,21 @@ + #define XTRASAMPS 4 + #define SAMPBLK 4 + ++static void sigdelwrite_updatesr (t_sigdelwrite *x, t_float sr) /* added by Mathieu Bouchard */ ++{ ++ int nsamps = x->x_deltime * sr * (t_float)(0.001f); ++ if (nsamps < 1) nsamps = 1; ++ nsamps += ((- nsamps) & (SAMPBLK - 1)); ++ nsamps += DEFDELVS; ++ if (x->x_cspace.c_n != nsamps) { ++ x->x_cspace.c_vec = (t_sample *)resizebytes(x->x_cspace.c_vec, ++ (x->x_cspace.c_n + XTRASAMPS) * sizeof(t_sample), ++ ( nsamps + XTRASAMPS) * sizeof(t_sample)); ++ x->x_cspace.c_n = nsamps; ++ x->x_cspace.c_phase = XTRASAMPS; ++ } ++} ++ + /* routine to check that all delwrites/delreads/vds have same vecsize */ + static void sigdelwrite_checkvecsize(t_sigdelwrite *x, int vecsize) + { +@@ -54,19 +70,13 @@ + + static void *sigdelwrite_new(t_symbol *s, t_floatarg msec) + { +- int nsamps; + t_sigdelwrite *x = (t_sigdelwrite *)pd_new(sigdelwrite_class); + if (!*s->s_name) s = gensym("delwrite~"); + pd_bind(&x->x_obj.ob_pd, s); + x->x_sym = s; +- nsamps = msec * sys_getsr() * (t_float)(0.001f); +- if (nsamps < 1) nsamps = 1; +- nsamps += ((- nsamps) & (SAMPBLK - 1)); +- nsamps += DEFDELVS; +- x->x_cspace.c_n = nsamps; +- x->x_cspace.c_vec = +- (t_sample *)getbytes((nsamps + XTRASAMPS) * sizeof(t_sample)); +- x->x_cspace.c_phase = XTRASAMPS; ++ x->x_deltime = msec; ++ x->x_cspace.c_n = 0; ++ x->x_cspace.c_vec = getbytes(XTRASAMPS * sizeof(t_sample)); + x->x_sortno = 0; + x->x_vecsize = 0; + x->x_f = 0; +@@ -109,6 +119,7 @@ + dsp_add(sigdelwrite_perform, 3, sp[0]->s_vec, &x->x_cspace, sp[0]->s_n); + x->x_sortno = ugen_getsortno(); + sigdelwrite_checkvecsize(x, sp[0]->s_n); ++ sigdelwrite_updatesr(x, sp[0]->s_sr); + } + + static void sigdelwrite_free(t_sigdelwrite *x) +@@ -200,6 +211,7 @@ + x->x_n = sp[0]->s_n; + if (delwriter) + { ++ sigdelwrite_updatesr(delwriter, sp[0]->s_sr); + sigdelwrite_checkvecsize(delwriter, sp[0]->s_n); + x->x_zerodel = (delwriter->x_sortno == ugen_getsortno() ? + 0 : delwriter->x_vecsize); + + |