[PD-cvs] SF.net SVN: pure-data:[10669] trunk/externals/mrpeach/flist2tab/flist2tab.c

mrpeach at users.sourceforge.net mrpeach at users.sourceforge.net
Wed Jan 28 22:42:46 CET 2009


Revision: 10669
          http://pure-data.svn.sourceforge.net/pure-data/?rev=10669&view=rev
Author:   mrpeach
Date:     2009-01-28 21:42:46 +0000 (Wed, 28 Jan 2009)

Log Message:
-----------
Added an outlet for the array size. The outlet is updated with each incoming list or float. This makes it easier to append to existing arrays.

Modified Paths:
--------------
    trunk/externals/mrpeach/flist2tab/flist2tab.c

Modified: trunk/externals/mrpeach/flist2tab/flist2tab.c
===================================================================
--- trunk/externals/mrpeach/flist2tab/flist2tab.c	2009-01-28 18:57:42 UTC (rev 10668)
+++ trunk/externals/mrpeach/flist2tab/flist2tab.c	2009-01-28 21:42:46 UTC (rev 10669)
@@ -19,6 +19,7 @@
     t_symbol    *x_arrayname;
     t_float     x_ft1;
     t_float     x_offset;
+    t_outlet    *x_sizeout;
 } t_flist2tab;
 
 static void flist2tab_list(t_flist2tab *x, t_symbol *s, int argc, t_atom *argv);
@@ -80,6 +81,8 @@
                 vec[i+offset] = argv[i].a_w.w_float;
 #endif
         }
+        /* output the size of the array */
+        outlet_float(x->x_sizeout, npoints);
     }
 }
 
@@ -119,6 +122,8 @@
         vec[offset] = f;
 #endif
         garray_redraw(a);
+        /* output the size of the array */
+        outlet_float(x->x_sizeout, npoints);
     }
 }
 
@@ -132,6 +137,7 @@
     t_flist2tab *x = (t_flist2tab *)pd_new(flist2tab_class);
     x->x_offset = 0;
     x->x_arrayname = s;
+    x->x_sizeout = outlet_new(&x->x_obj, &s_float);
     floatinlet_new(&x->x_obj, &x->x_offset);
     return (x);
 }


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.




More information about the Pd-cvs mailing list