diff options
| author | cnugteren <web@cedricnugteren.nl> | 2016-05-08 18:07:55 +0200 |
|---|---|---|
| committer | cnugteren <web@cedricnugteren.nl> | 2016-05-08 18:07:55 +0200 |
| commit | eaf1de57455bdcb87de77531611d131ba9d0cd79 (patch) | |
| tree | c06a5f6ebcc25a720f06162ca957873a0c4b7293 /test | |
| parent | 25a25dbd6f6065420392e59c726902e05c0d4a5a (diff) | |
Fixed an issue where the xNRM2 and xASUM testers would incorrectly report failures for complex inputs
Diffstat (limited to 'test')
| -rw-r--r-- | test/wrapper_cblas.h | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/test/wrapper_cblas.h b/test/wrapper_cblas.h index 566c90e5..1b6977c0 100644 --- a/test/wrapper_cblas.h +++ b/test/wrapper_cblas.h @@ -338,14 +338,14 @@ void cblasXnrm2(const size_t n, void cblasXnrm2(const size_t n, std::vector<float2>& nrm2_buffer, const size_t nrm2_offset, const std::vector<float2>& x_buffer, const size_t x_offset, const size_t x_inc) { - nrm2_buffer[nrm2_offset] = cblas_scnrm2(n, - reinterpret_cast<const float*>(&x_buffer[x_offset]), static_cast<int>(x_inc)); + nrm2_buffer[nrm2_offset].real(cblas_scnrm2(n, + reinterpret_cast<const float*>(&x_buffer[x_offset]), static_cast<int>(x_inc))); } void cblasXnrm2(const size_t n, std::vector<double2>& nrm2_buffer, const size_t nrm2_offset, const std::vector<double2>& x_buffer, const size_t x_offset, const size_t x_inc) { - nrm2_buffer[nrm2_offset] = cblas_dznrm2(n, - reinterpret_cast<const double*>(&x_buffer[x_offset]), static_cast<int>(x_inc)); + nrm2_buffer[nrm2_offset].real(cblas_dznrm2(n, + reinterpret_cast<const double*>(&x_buffer[x_offset]), static_cast<int>(x_inc))); } // Forwards the Netlib BLAS calls for SASUM/DASUM/ScASUM/DzASUM @@ -364,14 +364,14 @@ void cblasXasum(const size_t n, void cblasXasum(const size_t n, std::vector<float2>& asum_buffer, const size_t asum_offset, const std::vector<float2>& x_buffer, const size_t x_offset, const size_t x_inc) { - asum_buffer[asum_offset] = cblas_scasum(n, - reinterpret_cast<const float*>(&x_buffer[x_offset]), static_cast<int>(x_inc)); + asum_buffer[asum_offset].real(cblas_scasum(n, + reinterpret_cast<const float*>(&x_buffer[x_offset]), static_cast<int>(x_inc))); } void cblasXasum(const size_t n, std::vector<double2>& asum_buffer, const size_t asum_offset, const std::vector<double2>& x_buffer, const size_t x_offset, const size_t x_inc) { - asum_buffer[asum_offset] = cblas_dzasum(n, - reinterpret_cast<const double*>(&x_buffer[x_offset]), static_cast<int>(x_inc)); + asum_buffer[asum_offset].real(cblas_dzasum(n, + reinterpret_cast<const double*>(&x_buffer[x_offset]), static_cast<int>(x_inc))); } // Forwards the Netlib BLAS calls for iSAMAX/iDAMAX/iCAMAX/iZAMAX |