Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2808
Modified Files: Tag: devel_0_39 desire.c Log Message: reformatting some of the struct/scalar code
Index: desire.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v retrieving revision 1.1.2.53 retrieving revision 1.1.2.54 diff -C2 -d -r1.1.2.53 -r1.1.2.54 *** desire.c 12 Nov 2005 19:46:33 -0000 1.1.2.53 --- desire.c 15 Nov 2005 18:49:58 -0000 1.1.2.54 *************** *** 5650,5655 **** { error("graph: empty bounds rectangle"); ! x1 = y1 = 0; ! x2 = y2 = 1; } glist_redraw(x); --- 5650,5655 ---- { error("graph: empty bounds rectangle"); ! x->gl_x1 = x->gl_y1 = 0; [...1856 lines suppressed...] static void sublist_setup(void) --- 10780,10797 ---- int onset, type; t_word *w; ! if (!template) {pd_error(x, "sublist: couldn't find template %s", templatesym->s_name); return;} ! if (!gpointer_check(gp, 0)) {pd_error(x, "get: stale or empty pointer"); return;} ! if (!template_find_field(template, x->x_fieldsym, &onset, &type, &dummy)) { pd_error(x, "sublist: couldn't find field %s", x->x_fieldsym->s_name); return; } ! if (type != DT_LIST) {pd_error(x, "sublist: field %s not of type list", x->x_fieldsym->s_name); return;} if (gs->gs_which == GP_ARRAY) w = gp->gp_un.gp_w; else w = gp->gp_un.gp_scalar->sc_vec; gpointer_setglist(&x->x_gp, *(t_glist **)(((char *)w) + onset), 0); outlet_pointer(x->x_obj.ob_outlet, &x->x_gp); }
! static void sublist_free(t_sublist *x, t_gpointer *gp) {gpointer_unset(&x->x_gp);}
static void sublist_setup(void)