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

Merge pull request #1601 from martin-frbg/zaxpy 

Use a single thread for small input size in zaxpy
This commit is contained in:
Martin Kroeker 2018-06-07 14:09:58 +02:00 committed by GitHub
parent 2ade0ef085 e8880c1699
commit 6adc4b7b36
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
interface/zaxpy.c
View File

@ -41,7 +41,11 @@
#ifdef FUNCTION_PROFILE #ifdef FUNCTION_PROFILE
#include "functable.h" #include "functable.h"
#endif #endif
#if defined(Z13)
#define MULTI_THREAD_MINIMAL 200000
#else
#define MULTI_THREAD_MINIMAL 10000
#endif
#ifndef CBLAS #ifndef CBLAS
void NAME(blasint *N, FLOAT *ALPHA, FLOAT *x, blasint *INCX, FLOAT *y, blasint *INCY){ void NAME(blasint *N, FLOAT *ALPHA, FLOAT *x, blasint *INCX, FLOAT *y, blasint *INCY){
@ -69,7 +73,7 @@ void CNAME(blasint n, FLOAT *ALPHA, FLOAT *x, blasint incx, FLOAT *y, blasint in
#endif #endif
#ifndef CBLAS #ifndef CBLAS
PRINT_DEBUG_CNAME; PRINT_DEBUG_NAME;
#else #else
PRINT_DEBUG_CNAME; PRINT_DEBUG_CNAME;
#endif #endif
@ -93,6 +97,11 @@ void CNAME(blasint n, FLOAT *ALPHA, FLOAT *x, blasint incx, FLOAT *y, blasint in
if (incx == 0 || incy == 0) if (incx == 0 || incy == 0)
nthreads = 1; nthreads = 1;
//Work around the low performance issue with small imput size &
//multithreads.
if (n <= MULTI_THREAD_MINIMAL) {
nthreads = 1;
}
if (nthreads == 1) { if (nthreads == 1) {
#endif #endif