floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

checked, that tpmv is OK

This commit is contained in:
wernsaar 2014-05-11 08:35:34 +02:00
parent 48d1325784
commit 8204ab4aa8
2 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
interface/tpmv.c
View File

@ -64,7 +64,7 @@ static int (*tpmv[])(BLASLONG, FLOAT *, FLOAT *, BLASLONG, void *) = {
#endif
};
#ifdef SMPTEST
#ifdef SMP
static int (*tpmv_thread[])(BLASLONG, FLOAT *, FLOAT *, BLASLONG, FLOAT *, int) = {
#ifdef XDOUBLE
qtpmv_thread_NUU, qtpmv_thread_NUN, qtpmv_thread_NLU, qtpmv_thread_NLN,
@ -96,7 +96,7 @@ void NAME(char *UPLO, char *TRANS, char *DIAG,
int unit;
int trans;
FLOAT *buffer;
#ifdef SMPTEST
#ifdef SMP
int nthreads;
#endif
@ -143,7 +143,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo,
int trans, uplo, unit;
blasint info;
FLOAT *buffer;
#ifdef SMPTEST
#ifdef SMP
int nthreads;
#endif
@ -213,7 +213,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo,
buffer = (FLOAT *)blas_memory_alloc(1);
#ifdef SMPTEST
#ifdef SMP
nthreads = num_cpu_avail(2);
if (nthreads == 1) {
@ -221,7 +221,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo,
(tpmv[(trans<<2) | (uplo<<1) | unit])(n, a, x, incx, buffer);
#ifdef SMPTEST
#ifdef SMP
} else {
(tpmv_thread[(trans<<2) | (uplo<<1) | unit])(n, a, x, incx, buffer, nthreads);

10
interface/ztpmv.c
View File

@ -70,7 +70,7 @@ static int (*tpmv[])(BLASLONG, FLOAT *, FLOAT *, BLASLONG, void *) = {
#endif
};
#ifdef SMPTEST
#ifdef SMP
static int (*tpmv_thread[])(BLASLONG, FLOAT *, FLOAT *, BLASLONG, FLOAT *, int) = {
#ifdef XDOUBLE
xtpmv_thread_NUU, xtpmv_thread_NUN, xtpmv_thread_NLU, xtpmv_thread_NLN,
@ -108,7 +108,7 @@ void NAME(char *UPLO, char *TRANS, char *DIAG,
int unit;
int trans;
FLOAT *buffer;
#ifdef SMPTEST
#ifdef SMP
int nthreads;
#endif
@ -162,7 +162,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo,
uplo = -1;
trans = -1;
info = 0;
#ifdef SMPTEST
#ifdef SMP
int nthreads;
#endif
@ -225,7 +225,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo,
buffer = (FLOAT *)blas_memory_alloc(1);
#ifdef SMPTEST
#ifdef SMP
nthreads = num_cpu_avail(2);
if (nthreads == 1) {
@ -233,7 +233,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo,
(tpmv[(trans<<2) | (uplo<<1) | unit])(n, a, x, incx, buffer);
#ifdef SMPTEST
#ifdef SMP
} else {