an abstraction that provides versioning of it's parent

svn path=/trunk/externals/iem/iemguts/; revision=10395

1 files changed, 82 insertions, 0 deletions

diff --git a/examples/versioning.pd b/examples/versioning.pd
new file mode 100644
index 0000000..3d87734
--- /dev/null
+++ b/examples/versioning.pd
@@ -0,0 +1,82 @@
+#N canvas 474 208 450 587 10;
+#X msg 151 401 savetofile \$1.pd .;
+#X obj 198 105 canvasname 1;
+#X obj 124 68 savebangs 2;
+#X obj 151 421 sendcanvas 1;
+#N canvas 159 471 450 398 versioning 0;
+#X obj 114 39 inlet;
+#X obj 114 262 outlet;
+#X text 179 266 new name;
+#X text 164 39 old name;
+#X obj 114 129 list split 1;
+#X obj 114 217 list append;
+#N canvas 0 0 450 455 reversion 0;
+#X obj 78 394 outlet;
+#N canvas 437 238 450 300 symbolize 0;
+#X obj 72 50 inlet;
+#X obj 72 262 outlet;
+#X obj 181 124 symbol;
+#X obj 72 147 makefilename %d;
+#X obj 72 177 t s;
+#X obj 72 100 route float bang;
+#X msg 126 121 0;
+#X connect 0 0 5 0;
+#X connect 2 0 4 0;
+#X connect 3 0 4 0;
+#X connect 4 0 1 0;
+#X connect 5 0 3 0;
+#X connect 5 1 6 0;
+#X connect 5 2 2 0;
+#X connect 6 0 3 0;
+#X restore 78 83 pd symbolize;
+#X obj 78 363 l2s :;
+#X obj 78 126 s2l :;
+#X obj 78 46 inlet next;
+#X obj 78 148 t l l;
+#X obj 110 171 list length;
+#X obj 110 193 - 1;
+#X obj 78 215 list split;
+#X obj 78 339 list append;
+#X obj 152 265 + 1;
+#X obj 152 243 t f;
+#X obj 152 311 t l b;
+#X obj 152 288 list append 0;
+#X connect 1 0 3 0;
+#X connect 2 0 0 0;
+#X connect 3 0 5 0;
+#X connect 4 0 1 0;
+#X connect 5 0 8 0;
+#X connect 5 1 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 1;
+#X connect 8 0 9 0;
+#X connect 8 1 11 0;
+#X connect 9 0 2 0;
+#X connect 10 0 13 0;
+#X connect 11 0 10 0;
+#X connect 12 0 9 1;
+#X connect 12 1 13 1;
+#X connect 13 0 12 0;
+#X restore 154 171 pd reversion;
+#X obj 328 62 inlet branch!;
+#X obj 114 102 s2l |;
+#X obj 114 239 l2s |;
+#X connect 0 0 8 0;
+#X connect 4 0 5 0;
+#X connect 4 1 6 0;
+#X connect 5 0 9 0;
+#X connect 6 0 5 1;
+#X connect 8 0 4 0;
+#X connect 9 0 1 0;
+#X restore 198 293 pd versioning;
+#X symbolatom 222 252 10 0 0 0 - - -;
+#X msg 222 228 bang;
+#X obj 119 291 t s s;
+#X connect 0 0 3 0;
+#X connect 1 0 4 0;
+#X connect 2 1 1 0;
+#X connect 4 0 7 0;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 7 0 1 0;
+#X connect 7 1 0 0;