Update of /cvsroot/pure-data/pd/extra/fiddle~ In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10939/pd/extra/fiddle~
Modified Files: fiddle~.c Log Message: 0.38 test 9 (mostly bug fixes)
Index: fiddle~.c =================================================================== RCS file: /cvsroot/pure-data/pd/extra/fiddle~/fiddle~.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** fiddle~.c 6 Sep 2004 20:20:27 -0000 1.4 --- fiddle~.c 6 Nov 2004 16:07:23 -0000 1.5 *************** *** 103,115 ****
#ifdef MSP ! #define t_floatarg double // this is a guess based on MAX26 #include "ext.h" #include "z_dsp.h" #include "fft_mayer.proto.h" - //#include "fiddle_header.h" - // #include "MacHeaders.h" - //#include <MacHeadersPPC> - [...2538 lines suppressed...] ! real = rp = msp_ffttemp; ! imag = ip = real + MAXPOINTS; ! src = buf; ! for (i = 0; i < np; i++) { ! *rp++ = *src++; ! *ip++ = *src++; ! } ! if (inv) ! ifft(np,real,imag); ! else ! fft(np,real,imag); ! rp = real; ! ip = imag; ! src = buf; ! for (i = 0; i < np; i++) { ! *src++ = *rp++; ! *src++ = *ip++; ! } }