gaspersic/triton
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bench: Removed warnings in bench-blas when no external blas is defined

Browse Source
This commit is contained in:
Philippe Tillet
2015-04-29 16:11:32 -04:00
parent cf5028d55b
commit a67476671d
1 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
bench/blas.cpp
View File

@@ -16,6 +16,7 @@
#include <numeric>
#include <regex>
#define HAS_A_BLAS defined(BENCH_CBLAS) or defined(BENCH_CLBLAS) or defined(BENCH_CUBLAS)
namespace ad = isaac;
typedef ad::int_t int_t;
@@ -256,7 +257,9 @@ void bench(ad::numeric_type dtype, std::string operation)
std::cout << M << "," << N;
/* ISAAC */
ad::array A(N, M, dtype), y(M, dtype), x(N, dtype);
#if HAS_A_BLAS
int_t lda = A.ld();
#endif
y = dot(trans(A),x); queue.synchronize();
BENCHMARK_ISAAC(y = ad::control(dot(trans(A),x), ad::execution_options_type(0, &events), ad::dispatcher_options_type(false)),(M*N + M + N)*dtsize/t);
BENCHMARK_ISAAC(y = ad::control(dot(trans(A),x), ad::execution_options_type(0, &events), ad::dispatcher_options_type(true)),(M*N + M + N)*dtsize/t);
@@ -306,7 +309,9 @@ void bench(ad::numeric_type dtype, std::string operation)
std::cout << M << "," << N << "," << K;
/* ISAAC */
ad::array C(M, N, dtype), A(M, K, dtype), B(N, K, dtype);
#if HAS_A_BLAS
int_t lda = A.ld(), ldb = B.ld(), ldc = C.ld();
#endif
BENCHMARK_ISAAC(C = ad::control(dot(A,trans(B)), ad::execution_options_type(0, &events), ad::dispatcher_options_type(false)), (double)2*M*N*K/t);
//BENCHMARK_ISAAC(C = ad::control(dot(A,trans(B)), ad::execution_options_type(0, &events), ad::dispatcher_options_type(true)), (double)2*M*N*K/t);
/* clblas */