Eliminate mode variable where not needed
@@ -101,6 +101,7 @@ void NAME(char *UPLO, char *TRANS,
FLOAT *sa, *sb;
#ifdef SMP
+#ifdef USE_SIMPLE_THREADED_LEVEL3
#ifndef COMPLEX
#ifdef XDOUBLE
int mode = BLAS_XDOUBLE | BLAS_REAL;
@@ -118,6 +119,7 @@ void NAME(char *UPLO, char *TRANS,
int mode = BLAS_SINGLE | BLAS_COMPLEX;
#endif
#endif
+#endif
#endif
blasint info;
@@ -206,6 +208,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, enum CBLAS_TRANSPOSE Tr
FLOAT *sa, *sb;
#ifdef SMP
+#ifdef USE_SIMPLE_THREADED_LEVEL3
#ifndef COMPLEX
#ifdef XDOUBLE
int mode = BLAS_XDOUBLE | BLAS_REAL;
@@ -223,6 +226,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, enum CBLAS_TRANSPOSE Tr
int mode = BLAS_SINGLE | BLAS_COMPLEX;
#endif
#endif
+#endif
#endif
PRINT_DEBUG_CNAME;
@@ -323,13 +327,14 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, enum CBLAS_TRANSPOSE Tr
sb = (FLOAT *)(((BLASLONG)sa + ((GEMM_P * GEMM_Q * COMPSIZE * SIZE + GEMM_ALIGN) & ~GEMM_ALIGN)) + GEMM_OFFSET_B);
#ifdef SMP
+#ifdef USE_SIMPLE_THREADED_LEVEL3
if (!trans){
mode |= (BLAS_TRANSA_N | BLAS_TRANSB_T);
} else {
mode |= (BLAS_TRANSA_T | BLAS_TRANSB_N);
}
-
mode |= (uplo << BLAS_UPLO_SHIFT);
+#endif
args.common = NULL;
args.nthreads = num_cpu_avail(3);
