[PD-cvs] pd/src kernel.c,1.1.2.46,1.1.2.47
Mathieu Bouchard
matju at users.sourceforge.net
Tue Jul 10 18:48:27 CEST 2007
Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31078
Modified Files:
Tag: desiredata
kernel.c
Log Message:
removed b_ prefixes
Index: kernel.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/kernel.c,v
retrieving revision 1.1.2.46
retrieving revision 1.1.2.47
diff -C2 -d -r1.1.2.46 -r1.1.2.47
*** kernel.c 28 Jun 2007 07:57:16 -0000 1.1.2.46
--- kernel.c 10 Jul 2007 16:48:25 -0000 1.1.2.47
***************
*** 103,111 ****
t_class *hash_class;
! typedef struct _hashentry {
hashkey k;
hashvalue v;
! struct _hashentry *next;
! } t_hashentry;
struct _hash : t_pd {
--- 103,111 ----
t_class *hash_class;
! struct t_hashentry {
hashkey k;
hashvalue v;
! t_hashentry *next;
! };
struct _hash : t_pd {
***************
*** 344,358 ****
static t_class *bindlist_class;
! typedef struct _bindelem {
t_pd *who;
! struct _bindelem *next;
! } t_bindelem;
! typedef struct _bindlist {
! t_pd b_pd;
! t_bindelem *b_list;
! } t_bindlist;
! #define bind_each(e,x) for (t_bindelem *e = x->b_list; e; e = e->next)
static void bindlist_bang(t_bindlist *x) {
bind_each(e,x) pd_bang(e->who);}
--- 344,357 ----
static t_class *bindlist_class;
! struct t_bindelem {
t_pd *who;
! t_bindelem *next;
! };
! struct t_bindlist : t_pd {
! t_bindelem *list;
! };
! #define bind_each(e,x) for (t_bindelem *e = x->list; e; e = e->next)
static void bindlist_bang(t_bindlist *x) {
bind_each(e,x) pd_bang(e->who);}
***************
*** 379,387 ****
if (s->thing->_class == bindlist_class) {
t_bindlist *b = (t_bindlist *)s->thing;
! b->b_list = bindelem_new(x,b->b_list);
} else {
t_bindlist *b = (t_bindlist *)pd_new(bindlist_class);
! b->b_list = bindelem_new(x,bindelem_new(s->thing,0));
! s->thing = &b->b_pd;
}
} else s->thing = x;
--- 378,386 ----
if (s->thing->_class == bindlist_class) {
t_bindlist *b = (t_bindlist *)s->thing;
! b->list = bindelem_new(x,b->list);
} else {
t_bindlist *b = (t_bindlist *)pd_new(bindlist_class);
! b->list = bindelem_new(x,bindelem_new(s->thing,0));
! s->thing = b;
}
} else s->thing = x;
***************
*** 396,411 ****
t_bindlist *b = (t_bindlist *)s->thing;
t_bindelem *e, *e2;
! if ((e = b->b_list)->who == x) {
! b->b_list = e->next;
free(e);
! } else for (e = b->b_list; (e2=e->next); e = e2) if (e2->who == x) {
e->next = e2->next;
free(e2);
break;
}
! if (!b->b_list->next) {
! s->thing = b->b_list->who;
! free(b->b_list);
! pd_free(&b->b_pd);
}
} else pd_error(x, "%s: couldn't unbind", s->name);
--- 395,410 ----
t_bindlist *b = (t_bindlist *)s->thing;
t_bindelem *e, *e2;
! if ((e = b->list)->who == x) {
! b->list = e->next;
free(e);
! } else for (e = b->list; (e2=e->next); e = e2) if (e2->who == x) {
e->next = e2->next;
free(e2);
break;
}
! if (!b->list->next) {
! s->thing = b->list->who;
! free(b->list);
! pd_free(b);
}
} else pd_error(x, "%s: couldn't unbind", s->name);
More information about the Pd-cvs
mailing list