[PD-cvs] externals/zexy/tests runtests.pd, 1.1, 1.2 runtests_nogui.pd, 1.1, 1.2 testunit.pd, 1.1, 1.2

IOhannes m zmölnig zmoelnig at users.sourceforge.net
Wed Jun 21 13:03:59 CEST 2006


Update of /cvsroot/pure-data/externals/zexy/tests
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14566

Modified Files:
	runtests.pd runtests_nogui.pd testunit.pd 
Log Message:
tests now MUST return a value in order to stop (destroy) the specific test;
this allows for tests that execute in non-zero logical time (e.g. signal-objects or timed objects)


Index: testunit.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/zexy/tests/testunit.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** testunit.pd	21 Dec 2005 10:02:17 -0000	1.1
--- testunit.pd	21 Jun 2006 11:03:57 -0000	1.2
***************
*** 1,20 ****
! #N canvas 695 274 312 252 10;
! #N canvas 0 0 564 876 run-test 0;
! #X obj 87 512 r \$0-receive;
! #X obj 71 532 f;
! #X msg 96 533 0;
  #X obj 71 76 symbol;
  #X obj 71 44 inlet test-to-run;
! #X obj 71 639 outlet result;
! #X obj 71 615 pack 0 s;
! #X obj 181 205 makefilename pd-%d-regressiontest;
! #X obj 109 226 pack s \$0 s;
! #X obj 181 186 f \$0;
! #X obj 109 160 t s b;
! #X obj 143 489 t b s s;
! #X obj 71 104 t b b s s;
! #X msg 140 72 bang;
! #X obj 90 135 s \$0-send;
! #X msg 109 246 \; \$3 clear \; \$3 obj 100 100 r \$2-send \; \$3 obj
  100 150 \$1 \; \$3 obj 100 200 s \$2-receive \; \$3 connect 0 0 1 0
  \; \$3 connect 1 0 2 0;
--- 1,16 ----
! #N canvas 302 200 312 252 10;
! #N canvas 47 151 894 418 run-test 0;
  #X obj 71 76 symbol;
  #X obj 71 44 inlet test-to-run;
! #X obj 506 344 outlet result;
! #X obj 506 320 pack 0 s;
! #X obj 150 155 makefilename pd-%d-regressiontest;
! #X obj 89 195 pack s \$0 s;
! #X obj 150 136 f \$0;
! #X obj 89 130 t s b;
! #X obj 506 140 t b s s;
! #X msg 113 76 bang;
! #X obj 71 314 s \$0-send;
! #X msg 89 215 \; \$3 clear \; \$3 obj 100 100 r \$2-send \; \$3 obj
  100 150 \$1 \; \$3 obj 100 200 s \$2-receive \; \$3 connect 0 0 1 0
  \; \$3 connect 1 0 2 0;
***************
*** 40,77 ****
  #X connect 8 0 1 1;
  #X connect 9 0 2 0;
! #X restore 101 584 pd print result;
! #X obj 71 565 t f f;
! #X msg 101 406 \; \$1 clear;
! #X obj 101 386 symbol;
! #X obj 71 364 t b b;
! #X connect 0 0 1 1;
! #X connect 1 0 17 0;
! #X connect 2 0 1 1;
! #X connect 3 0 12 0;
! #X connect 4 0 3 0;
! #X connect 6 0 5 0;
! #X connect 7 0 8 2;
! #X connect 7 0 19 1;
! #X connect 8 0 15 0;
! #X connect 9 0 7 0;
! #X connect 10 0 8 0;
! #X connect 10 1 9 0;
! #X connect 11 0 2 0;
! #X connect 11 1 6 1;
! #X connect 11 2 16 1;
! #X connect 12 0 20 0;
! #X connect 12 1 14 0;
! #X connect 12 2 10 0;
! #X connect 12 3 11 0;
  #X connect 13 0 3 0;
! #X connect 17 0 6 0;
! #X connect 17 1 16 0;
! #X connect 19 0 18 0;
! #X connect 20 0 1 0;
! #X connect 20 1 19 0;
  #X restore 94 138 pd run-test;
  #X obj 94 163 outlet;
  #X obj 94 111 inlet;
! #N canvas 487 407 450 300 1005-regressiontest 0;
  #X restore 92 186 pd \$0-regressiontest;
  #X connect 0 0 1 0;
--- 36,116 ----
  #X connect 8 0 1 1;
  #X connect 9 0 2 0;
! #X restore 531 291 pd print result;
! #X obj 506 270 t f f;
! #X msg 531 235 \; \$1 clear;
! #X obj 531 215 symbol;
! #X obj 506 182 t f b;
! #X obj 71 104 t b s s;
! #X text 63 387 start regression test;
! #X text 501 391 regression test finished;
! #N canvas 0 0 450 475 get 0;
! #X obj 106 36 r \$0-receive;
! #X msg 137 280 0;
! #X obj 106 159 del 0;
! #X obj 106 310 f;
! #X text 193 34 get the result;
! #X text 145 155 we need a delay \, since the object's output triggers
! the destruction of the object \; this would lead to stack corruption
! if we do it immediately;
! #X obj 131 358 outlet;
! #X obj 137 236 inlet reset;
! #X obj 106 336 t b f;
! #X obj 106 95 spigot;
! #X obj 137 258 t b b;
! #X msg 161 74 1;
! #X obj 106 117 t b f b;
! #X msg 189 74 0;
! #X obj 137 74 t f;
! #X text 182 98 we only accept the 1st result of the test;
! #X connect 0 0 9 0;
! #X connect 1 0 3 1;
! #X connect 2 0 3 0;
! #X connect 3 0 8 0;
! #X connect 7 0 10 0;
! #X connect 8 0 11 0;
! #X connect 8 1 6 0;
! #X connect 9 0 12 0;
! #X connect 10 0 1 0;
! #X connect 10 1 11 0;
! #X connect 11 0 14 0;
! #X connect 12 0 2 0;
! #X connect 12 1 3 1;
! #X connect 12 2 13 0;
! #X connect 13 0 14 0;
! #X connect 14 0 9 1;
! #X restore 506 162 pd get result;
! #X obj 150 175 t s s;
! #X text 401 23 the test MUST return a result!;
! #X text 414 70 cons: the regression test suite will block until the
! test returns a result (potentially infinitely long)!;
! #X text 414 39 pros: the test need not be finished in zero-time (good
! for testing signal-objects or timed objects);
! #X connect 0 0 17 0;
! #X connect 1 0 0 0;
! #X connect 3 0 2 0;
! #X connect 4 0 21 0;
! #X connect 5 0 11 0;
! #X connect 6 0 4 0;
! #X connect 7 0 5 0;
! #X connect 7 1 6 0;
! #X connect 8 0 20 0;
! #X connect 8 1 3 1;
! #X connect 8 2 12 1;
! #X connect 9 0 0 0;
  #X connect 13 0 3 0;
! #X connect 13 1 12 0;
! #X connect 15 0 14 0;
! #X connect 16 0 13 0;
! #X connect 16 1 15 0;
! #X connect 17 0 10 0;
! #X connect 17 1 7 0;
! #X connect 17 2 8 0;
! #X connect 20 0 16 0;
! #X connect 21 0 5 2;
! #X connect 21 1 15 1;
  #X restore 94 138 pd run-test;
  #X obj 94 163 outlet;
  #X obj 94 111 inlet;
! #N canvas 487 407 450 300 1002-regressiontest 0;
  #X restore 92 186 pd \$0-regressiontest;
  #X connect 0 0 1 0;

Index: runtests_nogui.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/zexy/tests/runtests_nogui.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** runtests_nogui.pd	21 Dec 2005 10:02:17 -0000	1.1
--- runtests_nogui.pd	21 Jun 2006 11:03:57 -0000	1.2
***************
*** 1,44 ****
! #N canvas 209 168 427 557 10;
! #X obj 86 209 testunit;
! #X obj 86 130 textfile;
! #X obj 86 56 t b b;
! #X msg 116 84 read runtests.txt \, rewind;
  #X obj 86 34 loadbang;
! #X msg 137 171 \; pd quit;
! #X obj 86 110 until;
! #X obj 86 233 select 0 1;
! #X obj 111 259 + 1;
! #X obj 171 259 + 1;
! #X obj 87 312 i;
! #X obj 130 312 i;
! #X obj 130 381 print regression-test;
! #X msg 130 356 \$1 tests passed;
! #X msg 87 335 \$1 tests failed;
! #X obj 87 291 t b b;
! #X obj 137 150 t b b;
! #X obj 86 259 i 1;
! #X obj 146 259 i 1;
! #X connect 0 0 7 0;
  #X connect 1 0 0 0;
! #X connect 1 1 16 0;
! #X connect 2 0 6 0;
! #X connect 2 1 3 0;
! #X connect 3 0 1 0;
! #X connect 4 0 2 0;
! #X connect 6 0 1 0;
! #X connect 7 0 17 0;
! #X connect 7 1 18 0;
! #X connect 8 0 17 1;
! #X connect 9 0 18 1;
! #X connect 10 0 14 0;
! #X connect 11 0 13 0;
! #X connect 13 0 12 0;
! #X connect 14 0 12 0;
! #X connect 15 0 10 0;
! #X connect 15 1 11 0;
! #X connect 16 0 5 0;
! #X connect 16 1 15 0;
! #X connect 17 0 8 0;
! #X connect 17 0 10 1;
! #X connect 18 0 9 0;
! #X connect 18 0 11 1;
--- 1,49 ----
! #N canvas 338 0 512 588 10;
! #X obj 86 269 testunit;
! #X obj 86 190 textfile;
! #X msg 104 144 read runtests.txt \, rewind;
  #X obj 86 34 loadbang;
! #X msg 137 231 \; pd quit;
! #X obj 86 317 select 0 1;
! #X obj 111 343 + 1;
! #X obj 171 343 + 1;
! #X obj 87 396 i;
! #X obj 130 396 i;
! #X obj 130 465 print regression-test;
! #X msg 130 440 \$1 tests passed;
! #X msg 87 419 \$1 tests failed;
! #X obj 87 375 t b b;
! #X obj 137 210 t b b;
! #X obj 86 343 i 1;
! #X obj 146 343 i 1;
! #X obj 86 56 t b b b;
! #X msg 123 98 \; pd dsp 1;
! #X text 182 106 turn on dsp \, just in case an object crashes with
! dsp enabled...;
! #X obj 61 295 t b a;
! #X connect 0 0 20 0;
  #X connect 1 0 0 0;
! #X connect 1 1 14 0;
! #X connect 2 0 1 0;
! #X connect 3 0 17 0;
! #X connect 5 0 15 0;
! #X connect 5 1 16 0;
! #X connect 6 0 15 1;
! #X connect 7 0 16 1;
! #X connect 8 0 12 0;
! #X connect 9 0 11 0;
! #X connect 11 0 10 0;
! #X connect 12 0 10 0;
! #X connect 13 0 8 0;
! #X connect 13 1 9 0;
! #X connect 14 0 4 0;
! #X connect 14 1 13 0;
! #X connect 15 0 6 0;
! #X connect 15 0 8 1;
! #X connect 16 0 7 0;
! #X connect 16 0 9 1;
! #X connect 17 0 1 0;
! #X connect 17 1 2 0;
! #X connect 17 2 18 0;
! #X connect 20 0 1 0;
! #X connect 20 1 5 0;

Index: runtests.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/zexy/tests/runtests.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** runtests.pd	21 Dec 2005 10:02:17 -0000	1.1
--- runtests.pd	21 Jun 2006 11:03:56 -0000	1.2
***************
*** 1,22 ****
! #N canvas 367 200 813 499 10;
  #X obj 177 433 testunit;
  #X obj 177 377 textfile;
  #X obj 177 183 t b b;
  #X msg 207 261 read runtests.txt \, rewind;
- #X obj 177 287 metro 10;
- #X msg 243 289 0;
  #X obj 177 126 bng 40 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
  -1;
  #X msg 177 351 bang;
  #X symbolatom 195 408 10 0 0 0 - - -;
! #X obj 485 341 mtx_col/exist;
  #X connect 1 0 0 0;
! #X connect 1 1 5 0;
! #X connect 2 0 4 0;
  #X connect 2 1 3 0;
  #X connect 3 0 1 0;
! #X connect 4 0 7 0;
! #X connect 5 0 4 0;
! #X connect 6 0 2 0;
! #X connect 7 0 1 0;
! #X connect 8 0 0 0;
--- 1,21 ----
! #N canvas 211 200 452 500 10;
  #X obj 177 433 testunit;
  #X obj 177 377 textfile;
  #X obj 177 183 t b b;
  #X msg 207 261 read runtests.txt \, rewind;
  #X obj 177 126 bng 40 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
  -1;
  #X msg 177 351 bang;
  #X symbolatom 195 408 10 0 0 0 - - -;
! #X obj 102 314 t b;
! #X obj 102 342 del 10;
! #X connect 0 0 7 0;
  #X connect 1 0 0 0;
! #X connect 2 0 5 0;
  #X connect 2 1 3 0;
  #X connect 3 0 1 0;
! #X connect 4 0 2 0;
! #X connect 5 0 1 0;
! #X connect 6 0 0 0;
! #X connect 7 0 8 0;
! #X connect 8 0 1 0;





More information about the Pd-cvs mailing list