checked, that spr2 is OK
This commit is contained in:
parent
de00e2937a
commit
2ed03ea0a2
|
@ -61,7 +61,7 @@ static int (*spr2[])(BLASLONG, FLOAT, FLOAT *, BLASLONG, FLOAT *, BLASLONG, FLOA
|
|||
#endif
|
||||
};
|
||||
|
||||
#ifdef SMPTEST
|
||||
#ifdef SMP
|
||||
static int (*spr2_thread[])(BLASLONG, FLOAT, FLOAT *, BLASLONG, FLOAT *, BLASLONG, FLOAT *, FLOAT *, int) = {
|
||||
#ifdef XDOUBLE
|
||||
qspr2_thread_U, qspr2_thread_L,
|
||||
|
@ -87,7 +87,7 @@ void NAME(char *UPLO, blasint *N, FLOAT *ALPHA,
|
|||
blasint info;
|
||||
int uplo;
|
||||
FLOAT *buffer;
|
||||
#ifdef SMPTEST
|
||||
#ifdef SMP
|
||||
int nthreads;
|
||||
#endif
|
||||
|
||||
|
@ -124,7 +124,7 @@ void CNAME(enum CBLAS_ORDER order,
|
|||
FLOAT *buffer;
|
||||
int uplo;
|
||||
blasint info;
|
||||
#ifdef SMPTEST
|
||||
#ifdef SMP
|
||||
int nthreads;
|
||||
#endif
|
||||
|
||||
|
@ -177,7 +177,7 @@ void CNAME(enum CBLAS_ORDER order,
|
|||
|
||||
buffer = (FLOAT *)blas_memory_alloc(1);
|
||||
|
||||
#ifdef SMPTEST
|
||||
#ifdef SMP
|
||||
nthreads = num_cpu_avail(2);
|
||||
|
||||
if (nthreads == 1) {
|
||||
|
@ -185,7 +185,7 @@ void CNAME(enum CBLAS_ORDER order,
|
|||
|
||||
(spr2[uplo])(n, alpha, x, incx, y, incy, a, buffer);
|
||||
|
||||
#ifdef SMPTEST
|
||||
#ifdef SMP
|
||||
} else {
|
||||
|
||||
(spr2_thread[uplo])(n, alpha, x, incx, y, incy, a, buffer, nthreads);
|
||||
|
|
|
@ -61,7 +61,7 @@ static int (*spr2[])(BLASLONG, FLOAT, FLOAT, FLOAT *, BLASLONG, FLOAT *, BLASLON
|
|||
#endif
|
||||
};
|
||||
|
||||
#ifdef SMPTEST
|
||||
#ifdef SMP
|
||||
static int (*spr2_thread[])(BLASLONG, FLOAT *, FLOAT *, BLASLONG, FLOAT *, BLASLONG, FLOAT *, FLOAT *, int) = {
|
||||
#ifdef XDOUBLE
|
||||
xspr2_thread_U, xspr2_thread_L,
|
||||
|
@ -86,7 +86,7 @@ void NAME(char *UPLO, blasint *N, FLOAT *ALPHA,
|
|||
blasint info;
|
||||
int uplo;
|
||||
FLOAT *buffer;
|
||||
#ifdef SMPTEST
|
||||
#ifdef SMP
|
||||
int nthreads;
|
||||
#endif
|
||||
|
||||
|
@ -123,7 +123,7 @@ void NAME(char *UPLO, blasint *N, FLOAT *ALPHA,
|
|||
|
||||
buffer = (FLOAT *)blas_memory_alloc(1);
|
||||
|
||||
#ifdef SMPTEST
|
||||
#ifdef SMP
|
||||
nthreads = num_cpu_avail(2);
|
||||
|
||||
if (nthreads == 1) {
|
||||
|
@ -131,7 +131,7 @@ void NAME(char *UPLO, blasint *N, FLOAT *ALPHA,
|
|||
|
||||
(spr2[uplo])(n, alpha_r, alpha_i, x, incx, y, incy, a, buffer);
|
||||
|
||||
#ifdef SMPTEST
|
||||
#ifdef SMP
|
||||
} else {
|
||||
|
||||
(spr2_thread[uplo])(n, ALPHA, x, incx, y, incy, a, buffer, nthreads);
|
||||
|
|
Loading…
Reference in New Issue