9 files changed, 86 insertions, 0 deletions

diff --git a/tests/runtests.txt b/tests/runtests.txt
index 8fcc351..01c63ba 100644
--- a/tests/runtests.txt
+++ b/tests/runtests.txt
@@ -71,6 +71,14 @@ help-msg/z~;
 l2s/argument;
 l2s/delimiter;
 msgfile/emptyreplace;
+msgfile/lastbangdeletes;
 msgfile/reentrant;
 repeat/noargs;
 s2l/numsymbols;
+testtests/fail;
+testtests/fail_wait0;
+testtests/fail_wait10;
+testtests/noresult;
+testtests/pass;
+testtests/pass_wait0;
+testtests/pass_wait10;
diff --git a/tests/testtests/README.txt b/tests/testtests/README.txt
new file mode 100644
index 0000000..61457ba
--- /dev/null
+++ b/tests/testtests/README.txt
@@ -0,0 +1,2 @@
+unit tests for testing the unit-tester
+some of these tests MUST fail in order to work correctly (to prove that the unit-tester can handle failed tests)
diff --git a/tests/testtests/fail.pd b/tests/testtests/fail.pd
new file mode 100644
index 0000000..a95875a
--- /dev/null
+++ b/tests/testtests/fail.pd
@@ -0,0 +1,9 @@
+#N canvas 189 139 450 300 10;
+#X obj 142 51 inlet trigger;
+#X obj 142 102 t b;
+#X obj 142 164 outlet result;
+#X msg 142 118 0;
+#X text 122 31 always fail;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 3 0 2 0;
diff --git a/tests/testtests/fail_wait0.pd b/tests/testtests/fail_wait0.pd
new file mode 100644
index 0000000..770ccb9
--- /dev/null
+++ b/tests/testtests/fail_wait0.pd
@@ -0,0 +1,12 @@
+#N canvas 189 139 450 300 10;
+#X obj 142 51 inlet trigger;
+#X obj 142 194 outlet result;
+#X obj 142 102 t b b;
+#X msg 167 123 -1;
+#X msg 142 123 0;
+#X text 122 31 fail (after a period of uncertainty);
+#X connect 0 0 2 0;
+#X connect 2 0 4 0;
+#X connect 2 1 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 1 0;
diff --git a/tests/testtests/fail_wait10.pd b/tests/testtests/fail_wait10.pd
new file mode 100644
index 0000000..271d334
--- /dev/null
+++ b/tests/testtests/fail_wait10.pd
@@ -0,0 +1,14 @@
+#N canvas 189 139 450 300 10;
+#X obj 142 51 inlet trigger;
+#X obj 142 194 outlet result;
+#X obj 142 102 t b b;
+#X msg 167 123 -1;
+#X text 122 31 fail (after a period of uncertainty);
+#X msg 142 163 0;
+#X obj 142 145 del 10;
+#X connect 0 0 2 0;
+#X connect 2 0 6 0;
+#X connect 2 1 3 0;
+#X connect 3 0 1 0;
+#X connect 5 0 1 0;
+#X connect 6 0 5 0;
diff --git a/tests/testtests/noresult.pd b/tests/testtests/noresult.pd
new file mode 100644
index 0000000..0b53e88
--- /dev/null
+++ b/tests/testtests/noresult.pd
@@ -0,0 +1,6 @@
+#N canvas 189 139 450 300 10;
+#X obj 142 51 inlet trigger;
+#X obj 142 102 t b;
+#X obj 142 164 outlet result;
+#X text 122 31 no result (should fail);
+#X connect 0 0 1 0;
diff --git a/tests/testtests/pass.pd b/tests/testtests/pass.pd
new file mode 100644
index 0000000..29dc5f3
--- /dev/null
+++ b/tests/testtests/pass.pd
@@ -0,0 +1,9 @@
+#N canvas 189 139 450 300 10;
+#X obj 142 51 inlet trigger;
+#X obj 142 102 t b;
+#X msg 142 118 1;
+#X obj 142 164 outlet result;
+#X text 122 31 always pass;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
diff --git a/tests/testtests/pass_wait0.pd b/tests/testtests/pass_wait0.pd
new file mode 100644
index 0000000..7cc62af
--- /dev/null
+++ b/tests/testtests/pass_wait0.pd
@@ -0,0 +1,12 @@
+#N canvas 189 139 450 300 10;
+#X obj 142 51 inlet trigger;
+#X obj 142 194 outlet result;
+#X obj 142 102 t b b;
+#X msg 167 123 -1;
+#X text 122 31 pass (after a period of uncertainty);
+#X msg 142 123 1;
+#X connect 0 0 2 0;
+#X connect 2 0 5 0;
+#X connect 2 1 3 0;
+#X connect 3 0 1 0;
+#X connect 5 0 1 0;
diff --git a/tests/testtests/pass_wait10.pd b/tests/testtests/pass_wait10.pd
new file mode 100644
index 0000000..50edff2
--- /dev/null
+++ b/tests/testtests/pass_wait10.pd
@@ -0,0 +1,14 @@
+#N canvas 189 139 450 300 10;
+#X obj 142 51 inlet trigger;
+#X obj 142 194 outlet result;
+#X obj 142 102 t b b;
+#X msg 167 123 -1;
+#X text 122 31 pass (after a period of uncertainty);
+#X msg 142 163 1;
+#X obj 142 145 del 10;
+#X connect 0 0 2 0;
+#X connect 2 0 6 0;
+#X connect 2 1 3 0;
+#X connect 3 0 1 0;
+#X connect 5 0 1 0;
+#X connect 6 0 5 0;