[PD-cvs] pd/src desire.c,1.1.2.217.2.45,1.1.2.217.2.46

Mathieu Bouchard matju at users.sourceforge.net
Fri Dec 8 10:46:43 CET 2006


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

Modified Files:
      Tag: desiredata
	desire.c 
Log Message:
0.40: message_adddollsym


Index: desire.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v
retrieving revision 1.1.2.217.2.45
retrieving revision 1.1.2.217.2.46
diff -C2 -d -r1.1.2.217.2.45 -r1.1.2.217.2.46
*** desire.c	8 Dec 2006 09:43:05 -0000	1.1.2.217.2.45
--- desire.c	8 Dec 2006 09:46:39 -0000	1.1.2.217.2.46
***************
*** 6096,6101 ****
  static void message_adddollar(t_message *x, t_floatarg f)
  {t_atom a; SETDOLLAR(&a, f<0?0:(int)f); binbuf_add(x->binbuf, 1, &a); gobj_changed(x,"binbuf");}
! static void message_adddollsym(t_message *x, t_symbol *s)
! {t_atom a; SETDOLLSYM(&a, s);      binbuf_add(x->binbuf, 1, &a);      gobj_changed(x,"binbuf");}
  
  static void message_addsemi(t_message *x) {message_add(x,0,0,0);}
--- 6096,6112 ----
  static void message_adddollar(t_message *x, t_floatarg f)
  {t_atom a; SETDOLLAR(&a, f<0?0:(int)f); binbuf_add(x->binbuf, 1, &a); gobj_changed(x,"binbuf");}
! //static void message_adddollsym(t_message *x, t_symbol *s)
! //{t_atom a; SETDOLLSYM(&a, s);      binbuf_add(x->binbuf, 1, &a);      gobj_changed(x,"binbuf");}
! 
! static void message_adddollsym(t_message *x, t_symbol *s) {
!     t_atom a;
!     char buf[MAXPDSTRING];
!     buf[0] = '$';
!     strncpy(buf+1, s->s_name, MAXPDSTRING-2);
!     buf[MAXPDSTRING-1] = 0;
!     SETDOLLSYM(&a, gensym(buf));
!     binbuf_add(x->binbuf, 1, &a);
!     gobj_changed(x,"binbuf");
! }
  
  static void message_addsemi(t_message *x) {message_add(x,0,0,0);}





More information about the Pd-cvs mailing list