Browse Source

Adapt tests to having only a subset of types in the library

tags/v0.3.11^2
Martin Kroeker GitHub 5 years ago
parent
commit
98153875e9
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 8 additions and 1 deletions
  1. +8
    -1
      utest/test_potrs.c

+ 8
- 1
utest/test_potrs.c View File

@@ -529,16 +529,20 @@ CTEST(potrf, smoketest_trivial){
for (j = 0; j < n; ++j) {
double err;

#ifdef BUILD_SINGLE
err = fabs(A1s[i+n*j] - Bs[i+n*j]);
if (err > 1e-5) {
CTEST_ERR("%s:%d %c s(%d,%d) difference: %g", __FILE__, __LINE__, uplo, i, j, err);
}

#endif
#ifdef BUILD_DOUBLE
err = fabs(A1d[i+n*j] - Bd[i+n*j]);
if (err > 1e-12) {
CTEST_ERR("%s:%d %c d(%d,%d) difference: %g", __FILE__, __LINE__, uplo, i, j, err);
}
#endif

#ifdef BUILD_COMPLEX
#ifdef OPENBLAS_COMPLEX_C99
err = cabsf(A1c[i+n*j] - Bc[i+n*j]);
#else
@@ -548,7 +552,9 @@ CTEST(potrf, smoketest_trivial){
if (err > 1e-5) {
CTEST_ERR("%s:%d %c c(%d,%d) difference: %g", __FILE__, __LINE__, uplo, i, j, err);
}
#endif

#ifdef BUILD_COMPLEX16
#ifdef OPENBLAS_COMPLEX_C99
err = cabs(A1z[i+n*j] - Bz[i+n*j]);
#else
@@ -558,6 +564,7 @@ CTEST(potrf, smoketest_trivial){
if (err > 1e-12) {
CTEST_ERR("%s:%d %c z(%d,%d) difference: %g", __FILE__, __LINE__, uplo, i, j, err);
}
#endif
}
}
}


Loading…
Cancel
Save