[PD-cvs] pd/src builtins_dsp.c,1.1.2.7,1.1.2.8

Mathieu Bouchard matju at users.sourceforge.net
Wed Jan 3 23:49:41 CET 2007


Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16753

Modified Files:
      Tag: desiredata
	builtins_dsp.c 
Log Message:
shrink


Index: builtins_dsp.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/builtins_dsp.c,v
retrieving revision 1.1.2.7
retrieving revision 1.1.2.8
diff -C2 -d -r1.1.2.7 -r1.1.2.8
*** builtins_dsp.c	3 Jan 2007 22:28:57 -0000	1.1.2.7
--- builtins_dsp.c	3 Jan 2007 22:49:39 -0000	1.1.2.8
***************
*** 139,157 ****
  
  /* T.Grill - squaring: optimized * for equal input signals */
! t_int *sqr_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)
!     {
[...7286 lines suppressed...]
      dsp_add(noise_perform, 3, sp[0]->s_vec, &x->val, sp[0]->s_n);
  }
  
! static void noise_setup(void)
! {
      noise_class = class_new(gensym("noise~"), (t_newmethod)noise_new, 0,
          sizeof(t_noise), 0, 0);
--- 5292,5303 ----
      }
      *vp = val;
!     return w+4;
  }
  
! static void noise_dsp(t_noise *x, t_signal **sp) {
      dsp_add(noise_perform, 3, sp[0]->s_vec, &x->val, sp[0]->s_n);
  }
  
! static void noise_setup(void) {
      noise_class = class_new(gensym("noise~"), (t_newmethod)noise_new, 0,
          sizeof(t_noise), 0, 0);





More information about the Pd-cvs mailing list