1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90
|
#N canvas 697 324 312 252 10;
#X declare -path .;
#N canvas 6 50 681 696 run-test 0;
#X obj 71 76 symbol;
#X obj 71 44 inlet test-to-run;
#X obj 88 509 outlet result;
#X obj 88 485 pack 0 s;
#X msg 140 72 bang;
#X obj 71 135 s \$0-send;
#N canvas 395 348 450 300 print 0;
#X obj 101 247 print regression-test;
#X obj 101 204 pack s s;
#X obj 101 117 select 1;
#X obj 152 137 b;
#X msg 152 160 failed;
#X msg 101 138 OK;
#X obj 101 185 symbol;
#X msg 101 223 \$2: \$1;
#X obj 296 82 inlet test;
#X obj 101 92 inlet result;
#X connect 1 0 7 0;
#X connect 2 0 5 0;
#X connect 2 1 3 0;
#X connect 3 0 4 0;
#X connect 4 0 6 0;
#X connect 5 0 6 0;
#X connect 6 0 1 0;
#X connect 7 0 0 0;
#X connect 8 0 1 1;
#X connect 9 0 2 0;
#X restore 118 454 pd print result;
#X obj 88 435 t f f;
#X obj 219 317 s pd-\$0-regressiontest;
#X msg 219 246 clear \, obj 100 100 r \$2-send \, obj 100 150 \$1 \, obj 100 200 s \$2-receive \, connect 0 0 1 0 \, connect 1 0 2 0;
#X msg 208 294 clear;
#X obj 88 239 delay 0;
#X obj 71 160 r \$0-receive;
#X obj 71 183 moses 0;
#X obj 71 206 * -1;
#X obj 110 207 t f b;
#X obj 88 262 f;
#X msg 137 239 stop;
#X obj 88 312 delay 0;
#X obj 88 335 f;
#X msg 154 209 0;
#X obj 71 104 t b b s s b;
#X obj 313 289 t s s;
#X obj 219 226 pack s \$0;
#X obj 88 385 t f b;
#X obj 88 289 t b f;
#X connect 0 0 21 0;
#X connect 1 0 0 0;
#X connect 3 0 2 0;
#X connect 4 0 0 0;
#X connect 7 0 3 0;
#X connect 7 1 6 0;
#X connect 9 0 8 0;
#X connect 10 0 8 0;
#X connect 11 0 16 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 1 15 0;
#X connect 14 0 11 0;
#X connect 15 0 16 0;
#X connect 15 1 17 0;
#X connect 16 0 25 0;
#X connect 17 0 11 0;
#X connect 18 0 19 0;
#X connect 19 0 24 0;
#X connect 20 0 16 1;
#X connect 21 0 5 0;
#X connect 21 1 11 0;
#X connect 21 2 23 0;
#X connect 21 3 22 0;
#X connect 21 4 20 0;
#X connect 22 0 3 1;
#X connect 22 1 6 1;
#X connect 23 0 9 0;
#X connect 24 0 7 0;
#X connect 24 1 10 0;
#X connect 25 0 18 0;
#X connect 25 1 19 1;
#X restore 94 138 pd run-test;
#X obj 94 163 outlet;
#X obj 94 111 inlet;
#N canvas 672 477 450 300 \$0-regressiontest 0;
#X restore 92 186 pd \$0-regressiontest;
#X obj 91 49 declare -path .;
#X connect 0 0 1 0;
#X connect 2 0 0 0;
|