diff options
Diffstat (limited to 'interface/ztrmv.c')
| -rw-r--r-- | interface/ztrmv.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/interface/ztrmv.c b/interface/ztrmv.c index 5a18a85b1..1abaac920 100644 --- a/interface/ztrmv.c +++ b/interface/ztrmv.c @@ -95,7 +95,7 @@ static int (*trmv_thread[])(BLASLONG, FLOAT *, BLASLONG, FLOAT *, BLASLONG, FLOA void NAME(char *UPLO, char *TRANS, char *DIAG, blasint *N, FLOAT *a, blasint *LDA, FLOAT *x, blasint *INCX){ - + char uplo_arg = *UPLO; char trans_arg = *TRANS; char diag_arg = *DIAG; @@ -147,7 +147,7 @@ void NAME(char *UPLO, char *TRANS, char *DIAG, BLASFUNC(xerbla)(ERROR_NAME, &info, sizeof(ERROR_NAME)); return; } - + #else void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, @@ -176,7 +176,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, if (TransA == CblasTrans) trans = 1; if (TransA == CblasConjNoTrans) trans = 2; if (TransA == CblasConjTrans) trans = 3; - + if (Diag == CblasUnit) unit = 0; if (Diag == CblasNonUnit) unit = 1; @@ -220,7 +220,7 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, #endif if (n == 0) return; - + IDEBUG_START; FUNCTION_PROFILE_START(); @@ -239,9 +239,9 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, #ifdef SMP } else { - + (trmv_thread[(trans<<2) | (uplo<<1) | unit])(n, a, lda, x, incx, buffer, nthreads); - + } #endif |