diff --git a/interface/gemm.c b/interface/gemm.c index cd5d00589..10426fd8f 100644 --- a/interface/gemm.c +++ b/interface/gemm.c @@ -126,6 +126,7 @@ void NAME(char *TRANSA, char *TRANSB, #ifdef SMP double MNK; +#if defined(USE_SIMPLE_THREADED_LEVEL3) || !defined(NO_AFFINITY) #ifndef COMPLEX #ifdef XDOUBLE int mode = BLAS_XDOUBLE | BLAS_REAL; @@ -144,6 +145,7 @@ void NAME(char *TRANSA, char *TRANSB, #endif #endif #endif +#endif #if defined(SMP) && !defined(NO_AFFINITY) && !defined(USE_SIMPLE_THREADED_LEVEL3) int nodes; diff --git a/interface/gemv.c b/interface/gemv.c index b6c2e6095..1f14cdb2c 100644 --- a/interface/gemv.c +++ b/interface/gemv.c @@ -203,7 +203,7 @@ void CNAME(enum CBLAS_ORDER order, if (alpha == ZERO) return; if (trans == 0 && incx == 1 && incy == 1 && m*n < 2304 *GEMM_MULTITHREAD_THRESHOLD) { - GEMV_N(m, n, 0, alpha, a, lda, x, incx, y, incy, buffer); + GEMV_N(m, n, 0, alpha, a, lda, x, incx, y, incy, NULL); return; } diff --git a/interface/ger.c b/interface/ger.c index 1c72d51ec..af6ae8606 100644 --- a/interface/ger.c +++ b/interface/ger.c @@ -165,7 +165,7 @@ void CNAME(enum CBLAS_ORDER order, if (alpha == 0.) return; if (incx == 1 && incy == 1 && 1L*m*n <= 2048 *GEMM_MULTITHREAD_THRESHOLD) { - GER(m, n, 0, alpha, x, incx, y, incy, a, lda, buffer); + GER(m, n, 0, alpha, x, incx, y, incy, a, lda, NULL); return; }