diff --git a/interface/syrk.c b/interface/syrk.c index 7dc87e044..7699db683 100644 --- a/interface/syrk.c +++ b/interface/syrk.c @@ -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; @@ -223,6 +225,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; @@ -240,6 +243,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; @@ -340,13 +344,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);