[PD-cvs] pd/src m_pd.h,1.4.4.11.2.8,1.4.4.11.2.9

[Mathieu Bouchard]

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

Modified Files:
      Tag: devel_0_39
	m_pd.h 
Log Message:
added support for notices (observer interface).
also added class_getfieldindex (to complement class_setfieldnames).


Index: m_pd.h
===================================================================
RCS file: /cvsroot/pure-data/pd/src/m_pd.h,v
retrieving revision 1.4.4.11.2.8
retrieving revision 1.4.4.11.2.9
diff -C2 -d -r1.4.4.11.2.8 -r1.4.4.11.2.9
*** m_pd.h	6 Oct 2005 07:00:27 -0000	1.4.4.11.2.8
--- m_pd.h	6 Oct 2005 07:57:08 -0000	1.4.4.11.2.9
***************
*** 164,170 ****
--- 164,173 ----
  	struct _gobj *master;/* this struct belongs to a master (but in the tcl impl, it's _part_ of the master) */
  	struct _gobj *next; /* big hack. this is the donut hole as cut from _gobj */
+ /* actual observable */
  	int dirty;          /* bitfield of things we may have to confess (unknown=-1 like "(all)" in the client side) */
  	int nobs;           /* number of spies */
  	struct _gobj **obs; /* I spy with my little I */
+ /* virtual func for observer (not observable... sorry, this is just C) */
+ 	void (*notice)(struct _gobj *x, struct _gobj *origin, int dirty);
  } t_observable;
  #endif
***************
*** 349,352 ****
--- 352,357 ----
  #define pd_class(x) (*(x))
  
+ EXTERN void gobj_notice(t_gobj *x, t_gobj *origin, int dirty);
+ 
  /* ----------------- pointers ---------------- */
  EXTERN void gpointer_init(t_gpointer *gp);
***************
*** 462,465 ****
--- 467,471 ----
  EXTERN void inlet_settip(t_inlet* i,t_symbol* s);
  EXTERN void class_setfieldnames(t_class *x, const char *s); /* where s is split on spaces and tokenized */
+ EXTERN  int class_getfieldindex(t_class *x, const char *s);
  
  /* ------------   printing --------------------------------- */