Update of /cvsroot/pure-data/externals/sc4pd/source In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7437

Modified Files: main.cpp support.hpp Dust.cpp Dust2.cpp Log Message: update & bugfix

Index: support.hpp =================================================================== RCS file: /cvsroot/pure-data/externals/sc4pd/source/support.hpp,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** support.hpp 14 Jul 2004 16:21:44 -0000 1.1.1.1 --- support.hpp 14 Jul 2004 18:29:52 -0000 1.2 *************** *** 61,65 **** inline float sc_getfloatarg (flext::AtomList a,int i) { ! if (a.Count() >0 || a.Count() <i) return flext::GetAFloat(a[i]); else --- 61,65 ---- inline float sc_getfloatarg (flext::AtomList a,int i) { ! if (a.Count() > 0 && a.Count() > i) return flext::GetAFloat(a[i]); else *************** *** 67,70 **** --- 67,84 ---- }

+ inline bool sc_ar(flext::AtomList a) + { + for (int i = 0; i!=a.Count();++i) + { + if ( flext::IsSymbol(a[i]) ) + { + const char * teststring; + teststring = flext::GetString(a[i]); + if((strcmp(teststring,"ar"))==0) + return true; + } + } + return false; + }

// macros to put rgen state in registers

Index: main.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/sc4pd/source/main.cpp,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** main.cpp 14 Jul 2004 16:21:44 -0000 1.1.1.1 --- main.cpp 14 Jul 2004 18:29:52 -0000 1.2 *************** *** 50,56 **** post("compiled on "__DATE__); post("contains: Dust(~), MantissaMask(~), Hasher(~), Median(~), " ! "BrownNoise(~),"); ! post(" ClipNoise(~), GrayNoise(~), Dust2(~), WhiteNoise(~), " ! "PinkNoise(~)\n");

//initialize objects --- 50,56 ---- post("compiled on "__DATE__); post("contains: Dust(~), MantissaMask(~), Hasher(~), Median(~), " ! "BrownNoise(~),\n" ! " ClipNoise(~), GrayNoise(~), Dust2(~), WhiteNoise(~), " ! "PinkNoise(~), \n Crackle(~), Rand(~)\n");

//initialize objects *************** *** 87,90 **** --- 87,94 ---- FLEXT_DSP_SETUP(Crackle_ar); FLEXT_SETUP(Crackle_kr); + + FLEXT_DSP_SETUP(Rand_ar); + FLEXT_SETUP(Rand_kr); + }

Index: Dust.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/sc4pd/source/Dust.cpp,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** Dust.cpp 14 Jul 2004 16:21:44 -0000 1.1.1.1 --- Dust.cpp 14 Jul 2004 18:29:52 -0000 1.2 *************** *** 129,133 **** void m_set(float f); Timer Dust_timer; ! void m_doit();

private: --- 129,133 ---- void m_set(float f); Timer Dust_timer; ! void m_doit(void*);

private: *************** *** 172,176 **** }

! void Dust_kr::m_doit() { ToOutFloat(0,rgen.frand()); --- 172,176 ---- }

! void Dust_kr::m_doit(void*) { ToOutFloat(0,rgen.frand());

Index: Dust2.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/sc4pd/source/Dust2.cpp,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** Dust2.cpp 14 Jul 2004 16:21:44 -0000 1.1.1.1 --- Dust2.cpp 14 Jul 2004 18:29:52 -0000 1.2 *************** *** 130,134 **** void m_set(float f); Timer Dust2_timer; ! void m_doit();

private: --- 130,134 ---- void m_set(float f); Timer Dust2_timer; ! void m_doit(void*);

private: *************** *** 173,177 **** }

! void Dust2_kr::m_doit() { ToOutFloat(0,2*rgen.frand() - 1 ); --- 173,177 ---- }

! void Dust2_kr::m_doit(void*) { ToOutFloat(0,2*rgen.frand() - 1 );