Commit b80c9bf0 authored by BARROS DE ASSIS Lucas's avatar BARROS DE ASSIS Lucas Committed by Mathieu Faverge
Browse files

Revert "Fix error counting when testing"

This reverts commit 39eeeec4
parent b10ae63a
......@@ -19,6 +19,7 @@
* @author Mathieu Faverge
* @author Emmanuel Agullo
* @author Cedric Castagnede
* @author Lucas Barros de Assis
* @date 2014-11-16
* @precisions normal z -> c d s
*
......@@ -149,8 +150,9 @@ int testing_zgels(int argc, char **argv)
printf("***************************************************\n");
}
else {
hres++;
printf("************************************************\n");
printf(" - TESTING ZGELS ... FAILED !\n"); hres++;
printf(" - TESTING ZGELS ... FAILED !\n");
printf("************************************************\n");
}
......@@ -197,6 +199,7 @@ int testing_zgels(int argc, char **argv)
printf("***************************************************\n");
}
else{
hres++;
printf("***************************************************\n");
printf(" - TESTING ZGEQRF + ZGEQRS ... FAILED !\n");
printf("***************************************************\n");
......@@ -223,15 +226,16 @@ int testing_zgels(int argc, char **argv)
info_solution = check_solution(M, N, NRHS, A1, LDA, B1, B2, LDB, eps);
if ( (info_solution == 0) & (info_factorization == 0) & (info_ortho == 0) ) {
printf("***************************************************\n");
printf(" ---- TESTING ZGELQF + ZGELQS ............ PASSED !\n");
printf("***************************************************\n");
printf("***************************************************\n");
printf(" ---- TESTING ZGELQF + ZGELQS ............ PASSED !\n");
printf("***************************************************\n");
}
else {
printf("***************************************************\n");
printf(" - TESTING ZGELQF + ZGELQS ... FAILED !\n");
printf("***************************************************\n");
}
hres++;
printf("***************************************************\n");
printf(" - TESTING ZGELQF + ZGELQS ... FAILED !\n");
printf("***************************************************\n");
}
}
/*----------------------------------------------------------
......@@ -305,6 +309,8 @@ int testing_zgels(int argc, char **argv)
}
}
else {
hres++;
if (M >= N) {
printf("***************************************************\n");
printf(" - TESTING ZGEQRF + ZUNMQR + ZTRSM ... FAILED !\n");
......
......@@ -14,6 +14,7 @@
* @version 0.9.2
* @author Mathieu Faverge
* @author Boucherie Raphael
* @author Lucas Barros de Assis
* @date 2017-05-22
* @precisions normal z -> c d s
*
......@@ -156,8 +157,9 @@ int testing_zgels_hqr(int argc, char **argv)
printf("***************************************************\n");
}
else {
hres++;
printf("************************************************\n");
printf(" - TESTING ZGELS_HQR ... FAILED !\n"); hres++;
printf(" - TESTING ZGELS_HQR ... FAILED !\n");
printf("************************************************\n");
}
......@@ -233,6 +235,7 @@ int testing_zgels_hqr(int argc, char **argv)
printf("***************************************************\n");
}
else {
hres++;
printf("***************************************************\n");
printf(" - TESTING ZGELQF + ZGELQS ... FAILED !\n");
printf("***************************************************\n");
......@@ -305,6 +308,8 @@ int testing_zgels_hqr(int argc, char **argv)
}
}
else {
hres++;
if (M >= N) {
printf("***************************************************\n");
printf(" - TESTING ZGEQRF + ZUNMQR + ZTRSM ... FAILED !\n");
......
......@@ -14,6 +14,7 @@
* @version 0.9.2
* @author Mathieu Faverge
* @author Boucherie Raphael
* @author Lucas Barros de Assis
* @date 2017-05-22
* @precisions normal z -> c d s
*
......@@ -153,8 +154,9 @@ int testing_zgels_systolic(int argc, char **argv)
printf("***************************************************\n");
}
else {
hres++;
printf("************************************************\n");
printf(" - TESTING ZGELS_SYSTOLIC ... FAILED !\n"); hres++;
printf(" - TESTING ZGELS_SYSTOLIC ... FAILED !\n");
printf("************************************************\n");
}
......@@ -196,6 +198,7 @@ int testing_zgels_systolic(int argc, char **argv)
printf("***************************************************\n");
}
else{
hres++;
printf("***************************************************\n");
printf(" - TESTING ZGEQRF + ZGEQRS ... FAILED !\n");
printf("***************************************************\n");
......@@ -229,6 +232,7 @@ int testing_zgels_systolic(int argc, char **argv)
printf("***************************************************\n");
}
else {
hres++;
printf("***************************************************\n");
printf(" - TESTING ZGELQF + ZGELQS ... FAILED !\n");
printf("***************************************************\n");
......@@ -303,6 +307,8 @@ int testing_zgels_systolic(int argc, char **argv)
}
}
else {
hres++;
if (M >= N) {
printf("***************************************************\n");
printf(" - TESTING ZGEQRF + ZUNMQR + ZTRSM ... FAILED !\n");
......
......@@ -18,6 +18,7 @@
* @author Mathieu Faverge
* @author Emmanuel Agullo
* @author Cedric Castagnede
* @author Lucas Barros de Assis
* @date 2014-11-16
* @precisions normal z -> c d s
*
......@@ -114,8 +115,9 @@ int testing_zgesv_incpiv(int argc, char **argv)
printf("***************************************************\n");
}
else{
hres++;
printf("************************************************\n");
printf(" - TESTING INCPIV ZGESV ... FAILED !\n"); hres++;
printf(" - TESTING INCPIV ZGESV ... FAILED !\n");
printf("************************************************\n");
}
......@@ -157,6 +159,7 @@ int testing_zgesv_incpiv(int argc, char **argv)
printf("***************************************************\n");
}
else{
hres++;
printf("***************************************************\n");
printf(" - TESTING INCPIV ZGETRF + ZGETRS ... FAILED !\n");
printf("***************************************************\n");
......@@ -202,6 +205,7 @@ int testing_zgesv_incpiv(int argc, char **argv)
printf("***************************************************\n");
}
else{
hres++;
printf("**************************************************\n");
printf(" - TESTING INCPIV ZGETRF + ZTRSMPL + ZTRSM ... FAILED !\n");
printf("**************************************************\n");
......
......@@ -16,6 +16,7 @@
* from Plasma 2.6.0 for CHAMELEON 0.9.2
* @author Emmanuel Agullo
* @author Mathieu Faverge
* @author Lucas Barros de Assis
* @date 2014-11-16
* @precisions normal z -> c d s
*
......@@ -102,7 +103,8 @@ int testing_zlange(int argc, char **argv)
printf(" ---- TESTING ZLANGE (%s)............... PASSED !\n", normstr[n]);
}
else {
printf(" - TESTING ZLANGE (%s)... FAILED !\n", normstr[n]); hres++;
hres++;
printf(" - TESTING ZLANGE (%s)... FAILED !\n", normstr[n]);
}
printf("***************************************************\n");
......@@ -144,6 +146,7 @@ int testing_zlange(int argc, char **argv)
normstr[n], uplostr[u], diagstr[d]);
}
else {
hres++;
printf(" - TESTING ZLANTR (%s, %s, %s)... FAILED !\n",
normstr[n], uplostr[u], diagstr[d]);
}
......@@ -184,6 +187,7 @@ int testing_zlange(int argc, char **argv)
printf(" ---- TESTING ZLANSY (%s, %s)......... PASSED !\n", normstr[n], uplostr[u]);
}
else {
hres++;
printf(" - TESTING ZLANSY (%s, %s)... FAILED !\n", normstr[n], uplostr[u]);
}
printf("***************************************************\n");
......@@ -229,6 +233,7 @@ int testing_zlange(int argc, char **argv)
printf(" ---- TESTING ZLANHE (%s, %s)......... PASSED !\n", normstr[n], uplostr[u]);
}
else {
hres++;
printf(" - TESTING ZLANHE (%s, %s)... FAILED !\n", normstr[n], uplostr[u]);
}
printf("***************************************************\n");
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment