From 0758c1a3742654374cb4d2fc78745a3ec7be64ff Mon Sep 17 00:00:00 2001 From: wernsaar Date: Sun, 11 May 2014 09:11:20 +0200 Subject: [PATCH] checked, that trtri is OK --- interface/trtri.c | 6 +++--- interface/ztrtri.c | 6 +++--- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/interface/trtri.c b/interface/trtri.c index 07d4790f3..5aa5e9b9b 100644 --- a/interface/trtri.c +++ b/interface/trtri.c @@ -54,7 +54,7 @@ static blasint (*trtri_single[])(blas_arg_t *, BLASLONG *, BLASLONG *, FLOAT *, TRTRI_UU_SINGLE, TRTRI_UN_SINGLE, TRTRI_LU_SINGLE, TRTRI_LN_SINGLE, }; -#ifdef SMPTEST +#ifdef SMP static blasint (*trtri_parallel[])(blas_arg_t *, BLASLONG *, BLASLONG *, FLOAT *, FLOAT *, BLASLONG) ={ TRTRI_UU_PARALLEL, TRTRI_UN_PARALLEL, TRTRI_LU_PARALLEL, TRTRI_LN_PARALLEL, }; @@ -126,7 +126,7 @@ int NAME(char *UPLO, char *DIAG, blasint *N, FLOAT *a, blasint *ldA, blasint *In sb = (FLOAT *)(((BLASLONG)sa + ((GEMM_P * GEMM_Q * COMPSIZE * SIZE + GEMM_ALIGN) & ~GEMM_ALIGN)) + GEMM_OFFSET_B); #endif -#ifdef SMPTEST +#ifdef SMP args.nthreads = num_cpu_avail(4); if (args.nthreads == 1) { @@ -134,7 +134,7 @@ int NAME(char *UPLO, char *DIAG, blasint *N, FLOAT *a, blasint *ldA, blasint *In *Info = (trtri_single[(uplo << 1) | diag])(&args, NULL, NULL, sa, sb, 0); -#ifdef SMPTEST +#ifdef SMP } else { *Info = (trtri_parallel[(uplo << 1) | diag])(&args, NULL, NULL, sa, sb, 0); diff --git a/interface/ztrtri.c b/interface/ztrtri.c index 79e6c11aa..89caf80d3 100644 --- a/interface/ztrtri.c +++ b/interface/ztrtri.c @@ -54,7 +54,7 @@ static blasint (*trtri_single[])(blas_arg_t *, BLASLONG *, BLASLONG *, FLOAT *, TRTRI_UU_SINGLE, TRTRI_UN_SINGLE, TRTRI_LU_SINGLE, TRTRI_LN_SINGLE, }; -#ifdef SMPTEST +#ifdef SMP static blasint (*trtri_parallel[])(blas_arg_t *, BLASLONG *, BLASLONG *, FLOAT *, FLOAT *, BLASLONG) ={ TRTRI_UU_PARALLEL, TRTRI_UN_PARALLEL, TRTRI_LU_PARALLEL, TRTRI_LN_PARALLEL, }; @@ -123,7 +123,7 @@ int NAME(char *UPLO, char *DIAG, blasint *N, FLOAT *a, blasint *ldA, blasint *In sb = (FLOAT *)(((BLASLONG)sa + ((GEMM_P * GEMM_Q * COMPSIZE * SIZE + GEMM_ALIGN) & ~GEMM_ALIGN)) + GEMM_OFFSET_B); #endif -#ifdef SMPTEST +#ifdef SMP args.common = NULL; args.nthreads = num_cpu_avail(4); @@ -132,7 +132,7 @@ int NAME(char *UPLO, char *DIAG, blasint *N, FLOAT *a, blasint *ldA, blasint *In *Info = (trtri_single[(uplo << 1) | diag])(&args, NULL, NULL, sa, sb, 0); -#ifdef SMPTEST +#ifdef SMP } else { *Info = (trtri_parallel[(uplo << 1) | diag])(&args, NULL, NULL, sa, sb, 0);