green light, red light

svn path=/trunk/abstractions/pureunity/; revision=4341

1 files changed, 65 insertions, 2 deletions

diff --git a/main.pd b/main.pd
index 2c9f9c6..6c10bf6 100644
--- a/main.pd
+++ b/main.pd
@@ -1,2 +1,65 @@
-#N canvas 173 216 450 300 10;
-#X obj 30 20 arith-test f;
+#N canvas 385 232 448 442 10;
+#X obj 41 85 arith-test f;
+#X obj 19 20 loadbang;
+#X obj 28 42 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 41 180 print;
+#N canvas 509 382 450 300 other 0;
+#X obj 20 38 twice symbol foo bar;
+#X obj 20 21 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 20 57 print;
+#X obj 20 81 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 20 117 print;
+#X obj 20 98 3times symbol foo bar baz;
+#X obj 20 141 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 20 177 print;
+#X obj 20 158 4times symbol foo bar baz fnord;
+#X connect 0 0 2 0;
+#X connect 1 0 0 0;
+#X connect 3 0 5 0;
+#X connect 5 0 4 0;
+#X connect 6 0 8 0;
+#X connect 8 0 7 0;
+#X restore 218 29 pd other;
+#X obj 19 66 t b b b;
+#X obj 71 161 +;
+#X msg 121 161 0;
+#X msg 71 123 float \$1;
+#X obj 41 104 t a a;
+#X obj 96 161 t f;
+#X obj 19 153 f;
+#X obj 71 142 == 0;
+#X obj 19 199 print total_failures;
+#X obj 30 219 sel 0;
+#X obj 38 280 bng 100 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-262144;
+#X msg 38 261 color \$1 \, bang;
+#X msg 30 238 16;
+#X msg 60 238 13;
+#X text 24 392 This does not count errors not reported by the tests
+;
+#X text 25 406 Consult the console for more information;
+#X connect 0 0 9 0;
+#X connect 1 0 5 0;
+#X connect 2 0 5 0;
+#X connect 5 0 11 0;
+#X connect 5 1 0 0;
+#X connect 5 2 7 0;
+#X connect 6 0 10 0;
+#X connect 6 0 11 1;
+#X connect 7 0 6 1;
+#X connect 8 0 12 0;
+#X connect 9 0 3 0;
+#X connect 9 1 8 0;
+#X connect 10 0 6 1;
+#X connect 11 0 13 0;
+#X connect 11 0 14 0;
+#X connect 12 0 6 0;
+#X connect 14 0 17 0;
+#X connect 14 1 18 0;
+#X connect 16 0 15 0;
+#X connect 17 0 16 0;
+#X connect 18 0 16 0;