[PD-cvs] abstractions/footils/list-abs list-fifo-help.pd, 1.2, 1.3 list-fifo.pd, 1.2, 1.3 list-lifo-help.pd, 1.1, 1.2 list-lifo.pd, 1.1, 1.2

Wed May 30 21:07:48 CEST 2007

Update of /cvsroot/pure-data/abstractions/footils/list-abs
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6760

Modified Files:
	list-fifo-help.pd list-fifo.pd list-lifo-help.pd list-lifo.pd 
Log Message:
added clear-message to list-f/lifo

Index: list-fifo-help.pd
===================================================================
RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/list-fifo-help.pd,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** list-fifo-help.pd	30 May 2007 08:45:37 -0000	1.2
--- list-fifo-help.pd	30 May 2007 19:07:46 -0000	1.3
***************
*** 26,29 ****
--- 26,30 ----
  #X connect 2 0 3 0;
  #X restore 140 364 pd show;
+ #X msg 74 262 clear;
  #X msg 140 390;
  #X connect 0 0 7 1;
***************
*** 35,37 ****
  #X connect 9 0 7 1;
  #X connect 10 0 7 0;
! #X connect 14 0 15 0;
--- 36,39 ----
  #X connect 9 0 7 1;
  #X connect 10 0 7 0;
! #X connect 14 0 16 0;
! #X connect 15 0 7 0;

Index: list-lifo.pd
===================================================================
RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/list-lifo.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** list-lifo.pd	30 May 2007 08:45:37 -0000	1.1
--- list-lifo.pd	30 May 2007 19:07:46 -0000	1.2
***************
*** 1,34 ****
  #N canvas 300 195 692 556 10;
! #X obj 218 56 inlet;
! #X obj 218 184 t a a;
! #X obj 218 250 list prepend;
! #X obj 316 302 t b a;
! #X obj 316 325 list;
! #X obj 93 379 list;
! #X obj 197 431 list split 1;
! #X obj 93 401 t a a;
! #X obj 132 462 list split;
! #X obj 132 498 outlet;
! #X obj 93 56 inlet;
! #X text 330 252 prepend size of list;
! #X obj 276 494 outlet;
! #X obj 297 217 list-len;
! #X obj 316 55 inlet;
! #X obj 93 431 list split 1;
! #X text 369 304 store lists;
! #X text 298 430 get length of next stored list and split it off.;
! #X text 91 34 pop;
! #X text 220 34 push;
! #X text 315 35 reset stack;
! #X obj 316 79 b;
! #X obj 218 301 list append;
  #X connect 0 0 1 0;
  #X connect 1 0 2 0;
  #X connect 1 1 13 0;
! #X connect 2 0 22 0;
  #X connect 3 0 4 0;
  #X connect 3 1 4 1;
  #X connect 4 0 5 1;
! #X connect 4 0 22 1;
  #X connect 5 0 7 0;
  #X connect 6 0 8 1;
--- 1,36 ----
  #N canvas 300 195 692 556 10;
! #X obj 268 56 inlet;
! #X obj 268 184 t a a;
! #X obj 268 250 list prepend;
! #X obj 366 302 t b a;
! #X obj 366 325 list;
! #X obj 143 379 list;
! #X obj 247 431 list split 1;
! #X obj 143 401 t a a;
! #X obj 182 462 list split;
! #X obj 182 498 outlet;
! #X obj 71 56 inlet;
! #X text 380 252 prepend size of list;
! #X obj 326 494 outlet;
! #X obj 347 217 list-len;
! #X obj 366 55 inlet;
! #X obj 143 431 list split 1;
! #X text 419 304 store lists;
! #X text 348 430 get length of next stored list and split it off.;
! #X text 270 34 push;
! #X text 365 35 reset stack;
! #X obj 366 79 b;
! #X obj 71 138 route clear;
! #X obj 143 164 b;
! #X text 69 34 pop (or clear);
! #X obj 268 301 list append;
  #X connect 0 0 1 0;
  #X connect 1 0 2 0;
  #X connect 1 1 13 0;
! #X connect 2 0 24 0;
  #X connect 3 0 4 0;
  #X connect 3 1 4 1;
  #X connect 4 0 5 1;
! #X connect 4 0 24 1;
  #X connect 5 0 7 0;
  #X connect 6 0 8 1;
***************
*** 38,45 ****
  #X connect 8 0 9 0;
  #X connect 8 1 3 0;
! #X connect 10 0 5 0;
  #X connect 13 0 2 1;
! #X connect 14 0 21 0;
  #X connect 15 1 8 0;
  #X connect 21 0 3 0;
! #X connect 22 0 3 0;
--- 40,50 ----
  #X connect 8 0 9 0;
  #X connect 8 1 3 0;
! #X connect 10 0 21 0;
  #X connect 13 0 2 1;
! #X connect 14 0 20 0;
  #X connect 15 1 8 0;
+ #X connect 20 0 3 0;
  #X connect 21 0 3 0;
! #X connect 21 1 22 0;
! #X connect 22 0 5 0;
! #X connect 24 0 3 0;

Index: list-lifo-help.pd
===================================================================
RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/list-lifo-help.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** list-lifo-help.pd	30 May 2007 08:45:37 -0000	1.1
--- list-lifo-help.pd	30 May 2007 19:07:46 -0000	1.2
***************
*** 6,10 ****
  -1;
  #X msg 295 274 bang;
- #X text 92 439 2007 Frank Barknecht;
  #X msg 238 166 a b c;
  #X msg 140 149 bang;
--- 6,9 ----
***************
*** 27,37 ****
  #X restore 140 364 pd show;
  #X msg 140 390;
! #X connect 0 0 11 1;
! #X connect 1 0 11 1;
! #X connect 2 0 11 1;
! #X connect 4 0 11 2;
! #X connect 6 0 11 1;
! #X connect 7 0 11 0;
! #X connect 11 0 14 0;
! #X connect 11 1 3 0;
! #X connect 14 0 15 0;
--- 26,39 ----
  #X restore 140 364 pd show;
  #X msg 140 390;
! #X msg 74 262 clear;
! #X text 82 439 2007 Frank Barknecht;
! #X connect 0 0 10 1;
! #X connect 1 0 10 1;
! #X connect 2 0 10 1;
! #X connect 4 0 10 2;
! #X connect 5 0 10 1;
! #X connect 6 0 10 0;
! #X connect 10 0 13 0;
! #X connect 10 1 3 0;
! #X connect 13 0 14 0;
! #X connect 15 0 10 0;

Index: list-fifo.pd
===================================================================
RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/list-fifo.pd,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** list-fifo.pd	30 May 2007 08:45:37 -0000	1.2
--- list-fifo.pd	30 May 2007 19:07:46 -0000	1.3
***************
*** 1,26 ****
  #N canvas 300 195 692 556 10;
! #X obj 218 56 inlet;
! #X obj 218 184 t a a;
! #X obj 218 250 list prepend;
! #X obj 218 301 list prepend;
! #X obj 316 302 t b a;
! #X obj 316 325 list;
! #X obj 93 379 list;
! #X obj 197 431 list split 1;
! #X obj 93 401 t a a;
! #X obj 132 462 list split;
! #X obj 132 498 outlet;
! #X obj 93 56 inlet;
! #X text 330 252 prepend size of list;
! #X obj 276 494 outlet;
! #X obj 297 217 list-len;
! #X obj 316 55 inlet;
! #X obj 93 431 list split 1;
! #X text 369 304 store lists;
! #X text 298 430 get length of next stored list and split it off.;
! #X text 91 34 pop;
! #X text 220 34 push;
! #X text 315 35 reset stack;
! #X obj 316 79 b;
  #X connect 0 0 1 0;
  #X connect 1 0 2 0;
--- 1,28 ----
  #N canvas 300 195 692 556 10;
! #X obj 268 56 inlet;
! #X obj 268 184 t a a;
! #X obj 268 250 list prepend;
! #X obj 268 301 list prepend;
! #X obj 366 302 t b a;
! #X obj 366 325 list;
! #X obj 143 379 list;
! #X obj 247 431 list split 1;
! #X obj 143 401 t a a;
! #X obj 182 462 list split;
! #X obj 182 498 outlet;
! #X obj 71 56 inlet;
! #X text 380 252 prepend size of list;
! #X obj 326 494 outlet;
! #X obj 347 217 list-len;
! #X obj 366 55 inlet;
! #X obj 143 431 list split 1;
! #X text 419 304 store lists;
! #X text 348 430 get length of next stored list and split it off.;
! #X text 270 34 push;
! #X text 365 35 reset stack;
! #X obj 366 79 b;
! #X obj 71 138 route clear;
! #X obj 143 164 b;
! #X text 69 34 pop (or clear);
  #X connect 0 0 1 0;
  #X connect 1 0 2 0;
***************
*** 39,45 ****
  #X connect 9 0 10 0;
  #X connect 9 1 4 0;
! #X connect 11 0 6 0;
  #X connect 14 0 2 1;
! #X connect 15 0 22 0;
  #X connect 16 1 9 0;
  #X connect 22 0 4 0;
--- 41,50 ----
  #X connect 9 0 10 0;
  #X connect 9 1 4 0;
! #X connect 11 0 22 0;
  #X connect 14 0 2 1;
! #X connect 15 0 21 0;
  #X connect 16 1 9 0;
+ #X connect 21 0 4 0;
  #X connect 22 0 4 0;
+ #X connect 22 1 23 0;
+ #X connect 23 0 6 0;