Pd-cvs September 2004

pd-cvs@lists.iem.at

9 participants
149 discussions

pd/extra/fiddle~ README.txt,1.2,NONE
by Miller Puckette 06 Sep '04

06 Sep '04

Update of /cvsroot/pure-data/pd/extra/fiddle~ In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4111/extra/fiddle~ Removed Files: README.txt Log Message: Removed files which appear to be unused. --- README.txt DELETED ---

1 0

pd/extra/bonk~ README.txt,1.2,NONE
by Miller Puckette 06 Sep '04

06 Sep '04

Update of /cvsroot/pure-data/pd/extra/bonk~ In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4111/extra/bonk~ Removed Files: README.txt Log Message: Removed files which appear to be unused. --- README.txt DELETED ---

1 0

pd/src g_io.c,1.1.1.1.16.2,1.1.1.1.16.3
by Tim Blechmann 06 Sep '04

06 Sep '04

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8072 Modified Files: Tag: devel_0_37 g_io.c Log Message: vectorized vinlet_perform Index: g_io.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/g_io.c,v retrieving revision 1.1.1.1.16.2 retrieving revision 1.1.1.1.16.3 diff -C2 -d -r1.1.1.1.16.2 -r1.1.1.1.16.3 *** g_io.c 25 Nov 2003 19:19:57 -0000 1.1.1.1.16.2 --- g_io.c 6 Sep 2004 08:02:43 -0000 1.1.1.1.16.3 *************** *** 128,131 **** --- 128,150 ---- } + /* tb: vectorized */ + t_int *vinlet_perf8(t_int *w) + { + t_vinlet *x = (t_vinlet *)(w[1]); + t_float *out = (t_float *)(w[2]); + int n = (int)(w[3]); + t_float *in = x->x_read; + + for (; n; n -= 8, in += 8, out += 8) + { + out[0] = in[0]; out[1] = in[1]; out[2] = in[2]; out[3] = in[3]; + out[4] = in[4]; out[5] = in[5]; out[6] = in[6]; out[7] = in[7]; + } + + if (in == x->x_endbuf) in = x->x_buf; + x->x_read = in; + return (w+4); + } + static void vinlet_dsp(t_vinlet *x, t_signal **sp) { *************** *** 141,145 **** else { ! dsp_add(vinlet_perform, 3, x, outsig->s_vec, outsig->s_n); x->x_read = x->x_buf; } --- 160,167 ---- else { ! if (sp[0]->s_n & 7) ! dsp_add(vinlet_perform, 3, x, outsig->s_vec, outsig->s_n); ! else ! dsp_add(vinlet_perf8, 3, x, outsig->s_vec, outsig->s_n); x->x_read = x->x_buf; }

1 0

pd/src d_global.c,1.1.1.2.8.4,1.1.1.2.8.5
by Tim Blechmann 06 Sep '04

06 Sep '04

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6902 Modified Files: Tag: devel_0_37 d_global.c Log Message: fixed r~ bug (that never appeared) Index: d_global.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/d_global.c,v retrieving revision 1.1.1.2.8.4 retrieving revision 1.1.1.2.8.5 diff -C2 -d -r1.1.1.2.8.4 -r1.1.1.2.8.5 *** d_global.c 3 Sep 2004 07:51:27 -0000 1.1.1.2.8.4 --- d_global.c 6 Sep 2004 07:56:39 -0000 1.1.1.2.8.5 *************** *** 342,346 **** sigthrow_class = class_new(gensym("throw~"), (t_newmethod)sigthrow_new, 0, sizeof(t_sigthrow), 0, A_DEFSYM, 0); - class_addcreator((t_newmethod)sigthrow_new, gensym("r~"), A_DEFSYM, 0); class_addmethod(sigthrow_class, (t_method)sigthrow_set, gensym("set"), A_SYMBOL, 0); --- 342,345 ----

1 0

pd/src m_simd_sse_gcc.h,1.1.2.5,1.1.2.6
by Tim Blechmann 06 Sep '04

06 Sep '04

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6642 Modified Files: Tag: devel_0_37 m_simd_sse_gcc.h Log Message: exporting runtime check for simd instructions Index: m_simd_sse_gcc.h =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/m_simd_sse_gcc.h,v retrieving revision 1.1.2.5 retrieving revision 1.1.2.6 diff -C2 -d -r1.1.2.5 -r1.1.2.6 *** m_simd_sse_gcc.h 30 Aug 2004 19:56:30 -0000 1.1.2.5 --- m_simd_sse_gcc.h 6 Sep 2004 07:55:12 -0000 1.1.2.6 *************** *** 63,67 **** /* TB: runtime check */ ! t_int simd_runtime_check(void); #endif /* __M_SIMD_SSE_GCC_H */ --- 63,67 ---- /* TB: runtime check */ ! extern t_int simd_runtime_check(void); #endif /* __M_SIMD_SSE_GCC_H */

1 0

externals/tbext/source him.cpp,1.4,1.5
by Tim Blechmann 05 Sep '04

05 Sep '04

Update of /cvsroot/pure-data/externals/tbext/source In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7755 Modified Files: him.cpp Log Message: added crossfade Index: him.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/tbext/source/him.cpp,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** him.cpp 13 Jul 2004 20:04:52 -0000 1.4 --- him.cpp 5 Sep 2004 21:28:52 -0000 1.5 *************** *** 63,66 **** --- 63,67 ---- protected: virtual void m_signal (int n, float *const *in, float *const *out); + virtual void m_dsp (int n, float *const *in, float *const *out); void set_mu(t_float); *************** *** 79,83 **** // 4th order Runge Kutta update of the dynamical variables ! void runge_kutta_4(t_float dt); //these are our data --- 80,84 ---- // 4th order Runge Kutta update of the dynamical variables ! void runge_kutta_4(t_float dt); //these are our data *************** *** 89,92 **** --- 90,101 ---- bool regtime; //if true "regularisierte zeit" + bool xfade; + t_float newE; + t_float newdt; + bool newsystem; + bool newregtime; + + t_float * m_fader; + //Callbacks FLEXT_CALLBACK_1(set_mu,t_float); *************** *** 210,214 **** /* ! the system might become unstable ... in this case, we'll reset the system */ --- 219,223 ---- /* ! the system might become unstable ... in this case, we'll request a new system */ *************** *** 216,220 **** { if(data[i]>2) ! reset(); } } --- 225,237 ---- { if(data[i]>2) ! { ! xfade = newsystem = true; ! data[i] = 2; ! } ! if(data[i]<-2) ! { ! xfade = newsystem = true; ! data[i] = -2; ! } } } *************** *** 234,238 **** if (regtime) { ! for (int j=0;j!=n;++j) { runge_kutta_4(dt); --- 251,255 ---- if (regtime) { ! for (int i=0;i!=n;++i) { runge_kutta_4(dt); *************** *** 247,251 **** else { ! for (int j=0;j!=n;++j) { runge_kutta_4(dt/(2*sqrt(data[0]*data[0]+data[2]*data[2]))); --- 264,268 ---- else { ! for (int i=0;i!=n;++i) { runge_kutta_4(dt/(2*sqrt(data[0]*data[0]+data[2]*data[2]))); *************** *** 258,263 **** --- 275,369 ---- } } + + if (xfade) + { + /* fading */ + out0 = out[0]; + out1 = out[1]; + out2 = out[2]; + out3 = out[3]; + out4 = out[4]; + out5 = out[5]; + + t_float * fader = m_fader + n - 1; + for (int i=0;i!=n;++i) + { + (*(out0)++) *= *fader; + (*(out1)++) *= *fader; + (*(out2)++) *= *fader; + (*(out3)++) *= *fader; + (*(out4)++) *= *fader; + (*(out5)++) *= *fader--; + } + + if (newsystem) + { + reset(); + newsystem = false; + } + + E = newE; + dt = newdt; + regtime = newregtime; + + out0 = out[0]; + out1 = out[1]; + out2 = out[2]; + out3 = out[3]; + out4 = out[4]; + out5 = out[5]; + + fader = m_fader; + if (regtime) + { + for (int i=0;i!=n;++i) + { + runge_kutta_4(dt); + (*(out0)++)+= data[0]* *fader; + (*(out1)++)+= data[1]* *fader; + (*(out2)++)+= data[2]* *fader; + (*(out3)++)+= data[3]* *fader; + (*(out4)++)+= data[0]*data[2]* *fader; + (*(out5)++)+= (data[0]*data[0]-data[2]*data[2])*0.5* *fader++; + } + } + else + { + for (int i=0;i!=n;++i) + { + runge_kutta_4(dt/(2*sqrt(data[0]*data[0]+data[2]*data[2]))); + (*(out0)++)+= data[0]* *fader; + (*(out1)++)+= data[1]* *fader; + (*(out2)++)+= data[2]* *fader; + (*(out3)++)+= data[3]* *fader; + (*(out4)++)+= data[0]*data[2]* *fader; + (*(out5)++)+= (data[0]*data[0]-data[2]*data[2])*0.5* *fader++; + } + } + + xfade = false; + } + } + void him::m_dsp(int n, t_float *const *in, t_float *const *out) + { + m_fader = new t_float[n]; + t_float on = 1.f/(n-1); + + t_float value = 0; + + t_float* localfader = m_fader; + + while (n--) + { + *localfader = value; + value += on; + ++localfader; + } + xfade = false; + } + + void him::set_mu(t_float f) { *************** *** 282,302 **** data[3]=f; reset_muv(); - post("resetting muv!!!"); } void him::set_etilde(t_float f) { ! E=f; ! reset_nuv(); } void him::set_dt(t_float f) { ! dt=f; } void him::set_regtime(bool b) { ! regtime=b; } --- 388,410 ---- data[3]=f; reset_muv(); } void him::set_etilde(t_float f) { ! newE=f; ! xfade = true; ! //reset_nuv(); } void him::set_dt(t_float f) { ! newdt=f; ! xfade = true; } void him::set_regtime(bool b) { ! newregtime=b; ! xfade = true; } *************** *** 317,320 **** data[2]=float(rand())/float(RAND_MAX); reset_nuv(); - post("randomizing values"); } --- 425,427 ----

1 0

CVSROOT avail,1.7,1.8
by Hans-Christoph Steiner 04 Sep '04

04 Sep '04

Update of /cvsroot/pure-data/CVSROOT In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29458 Modified Files: avail Log Message: added ACL on the MAIN branch of pd to prevent accidental commits Index: avail =================================================================== RCS file: /cvsroot/pure-data/CVSROOT/avail,v retrieving revision 1.7 retrieving revision 1.8 diff -C2 -d -r1.7 -r1.8 *** avail 31 Aug 2004 19:42:21 -0000 1.7 --- avail 3 Sep 2004 23:56:32 -0000 1.8 *************** *** 1,2 **** --- 1,7 ---- + # + # For docs, check: + # http://sourceforge.net/docman/display_doc.php?docid=772&group_id=1#docscvsa… + # + # defunct gem directory unavail | | gem *************** *** 16,19 **** --- 21,29 ---- avail | xovo | grill + # restrict the MAIN branch of "pd" to prevent accidental + # commits that should go to devel_0_37 or impd_0_37 + unavail | | pd | MAIN + avail | millerpuckette,ggeiger | pd | MAIN + # this line ALWAYS needs to be the last line in this file # otherwise, its possible to lock everyone out of the CVS

1 0

externals/ext13 receive13~.c,1.1.1.1,1.2
by Tim Blechmann 03 Sep '04

03 Sep '04

Update of /cvsroot/pure-data/externals/ext13 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1804 Modified Files: receive13~.c Log Message: added vectorized funtion Index: receive13~.c =================================================================== RCS file: /cvsroot/pure-data/externals/ext13/receive13~.c,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** receive13~.c 9 Jul 2002 12:41:52 -0000 1.1.1.1 --- receive13~.c 3 Sep 2004 07:56:28 -0000 1.2 *************** *** 12,16 **** /* ----------------------------- receive13~ ----------------------------- */ ! void *sigreceive13_new(t_symbol *s) { t_sigreceive13 *x = (t_sigreceive13 *)pd_new(sigreceive13_class); --- 12,16 ---- /* ----------------------------- receive13~ ----------------------------- */ ! void *sigreceive13_new(t_symbol *s) { t_sigreceive13 *x = (t_sigreceive13 *)pd_new(sigreceive13_class); *************** *** 23,27 **** } ! t_int *sigreceive13_perform(t_int *w) { t_sigreceive13 *x = (t_sigreceive13 *)(w[1]); --- 23,27 ---- } ! t_int *sigreceive13_perform(t_int *w) { t_sigreceive13 *x = (t_sigreceive13 *)(w[1]); *************** *** 42,46 **** } ! void sigreceive13_set(t_sigreceive13 *x, t_symbol *s) { t_sigsend13 *sender = (t_sigsend13 *)pd_findbyclass((x->x_sym = s), --- 42,72 ---- } ! /* tb: vectorized */ ! t_int *sigreceive13_perf8(t_int *w) ! { ! t_sigreceive13 *x = (t_sigreceive13 *)(w[1]); ! t_float *out = (t_float *)(w[2]); ! int n = (int)(w[3]); ! t_float *in = x->x_wherefrom; ! if (in) ! { ! for (; n; n -= 8, in += 8, out += 8) ! { ! out[0] = in[0]; out[1] = in[1]; out[2] = in[2]; out[3] = in[3]; ! out[4] = in[4]; out[5] = in[5]; out[6] = in[6]; out[7] = in[7]; ! } ! } ! else ! { ! for (; n; n -= 8, in += 8, out += 8) ! { ! out[0] = 0; out[1] = 0; out[2] = 0; out[3] = 0; ! out[4] = 0; out[5] = 0; out[6] = 0; out[7] = 0; ! } ! } ! return (w+4); ! } ! ! void sigreceive13_set(t_sigreceive13 *x, t_symbol *s) { t_sigsend13 *sender = (t_sigsend13 *)pd_findbyclass((x->x_sym = s), *************** *** 72,77 **** { sigreceive13_set(x, x->x_sym); ! dsp_add(sigreceive13_perform, 3, ! x, sp[0]->s_vec, sp[0]->s_n); } } --- 98,107 ---- { sigreceive13_set(x, x->x_sym); ! if(sp[0]->s_n&7) ! dsp_add(sigreceive13_perform, 3, ! x, sp[0]->s_vec, sp[0]->s_n); ! else ! dsp_add(sigreceive13_perf8, 3, ! x, sp[0]->s_vec, sp[0]->s_n); } }

1 0

externals/ext13 catch13~.c,1.1.1.1,1.2
by Tim Blechmann 03 Sep '04

03 Sep '04

Update of /cvsroot/pure-data/externals/ext13 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1717 Modified Files: catch13~.c Log Message: added vectorized function Index: catch13~.c =================================================================== RCS file: /cvsroot/pure-data/externals/ext13/catch13~.c,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** catch13~.c 9 Jul 2002 12:41:49 -0000 1.1.1.1 --- catch13~.c 3 Sep 2004 07:56:06 -0000 1.2 *************** *** 25,30 **** } ! ! t_int *sigcatch13_perform(t_int *w) { t_float *in = (t_float *)(w[1]); --- 25,29 ---- } ! t_int *sigcatch13_perform(t_int *w) { t_float *in = (t_float *)(w[1]); *************** *** 35,38 **** --- 34,54 ---- } + /* tb: vectorized */ + t_int *sigcatch13_perf8(t_int *w) + { + t_float *in = (t_float *)(w[1]); + t_float *out = (t_float *)(w[2]); + int n = (int)(w[3]); + for (; n; n -= 8, in += 8, out += 8) + { + out[0] = in[0]; out[1] = in[1]; out[2] = in[2]; out[3] = in[3]; + out[4] = in[4]; out[5] = in[5]; out[6] = in[6]; out[7] = in[7]; + + in[0] = 0; in[1] = 0; in[2] = 0; in[3] = 0; + in[4] = 0; in[5] = 0; in[6] = 0; in[7] = 0; + } + return (w+4); + } + void sigcatch13_set(t_sigcatch13 *x, t_symbol *s) { *************** *** 45,49 **** { if (x->x_n == sp[0]->s_n) ! dsp_add(sigcatch13_perform, 3, x->x_vec, sp[0]->s_vec, sp[0]->s_n); else error("sigcatch13 %s: unexpected vector size", x->x_sym->s_name); } --- 61,70 ---- { if (x->x_n == sp[0]->s_n) ! { ! if(sp[0]->s_n&7) ! dsp_add(sigcatch13_perform, 3, x->x_vec, sp[0]->s_vec, sp[0]->s_n); ! else ! dsp_add(sigcatch13_perf8, 3, x->x_vec, sp[0]->s_vec, sp[0]->s_n); ! } else error("sigcatch13 %s: unexpected vector size", x->x_sym->s_name); }

1 0

pd/src cvs_changes.txt,1.1.2.4,1.1.2.5
by Tim Blechmann 03 Sep '04

03 Sep '04

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1162 Modified Files: Tag: devel_0_37 cvs_changes.txt Log Message: Index: cvs_changes.txt =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/cvs_changes.txt,v retrieving revision 1.1.2.4 retrieving revision 1.1.2.5 diff -C2 -d -r1.1.2.4 -r1.1.2.5 *** cvs_changes.txt 23 Jul 2004 09:59:16 -0000 1.1.2.4 --- cvs_changes.txt 3 Sep 2004 07:53:05 -0000 1.1.2.5 *************** *** 22,24 **** - TB: port of thomas grill's vectorized simd funcions for vc to gcc ! - TB: PD_BADFLOAT kills almost denormal numbers \ No newline at end of file --- 22,26 ---- - TB: port of thomas grill's vectorized simd funcions for vc to gcc ! - TB: PD_BADFLOAT kills almost denormal numbers ! ! - TB: improvements for line~, catch~ and receive~ \ No newline at end of file

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

Pd-cvs September 2004