| @@ -74,12 +74,12 @@ | |||||
| static int (*syrk[])(blas_arg_t *, BLASLONG *, BLASLONG *, FLOAT *, FLOAT *, BLASLONG) = { | static int (*syrk[])(blas_arg_t *, BLASLONG *, BLASLONG *, FLOAT *, FLOAT *, BLASLONG) = { | ||||
| #ifndef HEMM | #ifndef HEMM | ||||
| SYRK_UN, SYRK_UC, SYRK_LN, SYRK_LC, | SYRK_UN, SYRK_UC, SYRK_LN, SYRK_LC, | ||||
| #if defined(SMPTEST) && !defined(USE_SIMPLE_THREADED_LEVEL3) | |||||
| #if defined(SMP) && !defined(USE_SIMPLE_THREADED_LEVEL3) | |||||
| SYRK_THREAD_UN, SYRK_THREAD_UC, SYRK_THREAD_LN, SYRK_THREAD_LC, | SYRK_THREAD_UN, SYRK_THREAD_UC, SYRK_THREAD_LN, SYRK_THREAD_LC, | ||||
| #endif | #endif | ||||
| #else | #else | ||||
| HERK_UN, HERK_UC, HERK_LN, HERK_LC, | HERK_UN, HERK_UC, HERK_LN, HERK_LC, | ||||
| #if defined(SMPTEST) && !defined(USE_SIMPLE_THREADED_LEVEL3) | |||||
| #if defined(SMP) && !defined(USE_SIMPLE_THREADED_LEVEL3) | |||||
| HERK_THREAD_UN, HERK_THREAD_UC, HERK_THREAD_LN, HERK_THREAD_LC, | HERK_THREAD_UN, HERK_THREAD_UC, HERK_THREAD_LN, HERK_THREAD_LC, | ||||
| #endif | #endif | ||||
| #endif | #endif | ||||
| @@ -100,7 +100,7 @@ void NAME(char *UPLO, char *TRANS, | |||||
| FLOAT *buffer; | FLOAT *buffer; | ||||
| FLOAT *sa, *sb; | FLOAT *sa, *sb; | ||||
| #ifdef SMPTEST | |||||
| #ifdef SMP | |||||
| #ifndef COMPLEX | #ifndef COMPLEX | ||||
| #ifdef XDOUBLE | #ifdef XDOUBLE | ||||
| int mode = BLAS_XDOUBLE | BLAS_REAL; | int mode = BLAS_XDOUBLE | BLAS_REAL; | ||||
| @@ -205,7 +205,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, enum CBLAS_TRANSPOSE Tr | |||||
| FLOAT *buffer; | FLOAT *buffer; | ||||
| FLOAT *sa, *sb; | FLOAT *sa, *sb; | ||||
| #ifdef SMPTEST | |||||
| #ifdef SMP | |||||
| #ifndef COMPLEX | #ifndef COMPLEX | ||||
| #ifdef XDOUBLE | #ifdef XDOUBLE | ||||
| int mode = BLAS_XDOUBLE | BLAS_REAL; | int mode = BLAS_XDOUBLE | BLAS_REAL; | ||||
| @@ -322,7 +322,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, enum CBLAS_TRANSPOSE Tr | |||||
| sa = (FLOAT *)((BLASLONG)buffer + GEMM_OFFSET_A); | sa = (FLOAT *)((BLASLONG)buffer + GEMM_OFFSET_A); | ||||
| sb = (FLOAT *)(((BLASLONG)sa + ((GEMM_P * GEMM_Q * COMPSIZE * SIZE + GEMM_ALIGN) & ~GEMM_ALIGN)) + GEMM_OFFSET_B); | sb = (FLOAT *)(((BLASLONG)sa + ((GEMM_P * GEMM_Q * COMPSIZE * SIZE + GEMM_ALIGN) & ~GEMM_ALIGN)) + GEMM_OFFSET_B); | ||||
| #ifdef SMPTEST | |||||
| #ifdef SMP | |||||
| if (!trans){ | if (!trans){ | ||||
| mode |= (BLAS_TRANSA_N | BLAS_TRANSB_T); | mode |= (BLAS_TRANSA_N | BLAS_TRANSB_T); | ||||
| } else { | } else { | ||||
| @@ -339,7 +339,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, enum CBLAS_TRANSPOSE Tr | |||||
| (syrk[(uplo << 1) | trans ])(&args, NULL, NULL, sa, sb, 0); | (syrk[(uplo << 1) | trans ])(&args, NULL, NULL, sa, sb, 0); | ||||
| #ifdef SMPTEST | |||||
| #ifdef SMP | |||||
| } else { | } else { | ||||