[PD-cvs] pd/src desire.c,1.1.2.197,1.1.2.198

[Mathieu Bouchard]

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 */