Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9874
Modified Files: Tag: devel_0_38 g_array.c Log Message: fixed array creating bug
Index: g_array.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/g_array.c,v retrieving revision 1.3.4.1 retrieving revision 1.3.4.2 diff -C2 -d -r1.3.4.1 -r1.3.4.2 *** g_array.c 5 Nov 2004 13:55:58 -0000 1.3.4.1 --- g_array.c 15 Nov 2004 22:19:46 -0000 1.3.4.2 *************** *** 225,230 **** x->x_usedindsp = 0; x->x_saveit = ((flags & 1) != 0); - glist_add(gl, &x->x_gobj); - x->x_glist = gl;
#ifdef GARRAY_THREAD_LOCK /* TB: array lock */ --- 225,228 ---- *************** *** 235,238 **** --- 233,239 ---- #endif /* GARRAY_THREAD_LOCK */
+ glist_add(gl, &x->x_gobj); + x->x_glist = gl; + if (x2 = pd_findbyclass(gensym("#A"), garray_class)) pd_unbind(x2, gensym("#A"));