Update of /cvsroot/pure-data/externals/arraysize
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4032
Modified Files:
arraysize-help.pd arraysize.c
Log Message:
added cold inlet to set array name
Index: arraysize-help.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/arraysize/arraysize-help.pd,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** arraysize-help.pd 16 Jul 2005 05:44:23 -0000 1.2
--- arraysize-help.pd 31 Jul 2006 00:51:36 -0000 1.3
***************
*** 1,18 ****
! #N canvas 359 162 460 292 10;
#N canvas 0 22 450 300 graph1 0;
#X array test 100 float 0;
#X coords 0 1 99 -1 200 140 1;
! #X restore 197 38 graph;
! #X obj 22 49 arraysize test;
! #X floatatom 22 73 5 0 0 0 - - -;
! #X msg 22 26 bang;
! #X text 24 205 arraysize returns the size of an array when banged.
! ;
! #X floatatom 22 173 5 0 0 0 - - -;
! #X msg 22 122 bang;
! #X obj 22 149 arraysize;
! #X msg 65 122 set test;
! #X obj 228 244 pddp_open all_about_arrays;
! #X text 124 243 For more info:;
#X connect 1 0 2 0;
#X connect 3 0 1 0;
--- 1,21 ----
! #N canvas 359 162 464 296 10;
#N canvas 0 22 450 300 graph1 0;
#X array test 100 float 0;
#X coords 0 1 99 -1 200 140 1;
! #X restore 193 76 graph;
! #X obj 22 54 arraysize test;
! #X floatatom 22 78 5 0 0 0 - - -;
! #X msg 22 31 bang;
! #X text 24 5 arraysize returns the size of an array when banged.;
! #X floatatom 22 163 5 0 0 0 - - -;
! #X msg 22 112 bang;
! #X obj 22 139 arraysize;
! #X msg 65 112 set test;
! #X obj 228 264 pddp_open all_about_arrays;
! #X text 124 263 For more info:;
! #X floatatom 22 245 5 0 0 0 - - -;
! #X msg 22 194 bang;
! #X obj 22 221 arraysize;
! #X msg 80 197 symbol test;
#X connect 1 0 2 0;
#X connect 3 0 1 0;
***************
*** 20,21 ****
--- 23,27 ----
#X connect 7 0 5 0;
#X connect 8 0 7 0;
+ #X connect 12 0 13 0;
+ #X connect 13 0 11 0;
+ #X connect 14 0 13 1;
Index: arraysize.c
===================================================================
RCS file: /cvsroot/pure-data/externals/arraysize/arraysize.c,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** arraysize.c 9 Mar 2003 11:10:53 -0000 1.3
--- arraysize.c 31 Jul 2006 00:51:36 -0000 1.4
***************
*** 42,45 ****
--- 42,46 ----
t_arraysize *x = (t_arraysize *)pd_new(arraysize_class);
+ symbolinlet_new(&x->x_obj, &x->array_name);
outlet_new(&x->x_obj, gensym("float"));
***************
*** 53,57 ****
arraysize_class = class_new(gensym("arraysize"), (t_newmethod)arraysize_new, 0, sizeof(t_arraysize), CLASS_DEFAULT, A_DEFSYMBOL, 0);
! class_addmethod(arraysize_class,(t_method)arraysize_set,gensym("set"), A_DEFSYM, 0);
class_addbang(arraysize_class,arraysize_bang);
}
--- 54,58 ----
arraysize_class = class_new(gensym("arraysize"), (t_newmethod)arraysize_new, 0, sizeof(t_arraysize), CLASS_DEFAULT, A_DEFSYMBOL, 0);
! class_addmethod(arraysize_class,(t_method)arraysize_set,gensym("set"), A_DEFSYMBOL, 0);
class_addbang(arraysize_class,arraysize_bang);
}