aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorIOhannes m zmölnig <zmoelnig@users.sourceforge.net>2008-01-03 13:38:16 +0000
committerIOhannes m zmölnig <zmoelnig@users.sourceforge.net>2008-01-03 13:38:16 +0000
commitde92297f784b3cba2a77694a2e8471561d949b03 (patch)
treed4d8bc43f34c0a6d0a3eacca64554034f6465686 /tests
parentd532ab70c9c672647f029c863c80136d525828bf (diff)
tests for new "mtx_isequal"
svn path=/trunk/externals/iem/iemmatrix/; revision=9117
Diffstat (limited to 'tests')
-rw-r--r--tests/mtx_isequal/00_exist.pd13
-rw-r--r--tests/mtx_isequal/01_function0.pd17
-rw-r--r--tests/mtx_isequal/01_function1.pd17
-rw-r--r--tests/mtx_isequal/01_function2.pd19
-rw-r--r--tests/mtx_isequal/01_function3.pd19
-rwxr-xr-xtests/runtests.sh6
-rw-r--r--tests/runtests.txt5
7 files changed, 96 insertions, 0 deletions
diff --git a/tests/mtx_isequal/00_exist.pd b/tests/mtx_isequal/00_exist.pd
new file mode 100644
index 0000000..9e3f196
--- /dev/null
+++ b/tests/mtx_isequal/00_exist.pd
@@ -0,0 +1,13 @@
+#N canvas 385 142 508 466 10;
+#X obj 122 68 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X obj 122 347 b;
+#X msg 122 366 1;
+#X msg 122 122 matrix 1 1 1;
+#X obj 122 161 mtx_isequal;
+#X text 67 37 test for existance of [mtx_isequal];
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 5 0;
+#X connect 5 0 2 0;
diff --git a/tests/mtx_isequal/01_function0.pd b/tests/mtx_isequal/01_function0.pd
new file mode 100644
index 0000000..ab72981
--- /dev/null
+++ b/tests/mtx_isequal/01_function0.pd
@@ -0,0 +1,17 @@
+#N canvas 433 156 508 521 10;
+#X obj 122 68 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X msg 122 366 1;
+#X msg 122 112 matrix 3 3 1 2 3 4 5 6 7 8 9;
+#X obj 122 231 mtx_isequal;
+#X text 67 37 test whether [mtx_isequal] correctly detects the equality
+of 2 matrices;
+#X obj 122 347 select 1;
+#X obj 122 165 t a a;
+#X connect 0 0 3 0;
+#X connect 2 0 1 0;
+#X connect 3 0 7 0;
+#X connect 4 0 6 0;
+#X connect 6 0 2 0;
+#X connect 7 0 4 0;
+#X connect 7 1 4 1;
diff --git a/tests/mtx_isequal/01_function1.pd b/tests/mtx_isequal/01_function1.pd
new file mode 100644
index 0000000..35e86bc
--- /dev/null
+++ b/tests/mtx_isequal/01_function1.pd
@@ -0,0 +1,17 @@
+#N canvas 385 142 508 466 10;
+#X obj 122 68 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X msg 122 366 1;
+#X obj 122 139 t a a;
+#X obj 122 161 mtx_isequal;
+#X obj 122 347 select 1;
+#X text 67 37 test whether [mtx_isequal] correctly detects the equality
+of 2 matrices;
+#X obj 122 112 mtx_rand;
+#X connect 0 0 7 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 1;
+#X connect 4 0 5 0;
+#X connect 5 0 2 0;
+#X connect 7 0 3 0;
diff --git a/tests/mtx_isequal/01_function2.pd b/tests/mtx_isequal/01_function2.pd
new file mode 100644
index 0000000..9a66e1d
--- /dev/null
+++ b/tests/mtx_isequal/01_function2.pd
@@ -0,0 +1,19 @@
+#N canvas 433 156 508 521 10;
+#X obj 122 68 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X msg 122 366 1;
+#X msg 122 112 matrix 3 3 1 2 3 4 5 6 7 8 9;
+#X obj 122 231 mtx_isequal;
+#X obj 122 90 t b b;
+#X msg 154 138 matrix 3 3 1 2 3 4 5 6 7 8 10;
+#X text 67 37 test whether [mtx_isequal] correctly detects the inequality
+of 2 matrices;
+#X obj 122 347 select 0;
+#X connect 0 0 5 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 0;
+#X connect 4 0 8 0;
+#X connect 5 0 3 0;
+#X connect 5 1 6 0;
+#X connect 6 0 4 1;
+#X connect 8 0 2 0;
diff --git a/tests/mtx_isequal/01_function3.pd b/tests/mtx_isequal/01_function3.pd
new file mode 100644
index 0000000..286f453
--- /dev/null
+++ b/tests/mtx_isequal/01_function3.pd
@@ -0,0 +1,19 @@
+#N canvas 433 156 508 521 10;
+#X obj 122 68 inlet bang;
+#X obj 122 385 outlet 1==OK;
+#X msg 122 366 1;
+#X msg 122 112 matrix 3 3 1 2 3 4 5 6 7 8 9;
+#X obj 122 231 mtx_isequal;
+#X obj 122 90 t b b;
+#X text 67 37 test whether [mtx_isequal] correctly detects the inequality
+of 2 matrices;
+#X obj 122 347 select 0;
+#X msg 154 138 matrix 2 2 1 2 3 4;
+#X connect 0 0 5 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 0;
+#X connect 4 0 7 0;
+#X connect 5 0 3 0;
+#X connect 5 1 8 0;
+#X connect 7 0 2 0;
+#X connect 8 0 4 1;
diff --git a/tests/runtests.sh b/tests/runtests.sh
index 312b3ea..324bbf5 100755
--- a/tests/runtests.sh
+++ b/tests/runtests.sh
@@ -18,6 +18,12 @@ function run_nogui() {
echo "regression-test: ${NUMTESTS} tests total" >> ${RUNTESTS_LOG}.$$
cat ${RUNTESTS_LOG}.$$ | egrep "^regression-test: " | sed -e 's/^regression-test: //'
+ FAILEDTESTS=$(cat ${RUNTESTS_LOG}.$$ | egrep "^regression-test: .*: failed$" | sed -e 's|^regression-test: ||' -e 's|: failed$||')
+ echo -n "failed tests: "
+ for ft in ${FAILEDTESTS}; do
+ echo -n "${ft} "
+ done
+ echo
}
function run_withgui() {
diff --git a/tests/runtests.txt b/tests/runtests.txt
index 31b31e4..0710385 100644
--- a/tests/runtests.txt
+++ b/tests/runtests.txt
@@ -157,6 +157,11 @@ mtx_int/01_function;
mtx_int/02_function;
mtx_int/03_function;
mtx_inverse/00_exist;
+mtx_isequal/00_exist;
+mtx_isequal/01_function0;
+mtx_isequal/01_function1;
+mtx_isequal/01_function2;
+mtx_isequal/01_function3;
mtx_le/00_exist;
mtx_le/01_function;
mtx_le/02_function;