[PD-cvs] pd/src desire.c, 1.1.2.194, 1.1.2.195 desire.h, 1.1.2.41, 1.1.2.42

Mathieu Bouchard matju at users.sourceforge.net
Tue Nov 21 07:48:03 CET 2006


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

Modified Files:
      Tag: devel_0_39
	desire.c desire.h 
Log Message:
added method 'push' in t_canvas.


Index: desire.h
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.h,v
retrieving revision 1.1.2.41
retrieving revision 1.1.2.42
diff -C2 -d -r1.1.2.41 -r1.1.2.42
*** desire.h	19 Nov 2006 08:01:55 -0000	1.1.2.41
--- desire.h	21 Nov 2006 06:48:01 -0000	1.1.2.42
***************
*** 176,180 ****
      int argc;        /* number of "$" arguments */
      t_atom *argv;    /* array of "$" arguments */
!     int dollarzero;  /* value of "$0" */
  };
  
--- 176,180 ----
      int argc;        /* number of "$" arguments */
      t_atom *argv;    /* array of "$" arguments */
!     long dollarzero;  /* value of "$0" */
  };
  

Index: desire.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v
retrieving revision 1.1.2.194
retrieving revision 1.1.2.195
diff -C2 -d -r1.1.2.194 -r1.1.2.195
*** desire.c	20 Nov 2006 03:47:08 -0000	1.1.2.194
--- desire.c	21 Nov 2006 06:47:59 -0000	1.1.2.195
***************
*** 527,531 ****
  
      if (canvas_newdirectory->s_name[0]) {
!         static int dollarzero = 1000;
          t_canvasenvironment *env = x->env = (t_canvasenvironment *)getbytes(sizeof(*x->env));
          env->dir = canvas_newdirectory;
--- 527,531 ----
  
      if (canvas_newdirectory->s_name[0]) {
!         static long dollarzero = 1000;
          t_canvasenvironment *env = x->env = (t_canvasenvironment *)getbytes(sizeof(*x->env));
          env->dir = canvas_newdirectory;
***************
*** 780,783 ****
--- 780,785 ----
  static void canvas_resortoutlets(t_canvas *x);
  
+ static void canvas_push(t_canvas *x) {pd_pushsym((t_pd *)x);}
+ 
  static void canvas_pop(t_canvas *x, t_floatarg fvis) {
      if (fvis!=0) canvas_vis(x, 1);
***************
*** 876,879 ****
--- 878,882 ----
  }
  
+ /* called by m_class.c */
  EXTERNC void canvas_popabstraction(t_canvas *x) {
      newest = (t_pd *)x;
***************
*** 7789,7792 ****
--- 7792,7796 ----
      class_addmethod3(c,canvas_numbox,"numbox","*");
  
+     class_addmethod3(c,canvas_push,"push","");
      class_addmethod3(c,canvas_pop,"pop","F");
      class_addmethod3(c,canvas_loadbang,"loadbang","");





More information about the Pd-cvs mailing list