@@ -349,7 +349,7 @@ CTEST(cgeadd, xerbla_lda_invalid) | |||||
blasint lda = INVALID; | blasint lda = INVALID; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 6; | |||||
int expected_info = 5; | |||||
int passed = check_badargs('F', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('F', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -682,7 +682,7 @@ CTEST(cgeadd, c_api_xerbla_n_invalid_row_major) | |||||
blasint lda = 1; | blasint lda = 1; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 1; | |||||
int expected_info = 2; | |||||
int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -730,7 +730,7 @@ CTEST(cgeadd, c_api_xerbla_m_invalid_row_major) | |||||
blasint lda = 1; | blasint lda = 1; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 2; | |||||
int expected_info = 1; | |||||
int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -346,7 +346,7 @@ CTEST(dgeadd, xerbla_lda_invalid) | |||||
blasint lda = INVALID; | blasint lda = INVALID; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 6; | |||||
int expected_info = 5; | |||||
int passed = check_badargs('F', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('F', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -680,7 +680,7 @@ CTEST(dgeadd, c_api_xerbla_n_invalid_row_major) | |||||
blasint lda = 1; | blasint lda = 1; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 1; | |||||
int expected_info = 2; | |||||
int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -728,7 +728,7 @@ CTEST(dgeadd, c_api_xerbla_m_invalid_row_major) | |||||
blasint lda = 1; | blasint lda = 1; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 2; | |||||
int expected_info = 1; | |||||
int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -856,7 +856,7 @@ CTEST(dimatcopy, xerbla_rowmajor_notrans_invalid_ldb) | |||||
blasint lda_src = 100, lda_dst = 50; | blasint lda_src = 100, lda_dst = 50; | ||||
char order = 'R'; | char order = 'R'; | ||||
char trans = 'N'; | char trans = 'N'; | ||||
int expected_info = 9; | |||||
int expected_info = 8; | |||||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -873,7 +873,7 @@ CTEST(dimatcopy, xerbla_rowmajor_trans_invalid_ldb) | |||||
blasint lda_src = 100, lda_dst = 50; | blasint lda_src = 100, lda_dst = 50; | ||||
char order = 'R'; | char order = 'R'; | ||||
char trans = 'T'; | char trans = 'T'; | ||||
int expected_info = 9; | |||||
int expected_info = 8; | |||||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -890,7 +890,7 @@ CTEST(dimatcopy, xerbla_colmajor_notrans_invalid_ldb) | |||||
blasint lda_src = 100, lda_dst = 50; | blasint lda_src = 100, lda_dst = 50; | ||||
char order = 'C'; | char order = 'C'; | ||||
char trans = 'N'; | char trans = 'N'; | ||||
int expected_info = 9; | |||||
int expected_info = 8; | |||||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -907,7 +907,7 @@ CTEST(dimatcopy, xerbla_colmajor_trans_invalid_ldb) | |||||
blasint lda_src = 100, lda_dst = 50; | blasint lda_src = 100, lda_dst = 50; | ||||
char order = 'C'; | char order = 'C'; | ||||
char trans = 'T'; | char trans = 'T'; | ||||
int expected_info = 9; | |||||
int expected_info = 8; | |||||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -349,7 +349,7 @@ CTEST(sgeadd, xerbla_lda_invalid) | |||||
blasint lda = INVALID; | blasint lda = INVALID; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 6; | |||||
int expected_info = 5; | |||||
int passed = check_badargs('F', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('F', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -682,7 +682,7 @@ CTEST(sgeadd, c_api_xerbla_n_invalid_row_major) | |||||
blasint lda = 1; | blasint lda = 1; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 1; | |||||
int expected_info = 2; | |||||
int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -730,7 +730,7 @@ CTEST(sgeadd, c_api_xerbla_m_invalid_row_major) | |||||
blasint lda = 1; | blasint lda = 1; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 2; | |||||
int expected_info = 1; | |||||
int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -856,7 +856,7 @@ CTEST(simatcopy, xerbla_rowmajor_notrans_invalid_ldb) | |||||
blasint lda_src = 100, lda_dst = 50; | blasint lda_src = 100, lda_dst = 50; | ||||
char order = 'R'; | char order = 'R'; | ||||
char trans = 'N'; | char trans = 'N'; | ||||
int expected_info = 9; | |||||
int expected_info = 8; | |||||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -873,7 +873,7 @@ CTEST(simatcopy, xerbla_rowmajor_trans_invalid_ldb) | |||||
blasint lda_src = 100, lda_dst = 50; | blasint lda_src = 100, lda_dst = 50; | ||||
char order = 'R'; | char order = 'R'; | ||||
char trans = 'T'; | char trans = 'T'; | ||||
int expected_info = 9; | |||||
int expected_info = 8; | |||||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -890,7 +890,7 @@ CTEST(simatcopy, xerbla_colmajor_notrans_invalid_ldb) | |||||
blasint lda_src = 100, lda_dst = 50; | blasint lda_src = 100, lda_dst = 50; | ||||
char order = 'C'; | char order = 'C'; | ||||
char trans = 'N'; | char trans = 'N'; | ||||
int expected_info = 9; | |||||
int expected_info = 8; | |||||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -907,7 +907,7 @@ CTEST(simatcopy, xerbla_colmajor_trans_invalid_ldb) | |||||
blasint lda_src = 100, lda_dst = 50; | blasint lda_src = 100, lda_dst = 50; | ||||
char order = 'C'; | char order = 'C'; | ||||
char trans = 'T'; | char trans = 'T'; | ||||
int expected_info = 9; | |||||
int expected_info = 8; | |||||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -349,7 +349,7 @@ CTEST(zgeadd, xerbla_lda_invalid) | |||||
blasint lda = INVALID; | blasint lda = INVALID; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 6; | |||||
int expected_info = 5; | |||||
int passed = check_badargs('F', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('F', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -682,7 +682,7 @@ CTEST(zgeadd, c_api_xerbla_n_invalid_row_major) | |||||
blasint lda = 1; | blasint lda = 1; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 1; | |||||
int expected_info = 2; | |||||
int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||
@@ -730,7 +730,7 @@ CTEST(zgeadd, c_api_xerbla_m_invalid_row_major) | |||||
blasint lda = 1; | blasint lda = 1; | ||||
blasint ldc = 1; | blasint ldc = 1; | ||||
int expected_info = 2; | |||||
int expected_info = 1; | |||||
int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | int passed = check_badargs('C', order, m, n, lda, ldc, expected_info); | ||||
ASSERT_EQUAL(TRUE, passed); | ASSERT_EQUAL(TRUE, passed); | ||||