~ubuntu-branches/ubuntu/natty/pd-zexy/natty

« back to all changes in this revision

Viewing changes to tests/testunit.pd

  • Committer: Bazaar Package Importer
  • Author(s): Jonas Smedegaard, IOhannes m zmölnig, Jonas Smedegaard
  • Date: 2010-08-20 12:17:41 UTC
  • mfrom: (2.1.2 sid)
  • Revision ID: james.westby@ubuntu.com-20100820121741-4kxozn8b9rhee9fr
Tags: 2.2.3-1
* New upstream version

[ IOhannes m zmölnig ]
* Adopt package, on behalf of Multimedia Team.
  Closes: #546964
* Simply debian/rules with CDBS, and don't unconditionally strip
  binaries.
  Closes: #437763
* Install into /usr/lib/pd/extra/zexy/. Document usage in REAME.Debian
  and warn about change in NEWS.
* git'ify package. Add Vcs-* stanzas to control file.
* Use dpkg source format 3.0 (quilt). Drop build-dependency on quilt.

[ Jonas Smedegaard ]
* Enable CDBS copyright-check routine.
* Add copyright and licensing header to debian/rules.
* Add myself as uploader.
* Rewrite debian/copyright using rev. 135 of draft DEP5 format.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#N canvas 577 122 585 499 10;
 
2
#N canvas 455 165 474 559 run-test 0;
 
3
#X obj 71 136 symbol;
 
4
#X obj 71 104 inlet test-to-run;
 
5
#X obj 71 514 outlet result;
 
6
#X obj 71 440 pack 0 s;
 
7
#X msg 113 136 bang;
 
8
#N canvas 395 348 450 300 print 0;
 
9
#X obj 101 247 print regression-test;
 
10
#X obj 101 204 pack s s;
 
11
#X obj 101 117 select 1;
 
12
#X obj 152 137 b;
 
13
#X msg 152 160 failed;
 
14
#X msg 101 138 OK;
 
15
#X obj 101 185 symbol;
 
16
#X msg 101 223 \$2: \$1;
 
17
#X obj 101 52 inlet result;
 
18
#X obj 101 89 unpack 0 s;
 
19
#X connect 1 0 7 0;
 
20
#X connect 2 0 5 0;
 
21
#X connect 2 1 3 0;
 
22
#X connect 3 0 4 0;
 
23
#X connect 4 0 6 0;
 
24
#X connect 5 0 6 0;
 
25
#X connect 6 0 1 0;
 
26
#X connect 7 0 0 0;
 
27
#X connect 8 0 9 0;
 
28
#X connect 9 0 2 0;
 
29
#X connect 9 1 1 1;
 
30
#X restore 96 491 pd print result;
 
31
#X obj 71 252 t f b;
 
32
#X obj 71 164 t b s s;
 
33
#X text 99 217 start regression test;
 
34
#X text 105 251 regression test finished;
 
35
#N canvas 318 184 905 641 get 0;
 
36
#X obj 105 488 outlet;
 
37
#X obj 105 26 inlet reset;
 
38
#X obj 105 71 t b b b;
 
39
#X obj 162 229 spigot;
 
40
#X msg 228 229 1;
 
41
#X msg 258 229 0;
 
42
#X obj 202 229 t f;
 
43
#X obj 163 120 s \$0-send;
 
44
#X text 248 120 <- start the test;
 
45
#X text 250 168 <- test result;
 
46
#X obj 162 165 r \$0-receive;
 
47
#X obj 105 342 spigot;
 
48
#X obj 228 212 t b b;
 
49
#X msg 129 45 bang;
 
50
#X obj 162 260 select -1;
 
51
#X obj 105 401 t f b;
 
52
#X msg 162 278 0;
 
53
#X msg 105 316 0;
 
54
#X text 136 321 <--------------- fail as default;
 
55
#X text 228 262 <- "-1" indicates "wait for result";
 
56
#X obj 105 430 t b f;
 
57
#X obj 105 446 del 0;
 
58
#X obj 105 462 f;
 
59
#X text 149 450 <--- buffering \, since we have to avoid that the object
 
60
triggers it's own destruction (stack corruption);
 
61
#X connect 1 0 2 0;
 
62
#X connect 2 0 17 0;
 
63
#X connect 2 1 7 0;
 
64
#X connect 2 2 12 0;
 
65
#X connect 3 0 14 0;
 
66
#X connect 4 0 6 0;
 
67
#X connect 5 0 6 0;
 
68
#X connect 6 0 3 1;
 
69
#X connect 6 0 11 1;
 
70
#X connect 10 0 3 0;
 
71
#X connect 11 0 15 0;
 
72
#X connect 12 0 4 0;
 
73
#X connect 13 0 2 0;
 
74
#X connect 14 0 16 0;
 
75
#X connect 14 1 15 0;
 
76
#X connect 15 0 20 0;
 
77
#X connect 15 1 5 0;
 
78
#X connect 16 0 11 1;
 
79
#X connect 17 0 11 0;
 
80
#X connect 20 0 21 0;
 
81
#X connect 20 1 22 1;
 
82
#X connect 21 0 22 0;
 
83
#X connect 22 0 0 0;
 
84
#X restore 71 232 pd get result;
 
85
#X text 64 17 the test MUST return a result!;
 
86
#X text 77 64 cons: the regression test suite will block until the
 
87
test returns a result (potentially infinitely long)!;
 
88
#X text 77 33 pros: the test need not be finished in zero-time (good
 
89
for testing signal-objects or timed objects);
 
90
#X obj 71 470 t l l;
 
91
#N canvas 0 0 625 330 create/destroy 0;
 
92
#X obj 148 53 inlet;
 
93
#X obj 449 48 inlet clear;
 
94
#X obj 148 129 pack s \$0;
 
95
#X msg 173 196 clear;
 
96
#X obj 449 76 t b;
 
97
#X obj 148 148 t l b;
 
98
#X msg 148 165 obj 100 100 r \$2-send \, obj 100 150 \$1 \, obj 100
 
99
200 s \$2-receive \, connect 0 0 1 0 \, connect 1 0 2 0;
 
100
#X obj 148 228 s pd-\$0-regressiontest;
 
101
#X obj 148 94 t s;
 
102
#X connect 0 0 8 0;
 
103
#X connect 1 0 4 0;
 
104
#X connect 2 0 5 0;
 
105
#X connect 3 0 7 0;
 
106
#X connect 4 0 3 0;
 
107
#X connect 5 0 6 0;
 
108
#X connect 5 1 3 0;
 
109
#X connect 6 0 7 0;
 
110
#X connect 8 0 2 0;
 
111
#X restore 146 324 pd create/destroy testpatch;
 
112
#N canvas 0 0 450 300 restartaudio 0;
 
113
#X obj 113 77 inlet;
 
114
#X obj 113 99 t b;
 
115
#X msg 113 121 dsp 0 \, dsp 1;
 
116
#X obj 113 143 s pd;
 
117
#X connect 0 0 1 0;
 
118
#X connect 1 0 2 0;
 
119
#X connect 2 0 3 0;
 
120
#X restore 141 186 pd restartaudio;
 
121
#X obj 71 214 t b;
 
122
#X obj 71 186 t b b;
 
123
#X connect 0 0 7 0;
 
124
#X connect 1 0 0 0;
 
125
#X connect 3 0 14 0;
 
126
#X connect 4 0 0 0;
 
127
#X connect 6 0 3 0;
 
128
#X connect 6 1 15 1;
 
129
#X connect 7 0 18 0;
 
130
#X connect 7 1 15 0;
 
131
#X connect 7 2 3 1;
 
132
#X connect 10 0 6 0;
 
133
#X connect 14 0 2 0;
 
134
#X connect 14 1 5 0;
 
135
#X connect 17 0 10 0;
 
136
#X connect 18 0 17 0;
 
137
#X connect 18 1 16 0;
 
138
#X restore 94 218 pd run-test;
 
139
#X obj 94 243 outlet;
 
140
#X obj 94 191 inlet;
 
141
#N canvas 487 407 450 300 \$0-regressiontest 0;
 
142
#X restore 92 266 pd \$0-regressiontest;
 
143
#X text 64 17 the test MUST IMMEDIATELY return a result!;
 
144
#X text 87 39 1: OK (test passed);
 
145
#X text 87 52 0: KO (test failed);
 
146
#X text 81 68 -1:;
 
147
#X text 103 68 WAIT (test takes some time);
 
148
#X text 64 92 if no result is returned immediately \, the test is considered
 
149
to be FAILED!;
 
150
#X text 63 131 note: we could have this be using "0" as the WAIT result
 
151
\, an no-result as KO \; for legacy reasons we don't;
 
152
#X connect 0 0 1 0;
 
153
#X connect 2 0 0 0;