[PD-cvs] pd/src g_readwrite.c,1.3.8.3,1.3.8.4

[Mathieu Bouchard]

Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17815

Modified Files:
      Tag: devel_0_39
	g_readwrite.c 
Log Message:
cut canvas_saveto in two funcs as required by impd/desire.


Index: g_readwrite.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/g_readwrite.c,v
retrieving revision 1.3.8.3
retrieving revision 1.3.8.4
diff -C2 -d -r1.3.8.3 -r1.3.8.4
*** g_readwrite.c	25 Jul 2005 18:21:28 -0000	1.3.8.3
--- g_readwrite.c	8 Sep 2005 08:13:35 -0000	1.3.8.4
***************
*** 20,24 ****
      int *p_next)
  {
!     int i, j;
      int indexwas = *p_next;
      *p_indexout = indexwas;
--- 20,24 ----
      int *p_next)
  {
!     int i;
      int indexwas = *p_next;
      *p_indexout = indexwas;
***************
*** 50,54 ****
      int *p_nextmsg, t_symbol *templatesym, t_word *w, int argc, t_atom *argv)
  {
!     int message, nline, n, i;
  
      t_template *template = template_findbyname(templatesym);
--- 50,54 ----
      int *p_nextmsg, t_symbol *templatesym, t_word *w, int argc, t_atom *argv)
  {
!     int message, n, i;
  
      t_template *template = template_findbyname(templatesym);
***************
*** 559,567 ****
      /* save to a binbuf, called recursively; cf. canvas_savetofile() which
      saves the document, and is only called on root canvases. */
! static void canvas_saveto(t_canvas *x, t_binbuf *b)
! {
!     t_gobj *y;
!     t_linetraverser t;
!     t_outconnect *oc;
          /* subpatch */
      if (x->gl_owner && !x->gl_env)
--- 559,564 ----
      /* save to a binbuf, called recursively; cf. canvas_savetofile() which
      saves the document, and is only called on root canvases. */
! void canvas_savecontainerto(t_canvas *x, t_binbuf *b)
!  {
          /* subpatch */
      if (x->gl_owner && !x->gl_env)
***************
*** 583,586 ****
--- 580,590 ----
                  (int)x->gl_font);
  
+ 
+ }
+ static void canvas_saveto(t_canvas *x, t_binbuf *b) {
+     t_gobj *y;
+     t_linetraverser t;
+     t_outconnect *oc;
+     canvas_savecontainerto(x,b);
      for (y = x->gl_list; y; y = y->g_next)
          gobj_save(y, b);