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

[Mathieu Bouchard]

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

Modified Files:
      Tag: devel_0_39
	m_pd.h 
Log Message:
dirty is now a bitset.
remove duplicate _settip decls.
added class_setfieldnames decl.


Index: m_pd.h
===================================================================
RCS file: /cvsroot/pure-data/pd/src/m_pd.h,v
retrieving revision 1.4.4.11.2.7
retrieving revision 1.4.4.11.2.8
diff -C2 -d -r1.4.4.11.2.7 -r1.4.4.11.2.8
*** m_pd.h	6 Oct 2005 06:11:37 -0000	1.4.4.11.2.7
--- m_pd.h	6 Oct 2005 07:00:27 -0000	1.4.4.11.2.8
***************
*** 160,168 ****
  typedef t_class *t_pd;      /* pure datum: nothing but a class pointer */
  #ifdef DESIRE
  typedef struct _observable {
  	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 */
! 	int ndirty;         /* degree of guilt (-1 = unknown, like "(all)" in the client side) */
! 	t_symbol *dirty[4]; /* things we may have to confess (max 4, beyond which ndirty=-1) */
  	int nobs;           /* number of spies */
  	struct _gobj **obs; /* I spy with my little I */
--- 160,168 ----
  typedef t_class *t_pd;      /* pure datum: nothing but a class pointer */
  #ifdef DESIRE
+ /* names of fields are stored in each t_class */
  typedef struct _observable {
  	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 */
! 	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 */
***************
*** 369,374 ****
  EXTERN t_inlet *signalinlet_new(t_object *owner, t_float f);
  EXTERN void inlet_free(t_inlet *x);
- EXTERN void class_settip(t_class *x,t_symbol* s);
- EXTERN void inlet_settip(t_inlet* i,t_symbol* s);
  
  EXTERN t_outlet *outlet_new(t_object *owner, t_symbol *s);
--- 369,372 ----
***************
*** 463,466 ****
--- 461,465 ----
  EXTERN void class_settip(t_class *x,t_symbol* s);
  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 */
  
  /* ------------   printing --------------------------------- */