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

clean up trmv interface from scattered workaround

This commit is contained in:
Andrew 2019-02-03 13:10:46 +02:00
parent 465133e7cb
commit ebf443fe72
2 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
interface/trmv.c
View File

@ -43,6 +43,9 @@
#include "functable.h"
#endif
/* trmv_thread was found to be broken, see issue 1332 */
#undef SMP
#ifdef XDOUBLE
#define ERROR_NAME "QTRMV "
#elif defined(DOUBLE)
@ -218,11 +221,8 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo,
buffer = (FLOAT *)blas_memory_alloc(1);
#ifdef SMP
/* nthreads = num_cpu_avail(2);
nthreads = num_cpu_avail(2);
FIXME trmv_thread was found to be broken, see issue 1332 */
nthreads = 1;
if (nthreads == 1) {
#endif

7
interface/ztrmv.c
View File

@ -36,6 +36,10 @@
/* or implied, of The University of Texas at Austin. */
/*********************************************************************/
/* FIXME TRMV multithreading appears to be broken, see issue 1332*/
#undef SMP
#include <stdio.h>
#include <ctype.h>
#include "common.h"
@ -239,9 +243,6 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo,
} else
nthreads = 1;
/* FIXME TRMV multithreading appears to be broken, see issue 1332*/
nthreads = 1;
if(nthreads > 1) {
buffer_size = n > 16 ? 0 : n * 4 + 40;
}