Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv30279
Modified Files: Tag: devel_0_39 desire.c Log Message: .
Index: desire.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v retrieving revision 1.1.2.197 retrieving revision 1.1.2.198 diff -C2 -d -r1.1.2.197 -r1.1.2.198 *** desire.c 23 Nov 2006 04:58:19 -0000 1.1.2.197 --- desire.c 23 Nov 2006 05:51:31 -0000 1.1.2.198 *************** *** 65,70 ****
#define class_addmethod3(_cl,_ptr,_str,_sig) class_addmethod2(_cl,(t_method)_ptr,gensym(_str),_sig) ! #define canvas_each(CHILD,CANVAS) for(CHILD=(CANVAS)->list; CHILD; CHILD=CHILD->g_next) ! #define canvases_each(CANVAS) for(CANVAS=canvas_list; CANVAS; CANVAS=CANVAS->gl_next) #define canvas_wires_each(WIRE,TRAV,CANVAS) \ for (linetraverser_start(&TRAV,CANVAS); (WIRE=linetraverser_next(&TRAV)); ) --- 65,70 ----
#define class_addmethod3(_cl,_ptr,_str,_sig) class_addmethod2(_cl,(t_method)_ptr,gensym(_str),_sig) ! #define canvas_each(CHILD,CANVAS) for(t_gobj *CHILD=(CANVAS)->list; CHILD; CHILD=CHILD->g_next) [...1275 lines suppressed...] FILE *f = stdout; fprintf(f,"%s",s); ! for (int i=0; i<argc; i++) {atom_string(argv+i,buf,MAXPDSTRING); fprintf(f,"%s ",buf);} fprintf(f,"\n"); } *************** *** 8041,8046 **** /* properly close all open root canvases */ extern "C" void glob_closeall(void *dummy, t_floatarg fforce) { ! t_canvas *x, *y; ! for (x = canvas_list; x; ) { y = x->gl_next; canvas_close(x); /* forced closing of this root canvas */ --- 7988,7993 ---- /* properly close all open root canvases */ extern "C" void glob_closeall(void *dummy, t_floatarg fforce) { ! t_canvas *y; ! for (t_canvas *x = canvas_list; x; ) { y = x->gl_next; canvas_close(x); /* forced closing of this root canvas */