@@ -714,38 +714,6 @@ CTEST(cimatcopy, xerbla_invalid_trans) | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param m. | |||
* Must be positive. | |||
*/ | |||
CTEST(cimatcopy, xerbla_invalid_rows) | |||
{ | |||
blasint m = 0, n = 100; | |||
blasint lda_src = 0, lda_dst = 100; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 3; | |||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param n. | |||
* Must be positive. | |||
*/ | |||
CTEST(cimatcopy, xerbla_invalid_cols) | |||
{ | |||
blasint m = 100, n = 0; | |||
blasint lda_src = 100, lda_dst = 0; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 4; | |||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param lda_src. | |||
* If matrices are stored using row major layout, | |||
@@ -524,38 +524,6 @@ CTEST(comatcopy, xerbla_invalid_trans) | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param m. | |||
* Must be positive. | |||
*/ | |||
CTEST(comatcopy, xerbla_invalid_rows) | |||
{ | |||
blasint m = 0, n = 100; | |||
blasint lda = 0, ldb = 100; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 3; | |||
int passed = check_badargs(order, trans, m, n, lda, ldb, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param n. | |||
* Must be positive. | |||
*/ | |||
CTEST(comatcopy, xerbla_invalid_cols) | |||
{ | |||
blasint m = 100, n = 0; | |||
blasint lda = 100, ldb = 0; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 4; | |||
int passed = check_badargs(order, trans, m, n, lda, ldb, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param lda. | |||
* If matrices are stored using row major layout, | |||
@@ -811,38 +811,6 @@ CTEST(dimatcopy, xerbla_invalid_trans) | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param m. | |||
* Must be positive. | |||
*/ | |||
CTEST(dimatcopy, xerbla_invalid_rows) | |||
{ | |||
blasint m = 0, n = 100; | |||
blasint lda_src = 0, lda_dst = 100; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 3; | |||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param n. | |||
* Must be positive. | |||
*/ | |||
CTEST(dimatcopy, xerbla_invalid_cols) | |||
{ | |||
blasint m = 100, n = 0; | |||
blasint lda_src = 100, lda_dst = 0; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 4; | |||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param lda_src. | |||
* If matrices are stored using row major layout, | |||
@@ -536,38 +536,6 @@ CTEST(domatcopy, xerbla_invalid_trans) | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param m. | |||
* Must be positive. | |||
*/ | |||
CTEST(domatcopy, xerbla_invalid_rows) | |||
{ | |||
blasint m = 0, n = 100; | |||
blasint lda = 0, ldb = 100; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 3; | |||
int passed = check_badargs(order, trans, m, n, lda, ldb, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param n. | |||
* Must be positive. | |||
*/ | |||
CTEST(domatcopy, xerbla_invalid_cols) | |||
{ | |||
blasint m = 100, n = 0; | |||
blasint lda = 100, ldb = 0; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 4; | |||
int passed = check_badargs(order, trans, m, n, lda, ldb, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param lda. | |||
* If matrices are stored using row major layout, | |||
@@ -811,38 +811,6 @@ CTEST(simatcopy, xerbla_invalid_trans) | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param m. | |||
* Must be positive. | |||
*/ | |||
CTEST(simatcopy, xerbla_invalid_rows) | |||
{ | |||
blasint m = 0, n = 100; | |||
blasint lda_src = 0, lda_dst = 100; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 3; | |||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param n. | |||
* Must be positive. | |||
*/ | |||
CTEST(simatcopy, xerbla_invalid_cols) | |||
{ | |||
blasint m = 100, n = 0; | |||
blasint lda_src = 100, lda_dst = 0; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 4; | |||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param lda_src. | |||
* If matrices are stored using row major layout, | |||
@@ -536,38 +536,6 @@ CTEST(somatcopy, xerbla_invalid_trans) | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param m. | |||
* Must be positive. | |||
*/ | |||
CTEST(somatcopy, xerbla_invalid_rows) | |||
{ | |||
blasint m = 0, n = 100; | |||
blasint lda = 0, ldb = 100; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 3; | |||
int passed = check_badargs(order, trans, m, n, lda, ldb, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param n. | |||
* Must be positive. | |||
*/ | |||
CTEST(somatcopy, xerbla_invalid_cols) | |||
{ | |||
blasint m = 100, n = 0; | |||
blasint lda = 100, ldb = 0; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 4; | |||
int passed = check_badargs(order, trans, m, n, lda, ldb, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param lda. | |||
* If matrices are stored using row major layout, | |||
@@ -714,38 +714,6 @@ CTEST(zimatcopy, xerbla_invalid_trans) | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param m. | |||
* Must be positive. | |||
*/ | |||
CTEST(zimatcopy, xerbla_invalid_rows) | |||
{ | |||
blasint m = 0, n = 100; | |||
blasint lda_src = 0, lda_dst = 100; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 3; | |||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param n. | |||
* Must be positive. | |||
*/ | |||
CTEST(zimatcopy, xerbla_invalid_cols) | |||
{ | |||
blasint m = 100, n = 0; | |||
blasint lda_src = 100, lda_dst = 0; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 4; | |||
int passed = check_badargs(order, trans, m, n, lda_src, lda_dst, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param lda_src. | |||
* If matrices are stored using row major layout, | |||
@@ -541,38 +541,6 @@ CTEST(zomatcopy, xerbla_invalid_trans) | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param m. | |||
* Must be positive. | |||
*/ | |||
CTEST(zomatcopy, xerbla_invalid_rows) | |||
{ | |||
blasint m = 0, n = 100; | |||
blasint lda = 0, ldb = 100; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 3; | |||
int passed = check_badargs(order, trans, m, n, lda, ldb, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param n. | |||
* Must be positive. | |||
*/ | |||
CTEST(zomatcopy, xerbla_invalid_cols) | |||
{ | |||
blasint m = 100, n = 0; | |||
blasint lda = 100, ldb = 0; | |||
char order = 'C'; | |||
char trans = 'T'; | |||
int expected_info = 4; | |||
int passed = check_badargs(order, trans, m, n, lda, ldb, expected_info); | |||
ASSERT_EQUAL(TRUE, passed); | |||
} | |||
/** | |||
* Test error function for an invalid param lda. | |||
* If matrices are stored using row major layout, | |||