[clblas] 43/75: Removed ::cerr wrt calling reference and clblas
Ghislain Vaillant
ghisvail-guest at moszumanska.debian.org
Tue Jan 24 23:30:34 UTC 2017
This is an automated email from the git hooks/post-receive script.
ghisvail-guest pushed a commit to branch debian/master
in repository clblas.
commit 5c0d759cbb902e787986435d2a2953bb03b0216f
Author: Kent Knox <kent.knox at amd>
Date: Fri Apr 15 11:39:21 2016 -0500
Removed ::cerr wrt calling reference and clblas
Each test case was printing
Calling reference xxx routine...
Calling clblas xxx routine...
---
src/tests/correctness/corr-asum.cpp | 9 ---------
src/tests/correctness/corr-axpy.cpp | 12 ------------
src/tests/correctness/corr-copy.cpp | 11 -----------
src/tests/correctness/corr-dot.cpp | 9 ---------
src/tests/correctness/corr-dotc.cpp | 9 ---------
src/tests/correctness/corr-gbmv.cpp | 10 ----------
src/tests/correctness/corr-gemm.cpp | 7 +------
src/tests/correctness/corr-gemm2.cpp | 6 ------
src/tests/correctness/corr-gemv.cpp | 10 +---------
src/tests/correctness/corr-ger.cpp | 10 ----------
src/tests/correctness/corr-gerc.cpp | 10 ----------
src/tests/correctness/corr-hbmv.cpp | 10 ----------
src/tests/correctness/corr-hemm.cpp | 9 ---------
src/tests/correctness/corr-hemv.cpp | 10 ----------
src/tests/correctness/corr-her.cpp | 7 -------
src/tests/correctness/corr-her2.cpp | 9 ---------
src/tests/correctness/corr-her2k.cpp | 7 -------
src/tests/correctness/corr-herk.cpp | 7 -------
src/tests/correctness/corr-hpmv.cpp | 10 ----------
src/tests/correctness/corr-hpr.cpp | 8 --------
src/tests/correctness/corr-hpr2.cpp | 9 ---------
src/tests/correctness/corr-iamax.cpp | 9 ---------
src/tests/correctness/corr-nrm2.cpp | 9 ---------
src/tests/correctness/corr-rot.cpp | 12 ------------
src/tests/correctness/corr-rotg.cpp | 10 ----------
src/tests/correctness/corr-rotm.cpp | 11 -----------
src/tests/correctness/corr-rotmg.cpp | 10 ----------
src/tests/correctness/corr-sbmv.cpp | 10 ----------
src/tests/correctness/corr-scal.cpp | 8 --------
src/tests/correctness/corr-spmv.cpp | 10 ----------
src/tests/correctness/corr-spr.cpp | 11 -----------
src/tests/correctness/corr-spr2.cpp | 9 ---------
src/tests/correctness/corr-swap.cpp | 12 ------------
src/tests/correctness/corr-symm.cpp | 8 --------
src/tests/correctness/corr-symv.cpp | 10 +---------
src/tests/correctness/corr-syr.cpp | 12 ------------
src/tests/correctness/corr-syr2.cpp | 10 ----------
src/tests/correctness/corr-syr2k.cpp | 9 +--------
src/tests/correctness/corr-syrk.cpp | 9 +--------
src/tests/correctness/corr-tbmv.cpp | 9 ---------
src/tests/correctness/corr-tbsv.cpp | 9 ---------
src/tests/correctness/corr-tpmv.cpp | 11 -----------
src/tests/correctness/corr-tpsv.cpp | 9 ---------
src/tests/correctness/corr-trmm.cpp | 9 +--------
src/tests/correctness/corr-trmv.cpp | 10 ----------
src/tests/correctness/corr-trsm.cpp | 13 +------------
src/tests/correctness/corr-trsv.cpp | 9 ---------
src/tests/include/BlasBase.h | 3 +--
48 files changed, 8 insertions(+), 442 deletions(-)
diff --git a/src/tests/correctness/corr-asum.cpp b/src/tests/correctness/corr-asum.cpp
index 81da8e0..90d2b33 100644
--- a/src/tests/correctness/corr-asum.cpp
+++ b/src/tests/correctness/corr-asum.cpp
@@ -107,20 +107,15 @@ asumCorrectnessTest(TestParams *params)
}
srand(params->seed);
- ::std::cerr << "Generating input data... ";
randomVectors<T1>(params->N, (blasX + params->offBX), params->incx, (T1*)NULL, 0, true);
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufX = base->createEnqueueBuffer(blasX, (lengthX + params->offBX)* sizeof(*blasX), 0, CL_MEM_READ_WRITE);
bufAsum = base->createEnqueueBuffer(NULL, (1 + params->offa) * sizeof(T2), 0, CL_MEM_READ_WRITE);
scratchBuff = base->createEnqueueBuffer(NULL, (lengthX * sizeof(T1)), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xASUM routine... ";
-
*blasAsum = ::clMath::blas::asum( params->N, blasX, params->offBX, params->incx);
- ::std::cerr << "Done" << ::std::endl;
if ((bufX == NULL) || (bufAsum == NULL) || (scratchBuff == NULL)) {
releaseMemObjects(bufX, bufAsum, scratchBuff);
@@ -136,8 +131,6 @@ asumCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xASUM routine... ";
-
DataType type;
type = ( typeid(T1) == typeid(cl_float))? TYPE_FLOAT : ( typeid(T1) == typeid(cl_double))? TYPE_DOUBLE: ( typeid(T1) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT:TYPE_COMPLEX_DOUBLE;
@@ -163,8 +156,6 @@ asumCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufAsum, CL_TRUE, 0,
(1 + params->offa) * sizeof(*clblasAsum), clblasAsum, 0,
diff --git a/src/tests/correctness/corr-axpy.cpp b/src/tests/correctness/corr-axpy.cpp
index c5816bc..1aa3246 100644
--- a/src/tests/correctness/corr-axpy.cpp
+++ b/src/tests/correctness/corr-axpy.cpp
@@ -111,8 +111,6 @@ axpyCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
// Populate X and Y
randomVectors(params->N, (X+params->offBX), params->incx, (Y+params->offCY), params->incy);
@@ -120,8 +118,6 @@ axpyCorrectnessTest(TestParams *params)
memcpy(blasY, Y, (lengthY + params->offCY) * sizeof(T));
alpha = convertMultiplier<T>(params->alpha);
- ::std::cerr << "Done" << ::std::endl;
-
// Allocate buffers
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(T), 0, CL_MEM_READ_ONLY);
bufY = base->createEnqueueBuffer(Y, (lengthY + params->offCY)* sizeof(T), 0, CL_MEM_READ_WRITE);
@@ -142,14 +138,8 @@ axpyCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling reference xAXPY routine... ";
-
::clMath::blas::axpy((size_t)params->N, alpha, blasX, (size_t)params->offBX, params->incx,
blasY, (size_t)params->offCY, params->incy);
- ::std::cerr << "Done" << ::std::endl;
-
-
- ::std::cerr << "Calling clblas xAXPY routine... ";
err = (cl_int)::clMath::clblas::axpy(params->N, alpha, bufX, params->offBX, params->incx, bufY, params->offCY, params->incy,
params->numCommandQueues, base->commandQueues(), 0, NULL, events);
@@ -169,8 +159,6 @@ axpyCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufY, CL_TRUE, 0,
(lengthY + params->offCY) * sizeof(T), Y, 0, NULL, NULL);
diff --git a/src/tests/correctness/corr-copy.cpp b/src/tests/correctness/corr-copy.cpp
index 2ee46c0..625567f 100644
--- a/src/tests/correctness/corr-copy.cpp
+++ b/src/tests/correctness/corr-copy.cpp
@@ -104,22 +104,15 @@ copyCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
// Populate A and blasX
randomVectors( params->N, (blasX+params->offBX), params->incx, (blasY+params->offCY), params->incy );
memcpy(clblasY, blasY, (lengthY + params->offCY)* sizeof(*blasY));
- ::std::cerr << "Done" << ::std::endl;
-
// Allocate buffers
bufX = base->createEnqueueBuffer(blasX, (lengthX + params->offBX)* sizeof(*blasX), 0, CL_MEM_READ_WRITE);
bufY = base->createEnqueueBuffer(blasY, (lengthY + params->offCY)* sizeof(*blasY), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xCOPY routine... ";
-
::clMath::blas::copy( params->N, blasX, params->offBX, params->incx, blasY, params->offCY, params->incy);
- ::std::cerr << "Done" << ::std::endl;
if ((bufX == NULL) || (bufY == NULL)) {
/* Skip the test, the most probable reason is
@@ -137,8 +130,6 @@ copyCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xCOPY routine... ";
-
DataType type;
type = ( typeid(T) == typeid(cl_float))? TYPE_FLOAT : ( typeid(T) == typeid(cl_double))? TYPE_DOUBLE: ( typeid(T) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT:TYPE_COMPLEX_DOUBLE;
@@ -162,8 +153,6 @@ copyCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufY, CL_TRUE, 0,
((lengthY + params->offCY) * sizeof(*blasY)), clblasY, 0,
diff --git a/src/tests/correctness/corr-dot.cpp b/src/tests/correctness/corr-dot.cpp
index c496925..d72b237 100644
--- a/src/tests/correctness/corr-dot.cpp
+++ b/src/tests/correctness/corr-dot.cpp
@@ -115,10 +115,8 @@ dotCorrectnessTest(TestParams *params)
}
srand(params->seed);
- ::std::cerr << "Generating input data... ";
randomVectors(params->N, (blasX + params->offBX), params->incx, (blasY + params->offCY), params->incy, true);
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufX = base->createEnqueueBuffer(blasX, (lengthX + params->offBX)* sizeof(*blasX), 0, CL_MEM_READ_WRITE);
@@ -126,10 +124,7 @@ dotCorrectnessTest(TestParams *params)
bufDP = base->createEnqueueBuffer(NULL, (1 + params->offa) * sizeof(T), 0, CL_MEM_READ_WRITE);
scratchBuff = base->createEnqueueBuffer(NULL, (lengthX * sizeof(T)), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xDOT routine... ";
-
*blasDP = ::clMath::blas::dot( params->N, blasX, params->offBX, params->incx, blasY, params->offCY, params->incy);
- ::std::cerr << "Done" << ::std::endl;
if ((bufX == NULL) || (bufY == NULL) || (bufDP == NULL) || (scratchBuff == NULL)) {
releaseMemObjects(bufX, bufY, bufDP, scratchBuff);
@@ -144,8 +139,6 @@ dotCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xDOT routine... ";
-
DataType type;
type = ( typeid(T) == typeid(cl_float))? TYPE_FLOAT : ( typeid(T) == typeid(cl_double))? TYPE_DOUBLE: ( typeid(T) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT:TYPE_COMPLEX_DOUBLE;
@@ -169,8 +162,6 @@ dotCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufDP, CL_TRUE, 0,
(1 + params->offa) * sizeof(*clblasDP), clblasDP, 0,
diff --git a/src/tests/correctness/corr-dotc.cpp b/src/tests/correctness/corr-dotc.cpp
index d4a68b1..c2bc481 100644
--- a/src/tests/correctness/corr-dotc.cpp
+++ b/src/tests/correctness/corr-dotc.cpp
@@ -115,10 +115,8 @@ dotcCorrectnessTest(TestParams *params)
}
srand(params->seed);
- ::std::cerr << "Generating input data... ";
randomVectors(params->N, (blasX + params->offBX), params->incx, (blasY + params->offCY), params->incy, true);
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufX = base->createEnqueueBuffer(blasX, (lengthX + params->offBX)* sizeof(*blasX), 0, CL_MEM_READ_WRITE);
@@ -126,10 +124,7 @@ dotcCorrectnessTest(TestParams *params)
bufDP = base->createEnqueueBuffer(NULL, (1 + params->offa) * sizeof(T), 0, CL_MEM_READ_WRITE);
scratchBuff = base->createEnqueueBuffer(NULL, (lengthX * sizeof(T)), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xDOTC routine... ";
-
*blasDP = ::clMath::blas::dotc( params->N, blasX, params->offBX, params->incx, blasY, params->offCY, params->incy);
- ::std::cerr << "Done" << ::std::endl;
if ((bufX == NULL) || (bufY == NULL) || (bufDP == NULL) || (scratchBuff == NULL)) {
releaseMemObjects(bufX, bufY, bufDP, scratchBuff);
@@ -144,8 +139,6 @@ dotcCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xDOTC routine... ";
-
DataType type;
type = ( typeid(T) == typeid(cl_float))? TYPE_FLOAT : ( typeid(T) == typeid(cl_double))? TYPE_DOUBLE: ( typeid(T) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT:TYPE_COMPLEX_DOUBLE;
@@ -169,8 +162,6 @@ dotcCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufDP, CL_TRUE, 0,
(1 + params->offa) * sizeof(*clblasDP), clblasDP, 0,
diff --git a/src/tests/correctness/corr-gbmv.cpp b/src/tests/correctness/corr-gbmv.cpp
index efa8b4b..f64fad1 100644
--- a/src/tests/correctness/corr-gbmv.cpp
+++ b/src/tests/correctness/corr-gbmv.cpp
@@ -112,8 +112,6 @@ gbmvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
if((A == NULL) || (X == NULL) || (blasY == NULL) || (clblasY == NULL))
{
deleteBuffers<T>(A, X, blasY, clblasY);
@@ -130,15 +128,12 @@ gbmvCorrectnessTest(TestParams *params)
(A + params->offA), params->lda, (X+params->offBX), params->incx, (blasY+params->offCY), params->incy );
// Copy blasY to clblasY
memcpy(clblasY, blasY, (lengthY + params->offCY)* sizeof(*blasY));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufA = base->createEnqueueBuffer(A, (lengthA + params->offA)* sizeof(*A), 0, CL_MEM_READ_ONLY);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(*X), 0, CL_MEM_READ_ONLY);
bufY = base->createEnqueueBuffer(clblasY, (lengthY + params->offCY) * sizeof(*clblasY), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xGBMV routine... ";
-
clblasOrder fOrder;
clblasTranspose fTrans;
fOrder = params->order;
@@ -159,7 +154,6 @@ gbmvCorrectnessTest(TestParams *params)
}
clMath::blas::gbmv(fOrder, fTrans, fM, fN, fKL, fKU, alpha, A, params->offA, params->lda,
X, params->offBX, params->incx, beta, blasY, params->offCY, params->incy);
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufX == NULL) || (bufY == NULL)) {
// Skip the test, the most probable reason is
@@ -177,8 +171,6 @@ gbmvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xGBMV routine... ";
-
err = (cl_int)clMath::clblas::gbmv(params->order, params->transA, params->M, params->N, params->KL, params->KU,
alpha, bufA, params->offA, params->lda, bufX, params->offBX, params->incx,
beta, bufY, params->offCY, params->incy,
@@ -199,8 +191,6 @@ gbmvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufY, CL_TRUE, 0,
(lengthY + params->offCY) * sizeof(*clblasY), clblasY, 0,
diff --git a/src/tests/correctness/corr-gemm.cpp b/src/tests/correctness/corr-gemm.cpp
index 5d84983..61821f4 100644
--- a/src/tests/correctness/corr-gemm.cpp
+++ b/src/tests/correctness/corr-gemm.cpp
@@ -77,8 +77,7 @@ gemmCorrectnessTest(TestParams *params)
(typeid(T) == typeid(DoubleComplex)));
if (canCaseBeSkipped(params, isComplex)) {
- std::cerr << ">> Test is skipped because it has no importance for this "
- "level of coverage" << std::endl;
+ std::cerr << ">> Test is skipped" << std::endl;
SUCCEED();
return;
}
@@ -111,7 +110,6 @@ gemmCorrectnessTest(TestParams *params)
memcpy(clblasC, blasC, params->rowsC * params->columnsC * sizeof(*blasC));
//::std::cerr << "Done" << ::std::endl;
- //::std::cerr << "Calling reference xGEMM routine... ";
if (params->order == clblasColumnMajor) {
::clMath::blas::gemm(clblasColumnMajor, params->transA, params->transB,
params->M, params->N, params->K, alpha, A,
@@ -139,7 +137,6 @@ gemmCorrectnessTest(TestParams *params)
delete[] reorderedB;
delete[] reorderedA;
}
- //::std::cerr << "Done" << ::std::endl;
bufA = base->createEnqueueBuffer(A, params->rowsA * params->columnsA *
sizeof(*A), params->offA * sizeof(*A),
@@ -167,7 +164,6 @@ gemmCorrectnessTest(TestParams *params)
return;
}
- //::std::cerr << "Calling clblas xGEMM routine... ";
err = (cl_int)::clMath::clblas::gemm(params->order, params->transA,
params->transB, params->M, params->N, params->K, alpha, bufA,
params->offA, params->lda, bufB, params->offBX, params->ldb, beta,
@@ -188,7 +184,6 @@ gemmCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- //::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufC, CL_TRUE,
params->offCY * sizeof(*clblasC),
diff --git a/src/tests/correctness/corr-gemm2.cpp b/src/tests/correctness/corr-gemm2.cpp
index 2730d42..116816a 100644
--- a/src/tests/correctness/corr-gemm2.cpp
+++ b/src/tests/correctness/corr-gemm2.cpp
@@ -120,14 +120,11 @@ gemm2CorrectnessTest(TestParams *params)
beta = convertMultiplier<T>(params->beta);
}
- ::std::cerr << "Generating input data... ";
randomGemmMatrices<T>(params->order, params->transA, params->transB,
params->M, params->N, params->K, useAlpha, &alpha, A, params->lda,
B, params->ldb, useBeta, &beta, blasC, params->ldc);
memcpy(clblasC, blasC, params->rowsC * params->columnsC * sizeof(*blasC));
- ::std::cerr << "Done" << ::std::endl;
- ::std::cerr << "Calling reference xGEMM routine... ";
if (params->order == clblasColumnMajor) {
::clMath::blas::gemm(clblasColumnMajor, params->transA, params->transB,
params->M, params->N, params->K, alpha, A,
@@ -162,7 +159,6 @@ gemm2CorrectnessTest(TestParams *params)
delete[] reorderedB;
delete[] reorderedA;
}
- ::std::cerr << "Done" << ::std::endl;
bufA = base->createEnqueueBuffer(A, params->rowsA * params->columnsA *
sizeof(*A), params->offA * sizeof(*A),
@@ -190,7 +186,6 @@ gemm2CorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xGEMM routine... ";
err = (cl_int)::clMath::clblas::gemm2(params->order, params->transA,
params->transB, params->M, params->N, params->K, alpha, bufA,
params->offA, params->lda, bufB, params->offBX, params->ldb, beta,
@@ -211,7 +206,6 @@ gemm2CorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufC, CL_TRUE,
params->offCY * sizeof(*clblasC),
diff --git a/src/tests/correctness/corr-gemv.cpp b/src/tests/correctness/corr-gemv.cpp
index c1a564c..f3d5b75 100644
--- a/src/tests/correctness/corr-gemv.cpp
+++ b/src/tests/correctness/corr-gemv.cpp
@@ -77,8 +77,7 @@ gemvCorrectnessTest(TestParams *params)
isComplex = ((typeid(T) == typeid(FloatComplex)) ||
(typeid(T) == typeid(DoubleComplex)));
if (canCaseBeSkipped(params, isComplex)) {
- std::cerr << ">> Test is skipped because it has no importance for this "
- "level of coverage" << std::endl;
+ std::cerr << ">> Test is skipped" << std::endl;
SUCCEED();
return;
}
@@ -115,7 +114,6 @@ gemvCorrectnessTest(TestParams *params)
lenY = params->N;
}
- ::std::cerr << "Generating input data... ";
setNans<T>(params->rowsA * params->columnsA, A);
setNans<T>(params->rowsB * params->columnsB, B);
setNans<T>(params->rowsC * params->columnsC, blasC);
@@ -134,9 +132,6 @@ gemvCorrectnessTest(TestParams *params)
params->columnsC * params->rowsC);
memcpy(clblasC, blasC, params->rowsC * params->columnsC * sizeof(*clblasC));
- ::std::cerr << "Done" << ::std::endl;
-
- ::std::cerr << "Calling reference xGEMV routine... ";
if (params->order == clblasColumnMajor) {
::clMath::blas::gemv(clblasColumnMajor, params->transA,
params->M, params->N, alpha, A, params->lda,
@@ -153,7 +148,6 @@ gemvCorrectnessTest(TestParams *params)
delete[] reorderedA;
}
- ::std::cerr << "Done" << ::std::endl;
bufA = base->createEnqueueBuffer(A, params->rowsA * params->columnsA *
sizeof(*A), params->offA * sizeof(*A),
@@ -178,7 +172,6 @@ gemvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xGEMV routine... ";
err = (cl_int)::clMath::clblas::gemv(params->order, params->transA,
params->M, params->N, alpha, bufA, params->offA, params->lda,
bufB, params->offBX, params->incx, beta, bufC, params->offCY,
@@ -199,7 +192,6 @@ gemvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufC, CL_TRUE, 0,
params->rowsC * params->columnsC * sizeof(*clblasC),
diff --git a/src/tests/correctness/corr-ger.cpp b/src/tests/correctness/corr-ger.cpp
index 1ffe440..1c13276 100644
--- a/src/tests/correctness/corr-ger.cpp
+++ b/src/tests/correctness/corr-ger.cpp
@@ -123,8 +123,6 @@ gerCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
int creationFlags = 0;
creationFlags = creationFlags | RANDOM_INIT;
creationFlags = ( (params-> order) == clblasRowMajor)? (creationFlags | ROW_MAJOR_ORDER) : (creationFlags);
@@ -143,10 +141,6 @@ gerCorrectnessTest(TestParams *params)
bufy = base->createEnqueueBuffer(y, (lengthy + params->offCY) * sizeof(*y), 0, CL_MEM_READ_ONLY);
- ::std::cerr << "Done" << ::std::endl;
- ::std::cerr << "Calling reference xGER routine... ";
-
-
clblasOrder fOrder;
size_t fN, fM;
size_t fOffx, fOffy;
@@ -177,7 +171,6 @@ gerCorrectnessTest(TestParams *params)
// Call reference blas routine
clMath::blas::ger(fOrder, fM, fN, alpha_, fX , fOffx, fIncx, fY, fOffy, fIncy, A, params->offa, params->lda);
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufx == NULL) || (bufy == NULL)) {
/* Skip the test, the most probable reason is
@@ -195,8 +188,6 @@ gerCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xGER routine... ";
-
err = (cl_int)::clMath::clblas::ger( params->order, params->M, params->N, alpha_,
bufx, params->offBX, params->incx, bufy, params->offCY, params->incy,bufA, params->offa, params->lda,
params->numCommandQueues, base->commandQueues(), 0, NULL, events );
@@ -218,7 +209,6 @@ gerCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufA, CL_TRUE, 0,
(lengthA + params->offa)* sizeof(*backA), backA, 0,
diff --git a/src/tests/correctness/corr-gerc.cpp b/src/tests/correctness/corr-gerc.cpp
index 0070a77..ec5bfaa 100644
--- a/src/tests/correctness/corr-gerc.cpp
+++ b/src/tests/correctness/corr-gerc.cpp
@@ -123,8 +123,6 @@ gercCorrectnessTest(TestParams *params)
}
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
int creationFlags = 0;
creationFlags = creationFlags | RANDOM_INIT;
creationFlags = ( (params-> order) == clblasRowMajor)? (creationFlags | ROW_MAJOR_ORDER) : (creationFlags);
@@ -143,10 +141,6 @@ gercCorrectnessTest(TestParams *params)
bufy = base->createEnqueueBuffer(y, (lengthy + params->offCY) * sizeof(*y), 0, CL_MEM_READ_ONLY);
- ::std::cerr << "Done" << ::std::endl;
- ::std::cerr << "Calling reference xGER routine... ";
-
-
clblasOrder fOrder;
size_t fN, fM;
size_t fOffx, fOffy;
@@ -180,7 +174,6 @@ gercCorrectnessTest(TestParams *params)
else {
clMath::blas::gerc(fOrder, fM, fN, alpha_, fX , fOffx, fIncx, fY, fOffy, fIncy, A, params->offa, params->lda);
}
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufx == NULL) || (bufy == NULL)) {
/* Skip the test, the most probable reason is
@@ -198,8 +191,6 @@ gercCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xGER routine... ";
-
err = (cl_int)::clMath::clblas::gerc( params->order, params->M, params->N, alpha_,
bufx, params->offBX, params->incx, bufy, params->offCY, params->incy,bufA, params->offa, params->lda,
params->numCommandQueues, base->commandQueues(), 0, NULL, events );
@@ -220,7 +211,6 @@ gercCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufA, CL_TRUE, 0,
(lengthA + params->offa)* sizeof(*backA), backA, 0,
diff --git a/src/tests/correctness/corr-hbmv.cpp b/src/tests/correctness/corr-hbmv.cpp
index 9b7ff8e..accecd7 100644
--- a/src/tests/correctness/corr-hbmv.cpp
+++ b/src/tests/correctness/corr-hbmv.cpp
@@ -107,8 +107,6 @@ hbmvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
if((A == NULL) || (X == NULL) || (blasY == NULL) || (clblasY == NULL))
{
deleteBuffers<T>(A, X, blasY, clblasY);
@@ -125,15 +123,12 @@ hbmvCorrectnessTest(TestParams *params)
(A + params->offA), params->lda, (X+params->offBX), params->incx, (blasY+params->offCY), params->incy );
// Copy blasY to clblasY
memcpy(clblasY, blasY, (lengthY + params->offCY)* sizeof(*blasY));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufA = base->createEnqueueBuffer(A, (lengthA + params->offA)* sizeof(*A), 0, CL_MEM_READ_ONLY);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(*X), 0, CL_MEM_READ_ONLY);
bufY = base->createEnqueueBuffer(clblasY, (lengthY + params->offCY) * sizeof(*clblasY), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xHBMV routine... ";
-
clblasOrder fOrder;
clblasUplo fUplo;
fOrder = params->order;
@@ -149,7 +144,6 @@ hbmvCorrectnessTest(TestParams *params)
clMath::blas::hbmv(fOrder, fUplo, fN, fK, alpha, A, params->offA, params->lda,
X, params->offBX, params->incx, beta, blasY, params->offCY, params->incy);
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufX == NULL) || (bufY == NULL)) {
// Skip the test, the most probable reason is
@@ -167,8 +161,6 @@ hbmvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xHBMV routine... ";
-
err = (cl_int)clMath::clblas::hbmv(params->order, params->uplo, params->N, params->K,
alpha, bufA, params->offA, params->lda, bufX, params->offBX, params->incx,
beta, bufY, params->offCY, params->incy,
@@ -189,8 +181,6 @@ hbmvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufY, CL_TRUE, 0,
(lengthY + params->offCY) * sizeof(*clblasY), clblasY, 0,
diff --git a/src/tests/correctness/corr-hemm.cpp b/src/tests/correctness/corr-hemm.cpp
index feb5f2a..8f540a2 100644
--- a/src/tests/correctness/corr-hemm.cpp
+++ b/src/tests/correctness/corr-hemm.cpp
@@ -133,8 +133,6 @@ hemmCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... " << std::endl;
-
int creationFlags = 0, AcreationFlags;
creationFlags = creationFlags | RANDOM_INIT;
creationFlags = ( (params-> order) == clblasRowMajor)? (creationFlags | ROW_MAJOR_ORDER) : (creationFlags);
@@ -153,9 +151,6 @@ hemmCorrectnessTest(TestParams *params)
bufB = base->createEnqueueBuffer(B, (lengthB + params->offBX) * sizeof(T), 0, CL_MEM_READ_ONLY);
bufC = base->createEnqueueBuffer(backC, (lengthC + params->offCY) * sizeof(T), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Done" << ::std::endl;
- ::std::cerr << "Calling reference xHEMM routine... ";
-
clblasOrder fOrder;
clblasUplo fUplo;
clblasSide fSide;
@@ -179,7 +174,6 @@ hemmCorrectnessTest(TestParams *params)
// Call reference blas routine
clMath::blas::hemm(fOrder, fSide, fUplo, fM, fN, alpha_,
A, params->offA, params->lda, B, params->offBX, params->ldb, beta_, C, params->offCY, params->ldc);
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufB == NULL) || (bufC == NULL)) {
/* Skip the test, the most probable reason is
@@ -197,8 +191,6 @@ hemmCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xHEMM routine... ";
-
err = (cl_int)::clMath::clblas::hemm( params->order, params->side, params->uplo, params->M, params->N, alpha_,
bufA, params->offA, params->lda, bufB, params->offBX, params->ldb, beta_, bufC, params->offCY, params->ldc,
params->numCommandQueues, base->commandQueues(), 0, NULL, events );
@@ -220,7 +212,6 @@ hemmCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
err = clEnqueueReadBuffer(base->commandQueues()[0], bufC, CL_TRUE, 0,
(lengthC + params->offCY) * sizeof(T), backC, 0,
diff --git a/src/tests/correctness/corr-hemv.cpp b/src/tests/correctness/corr-hemv.cpp
index 41bcb62..cced473 100644
--- a/src/tests/correctness/corr-hemv.cpp
+++ b/src/tests/correctness/corr-hemv.cpp
@@ -114,8 +114,6 @@ hemvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
if((A == NULL) || (X == NULL) || (blasY == NULL) || (clblasY == NULL))
{
deleteBuffers<T>(A, X, blasY, clblasY);
@@ -134,7 +132,6 @@ hemvCorrectnessTest(TestParams *params)
(X + params->offBX), params->incx, true, &beta, (blasY + params->offCY), params->incy);
// Copy blasY to clblasY
memcpy(clblasY, blasY, (lengthY + params->offCY)* sizeof(*blasY));
- ::std::cerr << "Done" << ::std::endl;
/*
printf("\n\n before acml call\nA\n");
printMatrixBlock( params->order, 0, 0, params->N, params->N, params->lda, A+params->offA);
@@ -153,8 +150,6 @@ hemvCorrectnessTest(TestParams *params)
//printData( "bufX", blasX, lengthX, 1, lengthX);
//printData( "clblasX", clblasX, lengthX, 1, lengthX);
- ::std::cerr << "Calling reference xHEMV routine... ";
-
clblasOrder order;
clblasUplo fUplo;
@@ -169,7 +164,6 @@ hemvCorrectnessTest(TestParams *params)
}
::clMath::blas::hemv( order, fUplo, params->N, alpha, A, params->offA, params->lda, X, params->offBX, params->incx,
beta, blasY, params->offCY, params->incy);
- ::std::cerr << "Done" << ::std::endl;
/*
printf("\n\n after acml call\n");
printf("\nY\n");
@@ -193,8 +187,6 @@ hemvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xHEMV routine... ";
-
err = (cl_int)::clMath::clblas::hemv(params->order, params->uplo, params->N, alpha, bufA,
params->offA, params->lda, bufX, params->offBX, params->incx, beta, bufY, params->offCY, params->incy,
params->numCommandQueues, base->commandQueues(), 0, NULL, events);
@@ -214,8 +206,6 @@ hemvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufY, CL_TRUE, 0,
(lengthY + params->offCY) * sizeof(*clblasY), clblasY, 0,
diff --git a/src/tests/correctness/corr-her.cpp b/src/tests/correctness/corr-her.cpp
index 34b5799..73f5be3 100644
--- a/src/tests/correctness/corr-her.cpp
+++ b/src/tests/correctness/corr-her.cpp
@@ -101,7 +101,6 @@ herCorrectnessTest(TestParams *params)
}
srand(params->seed);
- ::std::cerr << "Generating input data... ";
randomHerMatrices( params->order, params->uplo, params->N, &alpha_, (A + params->offa), params->lda, (X + params->offBX), params->incx );
memcpy(backA, A, (lengthA + params->offa)* sizeof(*A));
::std::cerr << "Done" << ::std::endl;
@@ -110,8 +109,6 @@ herCorrectnessTest(TestParams *params)
bufA = base->createEnqueueBuffer(A, (lengthA + params->offa) * sizeof(*A), 0, CL_MEM_READ_WRITE);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX) * sizeof(*X), 0, CL_MEM_READ_ONLY);
- ::std::cerr << "Calling reference xHER routine... ";
-
clblasOrder fOrder;
clblasUplo fUplo;
fOrder = params->order;
@@ -124,7 +121,6 @@ herCorrectnessTest(TestParams *params)
fUplo = (fUplo == clblasLower)? clblasUpper : clblasLower;
}
clMath::blas::her( fOrder, fUplo, params->N, CREAL(alpha_), X , params->offBX, params->incx, A, params->offa, params->lda );
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufX == NULL) ) {
/* Skip the test, the most probable reason is
@@ -151,8 +147,6 @@ herCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xHER routine... ";
-
err = (cl_int)::clMath::clblas::her( params->order, params->uplo, params->N, CREAL(alpha_),
bufX, params->offBX, params->incx, bufA, params->offa, params->lda,
params->numCommandQueues, base->commandQueues(),
@@ -173,7 +167,6 @@ herCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
err = clEnqueueReadBuffer(base->commandQueues()[0], bufA, CL_TRUE, 0,
(lengthA + params->offa) * sizeof(*A), backA, 0,
diff --git a/src/tests/correctness/corr-her2.cpp b/src/tests/correctness/corr-her2.cpp
index 5d18e1d..f041420 100644
--- a/src/tests/correctness/corr-her2.cpp
+++ b/src/tests/correctness/corr-her2.cpp
@@ -115,8 +115,6 @@ her2CorrectnessTest(TestParams *params)
}
alpha = convertMultiplier<T>(params->alpha);
- ::std::cerr << "Generating input data... ";
-
randomHer2Matrices<T>(params->order, params->uplo, params->N, &alpha, (blasA + params->offa), params->lda,
(X + params->offBX), params->incx, (Y + params->offCY), params->incy);
@@ -129,8 +127,6 @@ her2CorrectnessTest(TestParams *params)
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(*X), 0, CL_MEM_READ_ONLY);
bufY = base->createEnqueueBuffer(Y, (lengthY + params->offCY)* sizeof(*Y), 0, CL_MEM_READ_ONLY);
- ::std::cerr << "Calling reference xHER2 routine... ";
-
clblasOrder order;
clblasUplo fUplo;
order = params->order;
@@ -147,7 +143,6 @@ her2CorrectnessTest(TestParams *params)
else {
::clMath::blas::her2( order, fUplo, params->N, alpha, X, params->offBX, params->incx, Y, params->offCY, params->incy, blasA, params->offa, params->lda);
}
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufX == NULL) || (bufY == NULL)) {
/* Skip the test, the most probable reason is
@@ -165,8 +160,6 @@ her2CorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xHER2 routine... ";
-
err = (cl_int)::clMath::clblas::her2( params->order, params->uplo, params->N, alpha,
bufX, params->offBX, params->incx, bufY, params->offCY, params->incy, bufA, params->offa, params->lda,
params->numCommandQueues, base->commandQueues(),
@@ -187,8 +180,6 @@ her2CorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufA, CL_TRUE, 0,
(lengthA + params->offa) * sizeof(*clblasA), clblasA, 0,
diff --git a/src/tests/correctness/corr-her2k.cpp b/src/tests/correctness/corr-her2k.cpp
index d7db83a..21434ec 100644
--- a/src/tests/correctness/corr-her2k.cpp
+++ b/src/tests/correctness/corr-her2k.cpp
@@ -106,8 +106,6 @@ her2kCorrectnessTest(TestParams *params)
alpha = convertMultiplier<T>(params->alpha);
beta = convertMultiplier<T>(params->beta);
- ::std::cerr << "Generating input data... ";
-
clblasTranspose ftransB = (params->transA==clblasNoTrans)? clblasConjTrans: clblasNoTrans;
randomGemmMatrices<T>(params->order, params->transA, ftransB,
@@ -115,7 +113,6 @@ her2kCorrectnessTest(TestParams *params)
B, params->ldb, true, &beta, blasC, params->ldc);
memcpy(clblasC, blasC, params->rowsC * params->columnsC * sizeof(*blasC));
- ::std::cerr << "Done" << ::std::endl;
bufA = base->createEnqueueBuffer(A, params->rowsA * params->columnsA * sizeof(*A), params->offA * sizeof(*A),
CL_MEM_READ_ONLY);
@@ -141,7 +138,6 @@ her2kCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling reference xHER2K routine... ";
T fAlpha = alpha;
if (params->order == clblasColumnMajor) {
::clMath::blas::her2k(clblasColumnMajor, params->uplo, params->transA,
@@ -158,9 +154,7 @@ her2kCorrectnessTest(TestParams *params)
A, 0, params->lda, B, 0, params->ldb, CREAL(beta), blasC, 0, params->ldc);
}
- ::std::cerr << "Done" << ::std::endl;
- ::std::cerr << "Calling clblas xHER2K routine... ";
err = (cl_int)::clMath::clblas::her2k(params->order, params->uplo,
params->transA, params->N, params->K,
alpha, bufA, params->offA, params->lda, bufB, params->offBX, params->ldb,
@@ -183,7 +177,6 @@ her2kCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufC, CL_TRUE, params->offCY * sizeof(*clblasC),
params->rowsC * params->columnsC * sizeof(*clblasC), clblasC, 0, NULL, NULL);
diff --git a/src/tests/correctness/corr-herk.cpp b/src/tests/correctness/corr-herk.cpp
index 2b5d8ab..f64eb40 100644
--- a/src/tests/correctness/corr-herk.cpp
+++ b/src/tests/correctness/corr-herk.cpp
@@ -118,15 +118,11 @@ herkCorrectnessTest(TestParams *params)
alpha = convertMultiplier<T>(params->alpha);
beta = convertMultiplier<T>(params->beta);
- ::std::cerr << "Generating input data... ";
-
randomGemmMatrices<T>(params->order, params->transA, clblasNoTrans,
params->N, params->N, params->K, useAlpha, &alpha, A, params->lda,
NULL, 0, useBeta, &beta, blasC, params->ldc);
memcpy(clblasC, blasC, params->rowsC * params->columnsC * sizeof(*blasC));
- ::std::cerr << "Done" << ::std::endl;
- ::std::cerr << "Calling reference xHERK routine... ";
if (params->order == clblasColumnMajor) {
::clMath::blas::herk(clblasColumnMajor, params->uplo, params->transA,
params->N, params->K, CREAL(alpha), A, params->lda,
@@ -158,7 +154,6 @@ herkCorrectnessTest(TestParams *params)
A, params->lda, CREAL(beta), blasC, params->ldc);
}
- ::std::cerr << "Done" << ::std::endl;
bufA = base->createEnqueueBuffer(A, params->rowsA * params->columnsA *
sizeof(*A), params->offA * sizeof(*A),
@@ -184,7 +179,6 @@ herkCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xHERK routine... ";
err = (cl_int)::clMath::clblas::herk(params->order, params->uplo,
params->transA, params->N, params->K,
CREAL(alpha), bufA, params->offA, params->lda,
@@ -207,7 +201,6 @@ herkCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufC, CL_TRUE,
params->offCY * sizeof(*clblasC),
diff --git a/src/tests/correctness/corr-hpmv.cpp b/src/tests/correctness/corr-hpmv.cpp
index 9531774..5da7828 100644
--- a/src/tests/correctness/corr-hpmv.cpp
+++ b/src/tests/correctness/corr-hpmv.cpp
@@ -105,8 +105,6 @@ hpmvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
if((AP == NULL) || (X == NULL) || (blasY == NULL) || (clblasY == NULL))
{
deleteBuffers<T>(AP, X, blasY, clblasY);
@@ -123,15 +121,12 @@ hpmvCorrectnessTest(TestParams *params)
(X + params->offBX), params->incx, true, &beta, (blasY + params->offCY), params->incy);
// Copy blasY to clblasY
memcpy(clblasY, blasY, (lengthY + params->offCY)* sizeof(*blasY));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufAP = base->createEnqueueBuffer(AP, (lengthA + params->offA)* sizeof(*AP), 0, CL_MEM_READ_ONLY);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(*X), 0, CL_MEM_READ_ONLY);
bufY = base->createEnqueueBuffer(clblasY, (lengthY + params->offCY) * sizeof(*clblasY), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xHPMV routine... ";
-
clblasOrder order;
clblasUplo fUplo;
@@ -146,7 +141,6 @@ hpmvCorrectnessTest(TestParams *params)
}
::clMath::blas::hpmv( order, fUplo, params->N, alpha, AP, params->offA, X, params->offBX, params->incx,
beta, blasY, params->offCY, params->incy);
- ::std::cerr << "Done" << ::std::endl;
if ((bufAP == NULL) || (bufX == NULL) || (bufY == NULL)) {
// Skip the test, the most probable reason is
@@ -164,8 +158,6 @@ hpmvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xHPMV routine... ";
-
err = (cl_int)::clMath::clblas::hpmv(params->order, params->uplo, params->N, alpha, bufAP,
params->offA, bufX, params->offBX, params->incx, beta, bufY, params->offCY, params->incy,
params->numCommandQueues, base->commandQueues(), 0, NULL, events);
@@ -185,8 +177,6 @@ hpmvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufY, CL_TRUE, 0,
(lengthY + params->offCY) * sizeof(*clblasY), clblasY, 0,
diff --git a/src/tests/correctness/corr-hpr.cpp b/src/tests/correctness/corr-hpr.cpp
index 7a513c3..4cb539f 100644
--- a/src/tests/correctness/corr-hpr.cpp
+++ b/src/tests/correctness/corr-hpr.cpp
@@ -100,17 +100,13 @@ hprCorrectnessTest(TestParams *params)
}
srand(params->seed);
- ::std::cerr << "Generating input data... ";
randomHerMatrices( params->order, params->uplo, params->N, &alpha_, (AP + params->offa), params->lda, (X + params->offBX), params->incx );
memcpy(backA, AP, (lengthAP + params->offa)* sizeof(T));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufAP = base->createEnqueueBuffer(AP, (lengthAP + params->offa) * sizeof(T), 0, CL_MEM_READ_WRITE);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX) * sizeof(*X), 0, CL_MEM_READ_ONLY);
- ::std::cerr << "Calling reference xHPR routine... ";
-
clblasOrder fOrder;
clblasUplo fUplo;
fOrder = params->order;
@@ -123,7 +119,6 @@ hprCorrectnessTest(TestParams *params)
fUplo = (fUplo == clblasLower)? clblasUpper : clblasLower;
}
clMath::blas::hpr( fOrder, fUplo, params->N, CREAL(alpha_), X , params->offBX, params->incx, AP, params->offa);
- ::std::cerr << "Done" << ::std::endl;
if ((bufAP == NULL) || (bufX == NULL) ) {
/* Skip the test, the most probable reason is
@@ -150,8 +145,6 @@ hprCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xHPR routine... ";
-
err = (cl_int)::clMath::clblas::hpr( params->order, params->uplo, params->N, CREAL(alpha_),
bufX, params->offBX, params->incx, bufAP, params->offa,
params->numCommandQueues, base->commandQueues(),
@@ -172,7 +165,6 @@ hprCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
err = clEnqueueReadBuffer(base->commandQueues()[0], bufAP, CL_TRUE, 0,
(lengthAP + params->offa) * sizeof(T), backA, 0,
diff --git a/src/tests/correctness/corr-hpr2.cpp b/src/tests/correctness/corr-hpr2.cpp
index 313f167..0ba272a 100644
--- a/src/tests/correctness/corr-hpr2.cpp
+++ b/src/tests/correctness/corr-hpr2.cpp
@@ -115,21 +115,17 @@ hpr2CorrectnessTest(TestParams *params)
}
alpha = convertMultiplier<T>(params->alpha);
- ::std::cerr << "Generating input data... ";
randomHer2Matrices<T>(params->order, params->uplo, params->N, &alpha, (blasAP + params->offa), params->lda,
(X + params->offBX), params->incx, (Y + params->offCY), params->incy);
// Copy blasA to clblasA
memcpy(clblasAP, blasAP, (lengthAP + params->offa)* sizeof(*blasAP));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufAP = base->createEnqueueBuffer(clblasAP, (lengthAP + params->offa)* sizeof(*clblasAP), 0,CL_MEM_READ_WRITE);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(*X), 0, CL_MEM_READ_ONLY);
bufY = base->createEnqueueBuffer(Y, (lengthY + params->offCY)* sizeof(*Y), 0, CL_MEM_READ_ONLY);
- ::std::cerr << "Calling reference xHPR2 routine... ";
-
clblasOrder order;
clblasUplo fUplo;
order = params->order;
@@ -146,7 +142,6 @@ hpr2CorrectnessTest(TestParams *params)
else {
::clMath::blas::hpr2( order, fUplo, params->N, alpha, X, params->offBX, params->incx, Y, params->offCY, params->incy, blasAP, params->offa);
}
- ::std::cerr << "Done" << ::std::endl;
if ((bufAP == NULL) || (bufX == NULL) || (bufY == NULL)) {
/* Skip the test, the most probable reason is
@@ -164,8 +159,6 @@ hpr2CorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xHPR2 routine... ";
-
err = (cl_int)::clMath::clblas::hpr2( params->order, params->uplo, params->N, alpha,
bufX, params->offBX, params->incx, bufY, params->offCY, params->incy, bufAP, params->offa,
params->numCommandQueues, base->commandQueues(),
@@ -186,8 +179,6 @@ hpr2CorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufAP, CL_TRUE, 0,
(lengthAP + params->offa) * sizeof(*clblasAP), clblasAP, 0,
diff --git a/src/tests/correctness/corr-iamax.cpp b/src/tests/correctness/corr-iamax.cpp
index 81f2bd3..040b918 100644
--- a/src/tests/correctness/corr-iamax.cpp
+++ b/src/tests/correctness/corr-iamax.cpp
@@ -106,20 +106,15 @@ iamaxCorrectnessTest(TestParams *params)
}
srand(params->seed);
- ::std::cerr << "Generating input data... ";
randomVectors<T>(params->N, (blasX + params->offBX), params->incx, NULL, 0);
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufX = base->createEnqueueBuffer(blasX, (lengthX + params->offBX)* sizeof(T), 0, CL_MEM_READ_ONLY);
bufiAmax = base->createEnqueueBuffer(NULL, (1 + params->offa) * sizeof(int), 0, CL_MEM_READ_WRITE);
scratchBuff = base->createEnqueueBuffer(NULL, (2 * lengthX * sizeof(T)), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xiAMAX routine... ";
-
*blasiAmax = ::clMath::blas::iamax( params->N, blasX, params->offBX, params->incx);
- ::std::cerr << "Done" << ::std::endl;
if ((bufX == NULL) || (bufiAmax == NULL) || (scratchBuff == NULL)) {
releaseMemObjects(bufX, bufiAmax, scratchBuff);
@@ -134,8 +129,6 @@ iamaxCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xiAMAX routine... ";
-
DataType type;
type = ( typeid(T) == typeid(cl_float))? TYPE_FLOAT : ( typeid(T) == typeid(cl_double))? TYPE_DOUBLE: ( typeid(T) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT:TYPE_COMPLEX_DOUBLE;
@@ -159,8 +152,6 @@ iamaxCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufiAmax, CL_TRUE, 0,
(1 + params->offa) * sizeof(*clblasiAmax), clblasiAmax, 0, NULL, NULL);
diff --git a/src/tests/correctness/corr-nrm2.cpp b/src/tests/correctness/corr-nrm2.cpp
index 588ee82..34bce30 100644
--- a/src/tests/correctness/corr-nrm2.cpp
+++ b/src/tests/correctness/corr-nrm2.cpp
@@ -109,20 +109,15 @@ nrm2CorrectnessTest(TestParams *params)
}
srand(params->seed);
- ::std::cerr << "Generating input data... ";
randomVectors<T1>(params->N, (blasX + params->offBX), params->incx, (T1*)NULL, 0, true);
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufX = base->createEnqueueBuffer(blasX, (lengthX + params->offBX)* sizeof(*blasX), 0, CL_MEM_READ_WRITE);
bufNRM2 = base->createEnqueueBuffer(NULL, (1 + params->offa) * sizeof(T2), 0, CL_MEM_READ_WRITE);
scratchBuff = base->createEnqueueBuffer(NULL, (lengthX * 2 * sizeof(T1)), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xNRM2 routine... ";
-
*blasNRM2 = ::clMath::blas::nrm2( params->N, blasX, params->offBX, params->incx);
- ::std::cerr << "Done" << ::std::endl;
if ((bufX == NULL) || (bufNRM2 == NULL) || (scratchBuff == NULL)) {
releaseMemObjects(bufX, bufNRM2, scratchBuff);
@@ -138,8 +133,6 @@ nrm2CorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xNRM2 routine... ";
-
DataType type;
type = ( typeid(T1) == typeid(cl_float))? TYPE_FLOAT : ( typeid(T1) == typeid(cl_double))? TYPE_DOUBLE: ( typeid(T1) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT:TYPE_COMPLEX_DOUBLE;
@@ -163,8 +156,6 @@ nrm2CorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufNRM2, CL_TRUE, 0,
(1 + params->offa) * sizeof(*clblasNRM2), clblasNRM2, 0, NULL, NULL);
diff --git a/src/tests/correctness/corr-rot.cpp b/src/tests/correctness/corr-rot.cpp
index c9df97a..3e09c94 100644
--- a/src/tests/correctness/corr-rot.cpp
+++ b/src/tests/correctness/corr-rot.cpp
@@ -112,8 +112,6 @@ rotCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
//Filling random values for SA and SB. C & S are only for output sake
randomVectors(params->N, (X + params->offa), params->incx, (Y+params->offb), params->incy);
@@ -123,17 +121,12 @@ rotCorrectnessTest(TestParams *params)
memcpy(back_X, X, (lengthx + params->offa) * sizeof(T));
memcpy(back_Y, Y, (lengthy + params->offb) * sizeof(T));
- ::std::cerr << "Done" << ::std::endl;
-
// Allocate buffers
bufX = base->createEnqueueBuffer(X, (lengthx + params->offa) * sizeof(T), 0, CL_MEM_READ_WRITE);
bufY = base->createEnqueueBuffer(Y, (lengthy + params->offb) * sizeof(T), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xROT routine... ";
-
::clMath::blas::rot(params->N, back_X, params->offa, params->incx, back_Y, params->offb, params->incy,
alpha, beta);
- ::std::cerr << "Done" << ::std::endl;
// Hold X vector
@@ -151,9 +144,6 @@ rotCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xROT routine... ";
-
-
err = (cl_int)::clMath::clblas::rot( params->N, bufX, params->offa, params->incx, bufY, params->offb, params->incy,
alpha, beta, params->numCommandQueues, base->commandQueues(), 0, NULL, events);
@@ -174,8 +164,6 @@ rotCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufX, CL_TRUE, 0,
(lengthx + params->offa) * sizeof(T), X, 0, NULL, NULL);
diff --git a/src/tests/correctness/corr-rotg.cpp b/src/tests/correctness/corr-rotg.cpp
index 21ef905..4616533 100644
--- a/src/tests/correctness/corr-rotg.cpp
+++ b/src/tests/correctness/corr-rotg.cpp
@@ -135,8 +135,6 @@ rotgCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
//Filling random values for SA and SB. C & S are only for output sake
randomVectors(1, (SA+params->offBX), 1, (SB+params->offCY), 1);
S[params->offb] = back_S[params->offb] = ZERO<T1>();
@@ -144,7 +142,6 @@ rotgCorrectnessTest(TestParams *params)
back_SA[params->offBX] = SA[params->offBX];
back_SB[params->offCY] = SB[params->offCY];
- ::std::cerr << "Done" << ::std::endl;
//printing the inputs, as they change after processing
::std::cerr << "A = ";
@@ -163,10 +160,7 @@ rotgCorrectnessTest(TestParams *params)
bufC = base->createEnqueueBuffer(C, (length + params->offa ) * sizeof(T2), 0, CL_MEM_WRITE_ONLY);
bufS = base->createEnqueueBuffer(S, (length + params->offb ) * sizeof(T1), 0, CL_MEM_WRITE_ONLY);
- ::std::cerr << "Calling reference xROTG routine... ";
-
::clMath::blas::rotg(back_SA, params->offBX, back_SB, params->offCY, back_C, params->offa, back_S, params->offb);
- ::std::cerr << "Done" << ::std::endl;
// Hold X vector
@@ -185,8 +179,6 @@ rotgCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xROTG routine... ";
-
DataType type;
type = ( typeid(T1) == typeid(cl_float)) ? TYPE_FLOAT :
( typeid(T1) == typeid(cl_double)) ? TYPE_DOUBLE:
@@ -214,8 +206,6 @@ rotgCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufSA, CL_TRUE, 0,
(length + params->offBX) * sizeof(T1), SA, 0, NULL, NULL);
diff --git a/src/tests/correctness/corr-rotm.cpp b/src/tests/correctness/corr-rotm.cpp
index 4a1a02e..33f7648 100644
--- a/src/tests/correctness/corr-rotm.cpp
+++ b/src/tests/correctness/corr-rotm.cpp
@@ -126,8 +126,6 @@ rotmCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
randomVectors(params->N, (X + params->offa), params->incx, (Y+params->offb), params->incy);
randomVectors(4, (PARAM + params->offc + 1), 1); //1st element is initialized separately
@@ -138,18 +136,13 @@ rotmCorrectnessTest(TestParams *params)
memcpy(back_Y, Y, (lengthy + params->offb)*sizeof(T));
memcpy(back_PARAM, PARAM, (params->offc + 5)*sizeof(T));
- ::std::cerr << "Done" << ::std::endl;
-
// Allocate buffers
bufX = base->createEnqueueBuffer(X, (lengthx + params->offa) * sizeof(T), 0, CL_MEM_READ_WRITE);
bufY = base->createEnqueueBuffer(Y, (lengthy + params->offb) * sizeof(T), 0, CL_MEM_READ_WRITE);
bufParam = base->createEnqueueBuffer(PARAM, (5 + params->offc) * sizeof(T), 0, CL_MEM_READ_ONLY);
- ::std::cerr << "Calling reference xROTM routine... ";
-
::clMath::blas::rotm(params->N, back_X, params->offa, params->incx, back_Y, params->offb, params->incy,
back_PARAM, params->offc);
- ::std::cerr << "Done" << ::std::endl;
if ((bufX == NULL) || (bufY == NULL) || (bufParam == NULL))
{
@@ -165,8 +158,6 @@ rotmCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xROTM routine... ";
-
DataType type;
type = ( typeid(T) == typeid(cl_float)) ? TYPE_FLOAT :
TYPE_DOUBLE;
@@ -191,8 +182,6 @@ rotmCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufX, CL_TRUE, 0,
(lengthx + params->offa) * sizeof(T), X, 0, NULL, NULL);
diff --git a/src/tests/correctness/corr-rotmg.cpp b/src/tests/correctness/corr-rotmg.cpp
index 851310c..8c448fe 100644
--- a/src/tests/correctness/corr-rotmg.cpp
+++ b/src/tests/correctness/corr-rotmg.cpp
@@ -134,8 +134,6 @@ rotmgCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
//Filling random values for SA and SB. C & S are only for output sake
randomRotmg( (D1 + params->offa), (D2 + params->offb),
(X + params->offBX), (Y + params->offCY), (PARAM + params->offc) );
@@ -149,8 +147,6 @@ rotmgCorrectnessTest(TestParams *params)
memcpy(back_D2, D2, (1 + params->offb)*sizeof(T));
memcpy(back_PARAM, PARAM, (params->offc + 5)*sizeof(T));
- ::std::cerr << "Done" << ::std::endl;
-
// Allocate buffers
bufD1 = base->createEnqueueBuffer(D1, (1 + params->offa) * sizeof(T), 0, CL_MEM_READ_WRITE);
bufD2 = base->createEnqueueBuffer(D2, (1 + params->offb) * sizeof(T), 0, CL_MEM_READ_WRITE);
@@ -158,11 +154,8 @@ rotmgCorrectnessTest(TestParams *params)
bufY = base->createEnqueueBuffer(Y, (1 + params->offCY) * sizeof(T), 0, CL_MEM_READ_ONLY);
bufParam = base->createEnqueueBuffer(PARAM, (5 + params->offc) * sizeof(T), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xROTMG routine... ";
-
::clMath::blas::rotmg(back_D1, params->offa, back_D2, params->offb, back_X, params->offBX, back_Y, params->offCY,
back_PARAM, params->offc);
- ::std::cerr << "Done" << ::std::endl;
// Hold X vector
@@ -181,8 +174,6 @@ rotmgCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xROTMG routine... ";
-
DataType type;
type = ( typeid(T) == typeid(cl_float)) ? TYPE_FLOAT :
TYPE_DOUBLE;
@@ -210,7 +201,6 @@ rotmgCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
err = clEnqueueReadBuffer(base->commandQueues()[0], bufD1, CL_TRUE, 0,
(1 + params->offa) * sizeof(T), D1, 0, NULL, NULL);
diff --git a/src/tests/correctness/corr-sbmv.cpp b/src/tests/correctness/corr-sbmv.cpp
index b17f669..fc1eacd 100644
--- a/src/tests/correctness/corr-sbmv.cpp
+++ b/src/tests/correctness/corr-sbmv.cpp
@@ -106,8 +106,6 @@ sbmvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
if((A == NULL) || (X == NULL) || (blasY == NULL) || (clblasY == NULL))
{
deleteBuffers<T>(A, X, blasY, clblasY);
@@ -124,15 +122,12 @@ sbmvCorrectnessTest(TestParams *params)
(A + params->offA), params->lda, (X+params->offBX), params->incx, (blasY+params->offCY), params->incy );
// Copy blasY to clblasY
memcpy(clblasY, blasY, (lengthY + params->offCY)* sizeof(*blasY));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufA = base->createEnqueueBuffer(A, (lengthA + params->offA)* sizeof(*A), 0, CL_MEM_READ_ONLY);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(*X), 0, CL_MEM_READ_ONLY);
bufY = base->createEnqueueBuffer(clblasY, (lengthY + params->offCY) * sizeof(*clblasY), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xSBMV routine... ";
-
clblasOrder fOrder;
clblasUplo fUplo;
fOrder = params->order;
@@ -148,7 +143,6 @@ sbmvCorrectnessTest(TestParams *params)
clMath::blas::sbmv(fOrder, fUplo, fN, fK, alpha, A, params->offA, params->lda,
X, params->offBX, params->incx, beta, blasY, params->offCY, params->incy);
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufX == NULL) || (bufY == NULL)) {
// Skip the test, the most probable reason is
@@ -166,8 +160,6 @@ sbmvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xSBMV routine... ";
-
err = (cl_int)clMath::clblas::sbmv(params->order, params->uplo, params->N, params->K,
alpha, bufA, params->offA, params->lda, bufX, params->offBX, params->incx,
beta, bufY, params->offCY, params->incy,
@@ -188,8 +180,6 @@ sbmvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufY, CL_TRUE, 0,
(lengthY + params->offCY) * sizeof(*clblasY), clblasY, 0,
diff --git a/src/tests/correctness/corr-scal.cpp b/src/tests/correctness/corr-scal.cpp
index ad156f6..ecd8b82 100644
--- a/src/tests/correctness/corr-scal.cpp
+++ b/src/tests/correctness/corr-scal.cpp
@@ -95,19 +95,14 @@ void scalCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
randomVectors(params->N, (blasX+params->offBX), params->incx);
alpha = convertMultiplier<T>(params->alpha);
memcpy(clblasX, blasX, (lengthX + params->offBX)* sizeof(*blasX));
- ::std::cerr << "Done" << ::std::endl;
bufX = base->createEnqueueBuffer(clblasX, (lengthX + params->offBX)* sizeof(*clblasX), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xSCAL routine... ";
// Both blas and clBlas wrapper functions consider the real part of alpha in case of css/zdscal
// This is to make sure both get the same scalar alpha. check wrapper functions
::clMath::blas::scal(is_css_zds, params->N, alpha, blasX, params->offBX, params->incx);
- ::std::cerr << "Done" << ::std::endl;
if (bufX == NULL) {
/* Skip the test, the most probable reason is
@@ -125,7 +120,6 @@ void scalCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xSCAL routine... ";
// Both blas and clBlas wrapper functions consider the real part of alpha in case of css/zdscal
// This is to make sure both get the same scalar alpha. check wrapper functions
err = (cl_int)::clMath::clblas::scal(is_css_zds, params->N, alpha, bufX, params->offBX,
@@ -145,8 +139,6 @@ void scalCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufX, CL_TRUE, 0,
(lengthX + params->offBX) * sizeof(*clblasX), clblasX, 0, NULL, NULL);
diff --git a/src/tests/correctness/corr-spmv.cpp b/src/tests/correctness/corr-spmv.cpp
index dcbad3b..52aded0 100644
--- a/src/tests/correctness/corr-spmv.cpp
+++ b/src/tests/correctness/corr-spmv.cpp
@@ -105,8 +105,6 @@ spmvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
if((AP == NULL) || (X == NULL) || (blasY == NULL) || (clblasY == NULL))
{
deleteBuffers<T>(AP, X, blasY, clblasY);
@@ -123,15 +121,12 @@ spmvCorrectnessTest(TestParams *params)
(X + params->offBX), params->incx, true, &beta, (blasY + params->offCY), params->incy);
// Copy blasY to clblasY
memcpy(clblasY, blasY, (lengthY + params->offCY)* sizeof(*blasY));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufAP = base->createEnqueueBuffer(AP, (lengthA + params->offA)* sizeof(*AP), 0, CL_MEM_READ_ONLY);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(*X), 0, CL_MEM_READ_ONLY);
bufY = base->createEnqueueBuffer(clblasY, (lengthY + params->offCY) * sizeof(*clblasY), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xSPMV routine... ";
-
clblasOrder order;
clblasUplo fUplo;
@@ -145,7 +140,6 @@ spmvCorrectnessTest(TestParams *params)
}
::clMath::blas::spmv( order, fUplo, params->N, alpha, AP, params->offA, X, params->offBX, params->incx,
beta, blasY, params->offCY, params->incy);
- ::std::cerr << "Done" << ::std::endl;
if ((bufAP == NULL) || (bufX == NULL) || (bufY == NULL)) {
// Skip the test, the most probable reason is
@@ -163,8 +157,6 @@ spmvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xSPMV routine... ";
-
err = (cl_int)::clMath::clblas::spmv(params->order, params->uplo, params->N, alpha, bufAP,
params->offA, bufX, params->offBX, params->incx, beta, bufY, params->offCY, params->incy,
params->numCommandQueues, base->commandQueues(), 0, NULL, events);
@@ -184,8 +176,6 @@ spmvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufY, CL_TRUE, 0,
(lengthY + params->offCY) * sizeof(*clblasY), clblasY, 0,
diff --git a/src/tests/correctness/corr-spr.cpp b/src/tests/correctness/corr-spr.cpp
index 4b00a02..4851e7d 100644
--- a/src/tests/correctness/corr-spr.cpp
+++ b/src/tests/correctness/corr-spr.cpp
@@ -99,9 +99,6 @@ sprCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
-
memset(blasAP, -1, (lengthAP + params->offa));
memset(clblasAP, -1, (lengthAP + params->offa));
memset(X, -1, (lengthX + params->offBX));
@@ -127,13 +124,9 @@ sprCorrectnessTest(TestParams *params)
memcpy(clblasAP, blasAP, (lengthAP + params->offa)* sizeof(*blasAP));
- ::std::cerr << "Done" << ::std::endl;
-
bufAP = base->createEnqueueBuffer(clblasAP, (lengthAP + params->offa) * sizeof(*clblasAP), 0, CL_MEM_READ_WRITE);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(*X), 0, CL_MEM_READ_ONLY);
- ::std::cerr << "Calling reference xSPR routine... ";
-
clblasOrder order;
clblasUplo fUplo;
order = params->order;
@@ -152,7 +145,6 @@ sprCorrectnessTest(TestParams *params)
}
clMath::blas::spr( clblasColumnMajor, fUplo, params->N, alpha, X, params->offBX, params->incx, blasAP, params->offa);
- ::std::cerr << "Done" << ::std::endl;
if ((bufAP == NULL) || (bufX == NULL) ) {
/* Skip the test, the most probable reason is
@@ -170,8 +162,6 @@ sprCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xSPR routine... ";
-
err = (cl_int)::clMath::clblas::spr( params->order, params->uplo, params->N, alpha,
bufX, params->offBX, params->incx, bufAP, params->offa,
params->numCommandQueues, base->commandQueues(),
@@ -192,7 +182,6 @@ sprCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
err = clEnqueueReadBuffer(base->commandQueues()[0], bufAP, CL_TRUE, 0,
(lengthAP + params->offa) * sizeof(*clblasAP), clblasAP, 0,
diff --git a/src/tests/correctness/corr-spr2.cpp b/src/tests/correctness/corr-spr2.cpp
index c000e64..f852daa 100644
--- a/src/tests/correctness/corr-spr2.cpp
+++ b/src/tests/correctness/corr-spr2.cpp
@@ -111,21 +111,17 @@ spr2CorrectnessTest(TestParams *params)
alpha = convertMultiplier<T>(params->alpha);
useAlpha = true;
- ::std::cerr << "Generating input data... ";
randomSyr2Matrices<T>(params->order, params->uplo, params->N, useAlpha, &alpha, (blasAP + params->offa), params->lda,
(X + params->offBX), params->incx, (Y + params->offCY), params->incy);
// Copy blasAP to clblasAP
memcpy(clblasAP, blasAP, (lengthAP + params->offa)* sizeof(*blasAP));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufAP = base->createEnqueueBuffer(clblasAP, (lengthAP + params->offa)* sizeof(*clblasAP), 0,CL_MEM_READ_WRITE);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(*X), 0, CL_MEM_READ_ONLY);
bufY = base->createEnqueueBuffer(Y, (lengthY + params->offCY)* sizeof(*Y), 0, CL_MEM_READ_ONLY);
- ::std::cerr << "Calling reference xSPR2 routine... ";
-
clblasOrder order;
clblasUplo fUplo;
@@ -140,7 +136,6 @@ spr2CorrectnessTest(TestParams *params)
::clMath::blas::spr2( order, fUplo, params->N, alpha, X, params->offBX, params->incx,
Y, params->offCY, params->incy, blasAP, params->offa);
- ::std::cerr << "Done" << ::std::endl;
if ((bufAP == NULL) || (bufX == NULL) || (bufY == NULL)) {
/* Skip the test, the most probable reason is
@@ -158,8 +153,6 @@ spr2CorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xSPR2 routine... ";
-
err = (cl_int)::clMath::clblas::spr2( params->order, params->uplo, params->N, alpha,
bufX, params->offBX, params->incx, bufY, params->offCY, params->incy, bufAP, params->offa,
params->numCommandQueues, base->commandQueues(),
@@ -180,8 +173,6 @@ spr2CorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufAP, CL_TRUE, 0,
(lengthAP + params->offa) * sizeof(*clblasAP), clblasAP, 0,
diff --git a/src/tests/correctness/corr-swap.cpp b/src/tests/correctness/corr-swap.cpp
index e62f88a..db1eb6d 100644
--- a/src/tests/correctness/corr-swap.cpp
+++ b/src/tests/correctness/corr-swap.cpp
@@ -109,16 +109,12 @@ swapCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
// Populate A and blasX
randomVectors(params->N, (X+params->offBX), params->incx, (Y+params->offCY), params->incy);
memcpy(blasX, X, (lengthX + params->offBX) * sizeof(T));
memcpy(blasY, Y, (lengthY + params->offCY) * sizeof(T));
- ::std::cerr << "Done" << ::std::endl;
-
// Allocate buffers
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(T), 0, CL_MEM_READ_WRITE);
bufY = base->createEnqueueBuffer(Y, (lengthY + params->offCY)* sizeof(T), 0, CL_MEM_READ_WRITE);
@@ -139,14 +135,8 @@ swapCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling reference xSWAP routine... ";
-
::clMath::blas::swap( params->N, blasX, params->offBX, params->incx,
blasY, params->offCY, params->incy);
- ::std::cerr << "Done" << ::std::endl;
-
-
- ::std::cerr << "Calling clblas xSWAP routine... ";
DataType type;
type = ( typeid(T) == typeid(cl_float))? TYPE_FLOAT : (( typeid(T) == typeid(cl_double))? TYPE_DOUBLE: (( typeid(T) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT:TYPE_COMPLEX_DOUBLE));
@@ -169,8 +159,6 @@ swapCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufX, CL_TRUE, 0,
(lengthX + params->offBX) * sizeof(T), X, 0, NULL, NULL);
diff --git a/src/tests/correctness/corr-symm.cpp b/src/tests/correctness/corr-symm.cpp
index cb74768..4af106d 100644
--- a/src/tests/correctness/corr-symm.cpp
+++ b/src/tests/correctness/corr-symm.cpp
@@ -127,7 +127,6 @@ symmCorrectnessTest(TestParams *params)
return;
}
srand(params->seed);
- ::std::cerr << "Generating input data... ";
int creationFlags = 0, AcreationFlags;
creationFlags = creationFlags | RANDOM_INIT;
@@ -158,9 +157,6 @@ symmCorrectnessTest(TestParams *params)
bufB = base->createEnqueueBuffer(B, (lengthB + params->offb) * sizeof(T), 0, CL_MEM_READ_ONLY);
bufC = base->createEnqueueBuffer(backC, (lengthC + params->offc) * sizeof(T), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Done" << ::std::endl;
- ::std::cerr << "Calling reference xSYMM routine... ";
-
clblasOrder fOrder;
clblasUplo fUplo;
clblasSide fSide;
@@ -184,7 +180,6 @@ symmCorrectnessTest(TestParams *params)
// Call reference blas routine
clMath::blas::symm(fOrder, fSide, fUplo, fM, fN, alpha_,
A, params->offa, params->lda, B, params->offb, params->ldb, beta_, C, params->offc, params->ldc);
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufB == NULL) || (bufC == NULL)) {
/* Skip the test, the most probable reason is
@@ -202,8 +197,6 @@ symmCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xSYMM routine... ";
-
err = (cl_int)::clMath::clblas::symm( params->order, params->side, params->uplo, params->M, params->N, alpha_,
bufA, params->offa, params->lda, bufB, params->offb, params->ldb, beta_, bufC, params->offc, params->ldc,
params->numCommandQueues, base->commandQueues(), 0, NULL, events );
@@ -225,7 +218,6 @@ symmCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufC, CL_TRUE, 0,
(lengthC + params->offc) * sizeof(T), backC, 0,
diff --git a/src/tests/correctness/corr-symv.cpp b/src/tests/correctness/corr-symv.cpp
index b5fb420..d4c33c6 100644
--- a/src/tests/correctness/corr-symv.cpp
+++ b/src/tests/correctness/corr-symv.cpp
@@ -76,8 +76,7 @@ symvCorrectnessTest(TestParams *params)
isComplex = ((typeid(T) == typeid(FloatComplex)) ||
(typeid(T) == typeid(DoubleComplex)));
if (canCaseBeSkipped(params, isComplex)) {
- std::cerr << ">> Test is skipped because it has no importance for this "
- "level of coverage" << std::endl;
+ std::cerr << ">> Test is skipped" << std::endl;
SUCCEED();
return;
}
@@ -106,7 +105,6 @@ symvCorrectnessTest(TestParams *params)
beta = convertMultiplier<T>(params->beta);
}
- ::std::cerr << "Generating input data... ";
setNans<T>(params->rowsA * params->columnsA, A);
setNans<T>(params->rowsB * params->columnsB, B);
setNans<T>(params->rowsC * params->columnsC, blasC);
@@ -125,9 +123,6 @@ symvCorrectnessTest(TestParams *params)
setVectorNans<T>(params->offCY, abs(params->incy), blasC, params->N,
params->columnsC * params->rowsC);
memcpy(clblasC, blasC, params->rowsC * params->columnsC * sizeof(*clblasC));
- ::std::cerr << "Done" << ::std::endl;
-
- ::std::cerr << "Calling reference xSYMV routine... ";
if (params->order == clblasColumnMajor) {
::clMath::blas::symv(clblasColumnMajor, params->uplo,
@@ -145,7 +140,6 @@ symvCorrectnessTest(TestParams *params)
delete[] reorderedA;
}
- ::std::cerr << "Done" << ::std::endl;
bufA = base->createEnqueueBuffer(A, params->rowsA * params->columnsA *
sizeof(*A), params->offA * sizeof(*A),
@@ -170,7 +164,6 @@ symvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xSYMV routine... ";
err = (cl_int)::clMath::clblas::symv(params->order, params->uplo,
params->N, alpha, bufA, params->offA, params->lda, bufB, params->offBX,
params->incx, beta, bufC, params->offCY, params->incy,
@@ -191,7 +184,6 @@ symvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufC, CL_TRUE, 0,
params->rowsC * params->columnsC * sizeof(*clblasC),
diff --git a/src/tests/correctness/corr-syr.cpp b/src/tests/correctness/corr-syr.cpp
index 12967c9..cae06fc 100644
--- a/src/tests/correctness/corr-syr.cpp
+++ b/src/tests/correctness/corr-syr.cpp
@@ -99,9 +99,6 @@ syrCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
-
memset(blasA, -1, (lengthA + params->offa));
memset(clblasA, -1, (lengthA + params->offa));
memset(X, -1, (lengthX + params->offBX));
@@ -142,14 +139,10 @@ syrCorrectnessTest(TestParams *params)
memcpy(clblasA, blasA, (lengthA + params->offa)* sizeof(*blasA));
// memcpy(tempA, blasA, (lengthA + params->offa)* sizeof(*blasA));
- ::std::cerr << "Done" << ::std::endl;
-
// Allocate buffers
bufA = base->createEnqueueBuffer(clblasA, (lengthA + params->offa) * sizeof(*clblasA), 0, CL_MEM_READ_WRITE);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(*X), 0, CL_MEM_READ_ONLY);
- ::std::cerr << "Calling reference xSYR routine... ";
-
clblasOrder order;
clblasUplo fUplo;
@@ -183,8 +176,6 @@ syrCorrectnessTest(TestParams *params)
//printf("After acml\n");
//printMatrixBlock( params->order, 0, 0, params->N, params->N, params->lda, blasA);
- ::std::cerr << "Done" << ::std::endl;
-
if ((bufA == NULL) || (bufX == NULL) ) {
/* Skip the test, the most probable reason is
* matrix too big for a device.
@@ -201,8 +192,6 @@ syrCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xSYR routine... ";
-
err = (cl_int)::clMath::clblas::syr( params->order, params->uplo, params->N, alpha,
bufX, params->offBX, params->incx, bufA, params->offa, params->lda,
params->numCommandQueues, base->commandQueues(),
@@ -223,7 +212,6 @@ syrCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
err = clEnqueueReadBuffer(base->commandQueues()[0], bufA, CL_TRUE, 0,
(lengthA + params->offa) * sizeof(*clblasA), clblasA, 0,
diff --git a/src/tests/correctness/corr-syr2.cpp b/src/tests/correctness/corr-syr2.cpp
index 4148ed5..303cce5 100644
--- a/src/tests/correctness/corr-syr2.cpp
+++ b/src/tests/correctness/corr-syr2.cpp
@@ -111,22 +111,17 @@ syr2CorrectnessTest(TestParams *params)
alpha = convertMultiplier<T>(params->alpha);
useAlpha = true;
- ::std::cerr << "Generating input data... ";
-
randomSyr2Matrices<T>(params->order, params->uplo, params->N, useAlpha, &alpha, (blasA + params->offa), params->lda,
(X + params->offBX), params->incx, (Y + params->offCY), params->incy);
// Copy blasA to clblasA
memcpy(clblasA, blasA, (lengthA + params->offa)* sizeof(*blasA));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufA = base->createEnqueueBuffer(clblasA, (lengthA + params->offa)* sizeof(*clblasA), 0,CL_MEM_READ_WRITE);
bufX = base->createEnqueueBuffer(X, (lengthX + params->offBX)* sizeof(*X), 0, CL_MEM_READ_ONLY);
bufY = base->createEnqueueBuffer(Y, (lengthY + params->offCY)* sizeof(*Y), 0, CL_MEM_READ_ONLY);
- ::std::cerr << "Calling reference xSYR2 routine... ";
-
clblasOrder order;
clblasUplo fUplo;
@@ -141,7 +136,6 @@ syr2CorrectnessTest(TestParams *params)
::clMath::blas::syr2( order, fUplo, params->N, alpha, X, params->offBX, params->incx,
Y, params->offCY, params->incy, blasA, params->offa, params->lda);
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufX == NULL) || (bufY == NULL)) {
/* Skip the test, the most probable reason is
@@ -159,8 +153,6 @@ syr2CorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xSYR2 routine... ";
-
err = (cl_int)::clMath::clblas::syr2( params->order, params->uplo, params->N, alpha,
bufX, params->offBX, params->incx, bufY, params->offCY, params->incy, bufA, params->offa, params->lda,
params->numCommandQueues, base->commandQueues(),
@@ -181,8 +173,6 @@ syr2CorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufA, CL_TRUE, 0,
(lengthA + params->offa) * sizeof(*clblasA), clblasA, 0,
diff --git a/src/tests/correctness/corr-syr2k.cpp b/src/tests/correctness/corr-syr2k.cpp
index d42c7f4..1c05161 100644
--- a/src/tests/correctness/corr-syr2k.cpp
+++ b/src/tests/correctness/corr-syr2k.cpp
@@ -88,8 +88,7 @@ syr2kCorrectnessTest(TestParams *params)
isComplex = ((typeid(T) == typeid(FloatComplex)) ||
(typeid(T) == typeid(DoubleComplex)));
if (canCaseBeSkipped(params, isComplex)) {
- std::cerr << ">> Test is skipped because it has no importance for this "
- "level of coverage" << std::endl;
+ std::cerr << ">> Test is skipped" << std::endl;
SUCCEED();
return;
}
@@ -115,7 +114,6 @@ syr2kCorrectnessTest(TestParams *params)
beta = convertMultiplier<T>(params->beta);
}
- ::std::cerr << "Generating input data... ";
if (!useAlpha) {
alpha = random<T>(100);
if (module(alpha) == 0.0) {
@@ -130,9 +128,7 @@ syr2kCorrectnessTest(TestParams *params)
params->N, params->N, params->K, true, &a, A, params->lda,
B, params->ldb, useBeta, &beta, blasC, params->ldc);
memcpy(clblasC, blasC, params->rowsC * params->columnsC * sizeof(*blasC));
- ::std::cerr << "Done" << ::std::endl;
- ::std::cerr << "Calling reference xSYR2K routine... ";
if (params->order == clblasColumnMajor) {
::clMath::blas::syr2k(clblasColumnMajor, params->uplo, params->transA,
params->N, params->K, alpha, A,
@@ -160,7 +156,6 @@ syr2kCorrectnessTest(TestParams *params)
delete[] reorderedB;
delete[] reorderedA;
}
- ::std::cerr << "Done" << ::std::endl;
bufA = base->createEnqueueBuffer(A, params->rowsA * params->columnsA *
sizeof(*A), params->offA * sizeof(*A),
@@ -188,7 +183,6 @@ syr2kCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xSYR2K routine... ";
err = (cl_int)::clMath::clblas::syr2k(params->order, params->uplo,
params->transA, params->N, params->K,
alpha, bufA, params->offA,
@@ -213,7 +207,6 @@ syr2kCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufC, CL_TRUE,
params->offCY * sizeof(*clblasC),
diff --git a/src/tests/correctness/corr-syrk.cpp b/src/tests/correctness/corr-syrk.cpp
index 8977718..709ad49 100644
--- a/src/tests/correctness/corr-syrk.cpp
+++ b/src/tests/correctness/corr-syrk.cpp
@@ -85,8 +85,7 @@ syrkCorrectnessTest(TestParams *params)
isComplex = ((typeid(T) == typeid(FloatComplex)) ||
(typeid(T) == typeid(DoubleComplex)));
if (canCaseBeSkipped(params, isComplex)) {
- std::cerr << ">> Test is skipped because it has no importance for this "
- "level of coverage" << std::endl;
+ std::cerr << ">> Test is skipped" << std::endl;
SUCCEED();
return;
}
@@ -111,7 +110,6 @@ syrkCorrectnessTest(TestParams *params)
beta = convertMultiplier<T>(params->beta);
}
- ::std::cerr << "Generating input data... ";
if (!useAlpha) {
alpha = random<T>(100);
if (module(alpha) == 0.0) {
@@ -123,9 +121,7 @@ syrkCorrectnessTest(TestParams *params)
params->N, params->N, params->K, useAlpha, &alpha, A, params->lda,
NULL, 0, useBeta, &beta, blasC, params->ldc);
memcpy(clblasC, blasC, params->rowsC * params->columnsC * sizeof(*blasC));
- ::std::cerr << "Done" << ::std::endl;
- ::std::cerr << "Calling reference xSYRK routine... ";
if (params->order == clblasColumnMajor) {
::clMath::blas::syrk(clblasColumnMajor, params->uplo, params->transA,
params->N, params->K, alpha, A, params->lda,
@@ -149,7 +145,6 @@ syrkCorrectnessTest(TestParams *params)
delete[] reorderedC;
delete[] reorderedA;
}
- ::std::cerr << "Done" << ::std::endl;
bufA = base->createEnqueueBuffer(A, params->rowsA * params->columnsA *
sizeof(*A), params->offA * sizeof(*A),
@@ -174,7 +169,6 @@ syrkCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xSYRK routine... ";
err = (cl_int)::clMath::clblas::syrk(params->order, params->uplo,
params->transA, params->N, params->K,
alpha, bufA, params->offA, params->lda,
@@ -197,7 +191,6 @@ syrkCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufC, CL_TRUE,
params->offCY * sizeof(*clblasC),
diff --git a/src/tests/correctness/corr-tbmv.cpp b/src/tests/correctness/corr-tbmv.cpp
index 7b438ff..5b37ee9 100644
--- a/src/tests/correctness/corr-tbmv.cpp
+++ b/src/tests/correctness/corr-tbmv.cpp
@@ -100,8 +100,6 @@ tbmvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
if((A == NULL) || (blasX == NULL) || (clblasX == NULL))
{
deleteBuffers<T>(A, blasX, clblasX);
@@ -114,15 +112,12 @@ tbmvCorrectnessTest(TestParams *params)
// Copy blasY to clblasY
memcpy(clblasX, blasX, (lengthX + params->offBX)* sizeof(*blasX));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufA = base->createEnqueueBuffer(A, (lengthA + params->offA)* sizeof(*A), 0, CL_MEM_READ_WRITE);
bufX = base->createEnqueueBuffer(blasX, (lengthX + params->offBX)* sizeof(*blasX), 0, CL_MEM_READ_WRITE);
bufXtemp = base->createEnqueueBuffer(blasX, (lengthX + params->offBX)* sizeof(*blasX), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xTBMV routine... ";
-
clblasOrder fOrder;
clblasTranspose fTrans;
clblasUplo fUplo;
@@ -142,7 +137,6 @@ tbmvCorrectnessTest(TestParams *params)
}
clMath::blas::tbmv(fOrder, fUplo, fTrans, params->diag, fN, fK, A, params->offA, params->lda, blasX, params->offBX, params->incx);
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufX == NULL)|| (bufXtemp == NULL)) {
// Skip the test, the most probable reason is
@@ -160,7 +154,6 @@ tbmvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xTBMV routine... ";
DataType type;
type = ( typeid(T) == typeid(cl_float))? TYPE_FLOAT:( typeid(T) == typeid(cl_double))? TYPE_DOUBLE:
( typeid(T) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT: TYPE_COMPLEX_DOUBLE;
@@ -184,8 +177,6 @@ tbmvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufX, CL_TRUE, 0,
(lengthX + params->offBX) * sizeof(*clblasX), clblasX, 0,
diff --git a/src/tests/correctness/corr-tbsv.cpp b/src/tests/correctness/corr-tbsv.cpp
index 17c59f3..36947c0 100644
--- a/src/tests/correctness/corr-tbsv.cpp
+++ b/src/tests/correctness/corr-tbsv.cpp
@@ -102,8 +102,6 @@ tbsvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
if((A == NULL) || (blasX == NULL) || (clblasX == NULL))
{
deleteBuffers<T>(A, blasX, clblasX, deltaX);
@@ -124,14 +122,11 @@ tbsvCorrectnessTest(TestParams *params)
(A + params->offA), params->lda, (blasX + params->offBX), params->incx, (deltaX + params->offBX) );
memcpy(clblasX, blasX, (lengthX + params->offBX)* sizeof(*blasX));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufA = base->createEnqueueBuffer(A, (lengthA + params->offA)* sizeof(*A), 0, CL_MEM_READ_WRITE);
bufX = base->createEnqueueBuffer(blasX, (lengthX + params->offBX)* sizeof(*blasX), 0, CL_MEM_READ_WRITE);
- ::std::cerr << "Calling reference xTBSV routine... ";
-
clblasOrder fOrder;
clblasTranspose fTrans;
clblasUplo fUplo;
@@ -151,7 +146,6 @@ tbsvCorrectnessTest(TestParams *params)
}
clMath::blas::tbsv(fOrder, fUplo, fTrans, params->diag, fN, fK, A, params->offA, params->lda, blasX, params->offBX, params->incx);
- ::std::cerr << "Done" << ::std::endl;
if ((bufA == NULL) || (bufX == NULL)) {
// Skip the test, the most probable reason is
@@ -169,7 +163,6 @@ tbsvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xTBSV routine... ";
DataType type;
type = ( typeid(T) == typeid(cl_float))? TYPE_FLOAT:( typeid(T) == typeid(cl_double))? TYPE_DOUBLE:
( typeid(T) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT: TYPE_COMPLEX_DOUBLE;
@@ -193,8 +186,6 @@ tbsvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufX, CL_TRUE, 0,
(lengthX + params->offBX) * sizeof(*clblasX), clblasX, 0,
diff --git a/src/tests/correctness/corr-tpmv.cpp b/src/tests/correctness/corr-tpmv.cpp
index 041154e..b2ac494 100644
--- a/src/tests/correctness/corr-tpmv.cpp
+++ b/src/tests/correctness/corr-tpmv.cpp
@@ -108,8 +108,6 @@ tpmvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
// Set data in A and X using populate() routine
int creationFlags = 0;
creationFlags = creationFlags | RANDOM_INIT | PACKED_MATRIX;
@@ -125,7 +123,6 @@ tpmvCorrectnessTest(TestParams *params)
// Copy blasX to clblasX
memcpy(clblasX, blasX, (lengthX + params->offBX)* sizeof(*blasX));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufAP = base->createEnqueueBuffer(AP, (lengthAP + params->offa)* sizeof(*AP), 0, CL_MEM_READ_ONLY);
@@ -135,9 +132,6 @@ tpmvCorrectnessTest(TestParams *params)
//printData( "bufX", blasX, lengthX, 1, lengthX);
//printData( "clblasX", clblasX, lengthX, 1, lengthX);
- ::std::cerr << "Calling reference xTPMV routine... ";
-
-
clblasOrder order;
clblasUplo fUplo;
clblasTranspose fTrans;
@@ -157,7 +151,6 @@ tpmvCorrectnessTest(TestParams *params)
}
::clMath::blas::tpmv( order, fUplo, fTrans, params->diag, params->N, AP, params->offa, blasX, params->offBX, params->incx);
- ::std::cerr << "Done" << ::std::endl;
// Hold X vector
@@ -177,8 +170,6 @@ tpmvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xTPMV routine... ";
-
DataType type;
type = ( typeid(T) == typeid(cl_float))? TYPE_FLOAT : ( typeid(T) == typeid(cl_double))? TYPE_DOUBLE: ( typeid(T) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT:TYPE_COMPLEX_DOUBLE;
@@ -202,8 +193,6 @@ tpmvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufX, CL_TRUE, 0,
(lengthX + params->offBX) * sizeof(*clblasX), clblasX, 0,
diff --git a/src/tests/correctness/corr-tpsv.cpp b/src/tests/correctness/corr-tpsv.cpp
index 931d821..b32d361 100644
--- a/src/tests/correctness/corr-tpsv.cpp
+++ b/src/tests/correctness/corr-tpsv.cpp
@@ -109,8 +109,6 @@ tpsvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
//custom generation function in blas-random.h
randomTrsvMatrices<T>( params->order, params->uplo, params->diag, params->N, (A + params->offa), 0, (blasX + params->offBX), params->incx);
@@ -127,9 +125,6 @@ tpsvCorrectnessTest(TestParams *params)
// Allocate buffers
bufA = base->createEnqueueBuffer(A, (lengthA + params->offa)* sizeof(T), 0, CL_MEM_READ_ONLY);
bufX = base->createEnqueueBuffer(backX, (lengthX + params->offBX)* sizeof(T), 0, CL_MEM_WRITE_ONLY);
- ::std::cerr << "Done" << ::std::endl;
-
- ::std::cerr << "Calling reference xTPSV routine... ";
clblasOrder order;
clblasUplo fUplo;
@@ -150,7 +145,6 @@ tpsvCorrectnessTest(TestParams *params)
doConjugate((A + params->offa), 1, lengthA, 1);
}
::clMath::blas::tpsv( order, fUplo, fTrans, params->diag, params->N, A, params->offa, blasX, params->offBX, params->incx);
- ::std::cerr << "Done" << ::std::endl;
/*
printf("\n\n acml result X\n");
@@ -173,8 +167,6 @@ tpsvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xTPSV routine... ";
-
DataType type;
type = ( typeid(T) == typeid(cl_float))? TYPE_FLOAT : ( typeid(T) == typeid(cl_double))? TYPE_DOUBLE: ( typeid(T) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT: TYPE_COMPLEX_DOUBLE;
@@ -198,7 +190,6 @@ tpsvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufX, CL_TRUE, 0,
lengthX * sizeof(*backX), backX, 0,
diff --git a/src/tests/correctness/corr-trmm.cpp b/src/tests/correctness/corr-trmm.cpp
index c92e0e3..bb6dca6 100644
--- a/src/tests/correctness/corr-trmm.cpp
+++ b/src/tests/correctness/corr-trmm.cpp
@@ -73,8 +73,7 @@ trmmCorrectnessTest(TestParams *params)
isComplex = ((typeid(T) == typeid(FloatComplex)) ||
(typeid(T) == typeid(DoubleComplex)));
if (canCaseBeSkipped(params, isComplex)) {
- std::cerr << ">> Test is skipped because it has no importance for this "
- "level of coverage" << std::endl;
+ std::cerr << ">> Test is skipped" << std::endl;
SUCCEED();
return;
}
@@ -94,14 +93,11 @@ trmmCorrectnessTest(TestParams *params)
alpha = convertMultiplier<T>(params->alpha);
}
- ::std::cerr << "Generating input data... ";
randomTrmmMatrices<T>(params->order, params->side, params->uplo,
params->diag, params->M, params->N, useAlpha,
&alpha, A, params->lda, blasB, params->ldb);
memcpy(clblasB, blasB, params->rowsB * params->columnsB * sizeof(*blasB));
- ::std::cerr << "Done" << ::std::endl;
- ::std::cerr << "Calling reference xTRMM routine... ";
if (params->order == clblasColumnMajor) {
::clMath::blas::trmm(clblasColumnMajor, params->side, params->uplo,
params->transA, params->diag, params->M, params->N, alpha,
@@ -124,7 +120,6 @@ trmmCorrectnessTest(TestParams *params)
delete[] reorderedB;
delete[] reorderedA;
}
- ::std::cerr << "Done" << ::std::endl;
bufA = base->createEnqueueBuffer(A, params->rowsA * params->columnsA *
sizeof(*A), params->offA * sizeof(*A),
@@ -149,7 +144,6 @@ trmmCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xTRMM routine... ";
err = (cl_int)::clMath::clblas::trmm(params->order, params->side,
params->uplo, params->transA, params->diag, params->M, params->N,
alpha, bufA, params->offA, params->lda, bufB, params->offBX,
@@ -170,7 +164,6 @@ trmmCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufB, CL_TRUE,
params->offBX * sizeof(*clblasB),
diff --git a/src/tests/correctness/corr-trmv.cpp b/src/tests/correctness/corr-trmv.cpp
index 95089fc..7eb14da 100644
--- a/src/tests/correctness/corr-trmv.cpp
+++ b/src/tests/correctness/corr-trmv.cpp
@@ -108,8 +108,6 @@ trmvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
// Set data in A and X using populate() routine
int creationFlags = 0;
creationFlags = creationFlags | RANDOM_INIT;
@@ -125,7 +123,6 @@ trmvCorrectnessTest(TestParams *params)
// Copy blasX to clblasX
memcpy(clblasX, blasX, (lengthX + params->offBX)* sizeof(*blasX));
- ::std::cerr << "Done" << ::std::endl;
// Allocate buffers
bufA = base->createEnqueueBuffer(A, (lengthA + params->offa)* sizeof(*A), 0, CL_MEM_READ_ONLY);
@@ -135,8 +132,6 @@ trmvCorrectnessTest(TestParams *params)
//printData( "bufX", blasX, lengthX, 1, lengthX);
//printData( "clblasX", clblasX, lengthX, 1, lengthX);
- ::std::cerr << "Calling reference xTRMV routine... ";
-
clblasOrder order;
clblasUplo fUplo;
@@ -157,7 +152,6 @@ trmvCorrectnessTest(TestParams *params)
}
::clMath::blas::trmv( order, fUplo, fTrans, params->diag, params->N, A, params->offa, params->lda, blasX, params->offBX, params->incx);
- ::std::cerr << "Done" << ::std::endl;
// Hold X vector
@@ -177,8 +171,6 @@ trmvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xTRMV routine... ";
-
DataType type;
type = ( typeid(T) == typeid(cl_float))? TYPE_FLOAT : ( typeid(T) == typeid(cl_double))? TYPE_DOUBLE: ( typeid(T) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT:TYPE_COMPLEX_DOUBLE;
@@ -202,8 +194,6 @@ trmvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
-
err = clEnqueueReadBuffer(base->commandQueues()[0], bufX, CL_TRUE, 0,
(lengthX + params->offBX) * sizeof(*clblasX), clblasX, 0,
diff --git a/src/tests/correctness/corr-trsm.cpp b/src/tests/correctness/corr-trsm.cpp
index e53331c..a8a9253 100644
--- a/src/tests/correctness/corr-trsm.cpp
+++ b/src/tests/correctness/corr-trsm.cpp
@@ -77,8 +77,7 @@ trsmCorrectnessTest(TestParams *params)
isComplex = ((typeid(T) == typeid(FloatComplex)) ||
(typeid(T) == typeid(DoubleComplex)));
if (canCaseBeSkipped(params, isComplex)) {
- std::cerr << ">> Test is skipped because it has no importance for this "
- "level of coverage" << std::endl;
+ std::cerr << ">> Test is skipped" << std::endl;
SUCCEED();
return;
}
@@ -100,17 +99,13 @@ trsmCorrectnessTest(TestParams *params)
alpha = convertMultiplier<T>(params->alpha);
}
- ::std::cerr << "Generating input data... ";
-
randomTrsmMatrices<T>(params->order, params->side, params->uplo,
params->diag, params->M, params->N, useAlpha,
&alpha, A, params->lda, B, params->ldb);
memcpy(blasB, B, params->rowsB * params->columnsB * sizeof(*B));
memcpy(clblasB, B, params->rowsB * params->columnsB * sizeof(*B));
- ::std::cerr << "Done" << ::std::endl;
- ::std::cerr << "Calling reference xTRSM routine... ";
if (params->order == clblasColumnMajor) {
::clMath::blas::trsm(clblasColumnMajor, params->side, params->uplo,
params->transA, params->diag, params->M, params->N, alpha, A,
@@ -135,7 +130,6 @@ trsmCorrectnessTest(TestParams *params)
delete[] reorderedB;
delete[] reorderedA;
}
- ::std::cerr << "Done" << ::std::endl;
bufA = base->createEnqueueBuffer(A, params->rowsA * params->columnsA *
sizeof(*A), params->offA * sizeof(*A),
@@ -160,7 +154,6 @@ trsmCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xTRSM routine... ";
err = (cl_int)::clMath::clblas::trsm(params->order, params->side,
params->uplo, params->transA, params->diag, params->M, params->N,
alpha, bufA, params->offA, params->lda, bufB, params->offBX,
@@ -181,7 +174,6 @@ trsmCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufB, CL_TRUE,
params->offBX * sizeof(*clblasB),
@@ -364,7 +356,6 @@ void Extratest(size_t M, size_t N, size_t lda, size_t ldb, T alpha, T delta)
memcpy(blasB, B, N*ldb*sizeof(T));
memcpy(clblasB, B, N*ldb*sizeof(T));
- ::std::cerr << "Calling reference xTRSM routine... ";
::clMath::blas::trsm(order, side, uplo, trans, diag, M, N, alpha, A, lda, blasB, ldb);
@@ -390,7 +381,6 @@ void Extratest(size_t M, size_t N, size_t lda, size_t ldb, T alpha, T delta)
return;
}
- ::std::cerr << "Calling clblas xTRSM routine... ";
err = (cl_int)::clMath::clblas::trsm(order, side, uplo, trans, diag, M, N, alpha, bufA, 0, lda, bufB, 0, ldb,
1, base->commandQueues(), 0, NULL, events);
if (err != CL_SUCCESS) {
@@ -407,7 +397,6 @@ void Extratest(size_t M, size_t N, size_t lda, size_t ldb, T alpha, T delta)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufB, CL_TRUE,
0, N*ldb*sizeof(T), clblasB, 0, NULL, NULL);
diff --git a/src/tests/correctness/corr-trsv.cpp b/src/tests/correctness/corr-trsv.cpp
index b0ed0ca..f3def00 100644
--- a/src/tests/correctness/corr-trsv.cpp
+++ b/src/tests/correctness/corr-trsv.cpp
@@ -109,8 +109,6 @@ trsvCorrectnessTest(TestParams *params)
srand(params->seed);
- ::std::cerr << "Generating input data... ";
-
//custom generation function in blas-random.h
randomTrsvMatrices<T>( params->order, params->uplo, params->diag, params->N, (A + params->offa), params->lda, (blasX + params->offBX), params->incx);
@@ -127,9 +125,6 @@ trsvCorrectnessTest(TestParams *params)
// Allocate buffers
bufA = base->createEnqueueBuffer(A, (lengthA + params->offa)* sizeof(T), 0, CL_MEM_READ_ONLY);
bufX = base->createEnqueueBuffer(backX, (lengthX + params->offBX)* sizeof(T), 0, CL_MEM_WRITE_ONLY);
- ::std::cerr << "Done" << ::std::endl;
-
- ::std::cerr << "Calling reference xTRSV routine... ";
clblasOrder order;
clblasUplo fUplo;
@@ -150,7 +145,6 @@ trsvCorrectnessTest(TestParams *params)
doConjugate((A + params->offa), params->N, params->N, params->lda );
}
::clMath::blas::trsv( order, fUplo, fTrans, params->diag, params->N, A, params->offa, params->lda, blasX, params->offBX, params->incx);
- ::std::cerr << "Done" << ::std::endl;
/*
printf("\n\n acml result X\n");
@@ -173,8 +167,6 @@ trsvCorrectnessTest(TestParams *params)
return;
}
- ::std::cerr << "Calling clblas xTRSV routine... ";
-
DataType type;
type = ( typeid(T) == typeid(cl_float))? TYPE_FLOAT : ( typeid(T) == typeid(cl_double))? TYPE_DOUBLE: ( typeid(T) == typeid(cl_float2))? TYPE_COMPLEX_FLOAT: TYPE_COMPLEX_DOUBLE;
@@ -198,7 +190,6 @@ trsvCorrectnessTest(TestParams *params)
delete[] events;
ASSERT_EQ(CL_SUCCESS, err) << "waitForSuccessfulFinish()";
}
- ::std::cerr << "Done" << ::std::endl;
clEnqueueReadBuffer(base->commandQueues()[0], bufX, CL_TRUE, 0,
lengthX * sizeof(*backX), backX, 0,
diff --git a/src/tests/include/BlasBase.h b/src/tests/include/BlasBase.h
index 6c13e52..bcde47f 100644
--- a/src/tests/include/BlasBase.h
+++ b/src/tests/include/BlasBase.h
@@ -33,8 +33,7 @@ do { \
\
if (err == CL_INVALID_DEVICE && !base->isDevSupportDoublePrecision()) { \
::std::cerr << std::endl << ">> " << funcName << \
- "() reported that this device doesn't support double " \
- "precision floating point arithmetic. Test is skipped" << \
+ "() no double; test is skipped" << \
::std::endl; \
SUCCEED(); \
\
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-science/packages/clblas.git
More information about the debian-science-commits
mailing list