[PD-cvs] pd/src m_pd.h, 1.4.4.11.2.33.2.59, 1.4.4.11.2.33.2.60 kernel.c, 1.1.2.68, 1.1.2.69

[Mathieu Bouchard]

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

Modified Files:
      Tag: desiredata
	m_pd.h kernel.c 
Log Message:
added outlet_atom()


Index: m_pd.h
===================================================================
RCS file: /cvsroot/pure-data/pd/src/m_pd.h,v
retrieving revision 1.4.4.11.2.33.2.59
retrieving revision 1.4.4.11.2.33.2.60
diff -C2 -d -r1.4.4.11.2.33.2.59 -r1.4.4.11.2.33.2.60
*** m_pd.h	19 Jul 2007 23:41:27 -0000	1.4.4.11.2.33.2.59
--- m_pd.h	20 Jul 2007 21:23:23 -0000	1.4.4.11.2.33.2.60
***************
*** 459,462 ****
--- 459,463 ----
  EXTERN void outlet_symbol(  t_outlet *x, t_symbol *s);
  EXTERN void outlet_string(  t_outlet *x, const char *s); /* makes a refcounted symbol (copying s) */
+ EXTERN void outlet_atom(    t_outlet *x, t_atom *a);
  EXTERN void outlet_list(    t_outlet *x, t_symbol *s, int argc, t_atom *argv);
  EXTERN void outlet_anything(t_outlet *x, t_symbol *s, int argc, t_atom *argv);
***************
*** 558,562 ****
  EXTERN void verbose(int level, const char *fmt, ...);
  EXTERN void bug(const char *fmt, ...);
! EXTERN void pd_error(void *object, const char *fmt, ...);
  EXTERN void sys_logerror(const char *object, const char *s);
  EXTERN void sys_unixerror(const char *object);
--- 559,563 ----
  EXTERN void verbose(int level, const char *fmt, ...);
  EXTERN void bug(const char *fmt, ...);
! EXTERN void pd_error(void *object, const char *fmt, ...) /*__attribute__ ((deprecated))*/;
  EXTERN void sys_logerror(const char *object, const char *s);
  EXTERN void sys_unixerror(const char *object);

Index: kernel.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/kernel.c,v
retrieving revision 1.1.2.68
retrieving revision 1.1.2.69
diff -C2 -d -r1.1.2.68 -r1.1.2.69
*** kernel.c	20 Jul 2007 04:22:16 -0000	1.1.2.68
--- kernel.c	20 Jul 2007 21:23:23 -0000	1.1.2.69
***************
*** 720,723 ****
--- 720,730 ----
  void outlet_anything(t_outlet *x, t_symbol *s, int argc, t_atom *argv) {each_connect(oc,x) typedmess(oc->oc_to,s,argc,argv);}
  
+ void outlet_atom(t_outlet *x, t_atom *a) {
+     if      (a->a_type == A_FLOAT  ) outlet_float(  x,a->a_float);
+     else if (a->a_type == A_SYMBOL ) outlet_symbol( x,a->a_symbol);
+     else if (a->a_type == A_POINTER) outlet_pointer(x,a->a_gpointer);
+     else error("can't send atom whose type is %d",a->a_type);
+ }
+ 
  /* get the outlet's declared symbol */
  t_symbol *outlet_getsymbol(t_outlet *x) {return x->sym;}