From 204cb1b74aeec62614a3de516ab67779618e9a36 Mon Sep 17 00:00:00 2001 From: Luke Iannini Date: Sun, 26 Oct 2008 08:22:12 +0000 Subject: continued reorg svn path=/trunk/abstractions/sfruit/; revision=10349 --- core/list-value-extend-help.pd | 46 ------------------------------------------ 1 file changed, 46 deletions(-) delete mode 100644 core/list-value-extend-help.pd (limited to 'core/list-value-extend-help.pd') diff --git a/core/list-value-extend-help.pd b/core/list-value-extend-help.pd deleted file mode 100644 index a81ed16..0000000 --- a/core/list-value-extend-help.pd +++ /dev/null @@ -1,46 +0,0 @@ -#N canvas 0 22 622 415 10; -#X declare -lib list-abs; -#X declare -lib list-abs; -#X declare -lib list-abs; -#X obj 451 20 import list-abs; -#X obj 47 208 prepent set; -#X msg 47 124 a b c; -#X msg 91 124 d e f; -#X msg 136 124 bang; -#X msg 47 231; -#X obj 283 208 prepent set; -#X obj 283 127 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 --1 -1; -#X obj 139 345 prepent set; -#X obj 139 294 metro 100; -#X obj 139 252 loadbang; -#X obj 139 274 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 -1; -#X text 275 313 uses [list-value] internally \; exploit that if you -like; -#X text 460 370 2008 Luke Iannini; -#X msg 283 231; -#X msg 139 370; -#X obj 139 316 list-value \$0.my-list; -#X obj 47 172 list-value-extend \$0.my-list; -#X obj 283 172 list-value-extend \$0.my-list; -#X text 15 24 [list-value-extend] - append new input to the current -value \, then replace the current value with the result. Outputs current -value when [bang(ed \, just like vanilla [list-value]. Use [clear( -to clear all [list-value-extend]s and [list-value]s of the same name. -; -#X msg 173 124 clear; -#X connect 1 0 5 0; -#X connect 2 0 17 0; -#X connect 3 0 17 0; -#X connect 4 0 17 0; -#X connect 6 0 14 0; -#X connect 7 0 18 0; -#X connect 8 0 15 0; -#X connect 9 0 16 0; -#X connect 10 0 11 0; -#X connect 11 0 9 0; -#X connect 16 0 8 0; -#X connect 17 0 1 0; -#X connect 18 0 6 0; -#X connect 20 0 17 0; -- cgit v1.2.1