Browse Source

clean last unused variable warning in C LAPACK

pull/1816/head
Andrew 7 years ago
parent
commit
b9e504b5f8
2 changed files with 6 additions and 6 deletions
  1. +3
    -3
      lapack/trtri/trtri_L_parallel.c
  2. +3
    -3
      lapack/trtri/trtri_U_parallel.c

+ 3
- 3
lapack/trtri/trtri_L_parallel.c View File

@@ -54,7 +54,7 @@ blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa,
BLASLONG n, info;
BLASLONG bk, i, blocking, start_i;
int mode;
BLASLONG lda, range_N[2];
BLASLONG lda;//, range_N[2];
blas_arg_t newarg;
FLOAT *a;
FLOAT alpha[2] = { ONE, ZERO};
@@ -100,8 +100,8 @@ blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa,
bk = n - i;
if (bk > blocking) bk = blocking;

range_N[0] = i;
range_N[1] = i + bk;
/* range_N[0] = i;
range_N[1] = i + bk; */

newarg.lda = lda;
newarg.ldb = lda;


+ 3
- 3
lapack/trtri/trtri_U_parallel.c View File

@@ -54,7 +54,7 @@ blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa,
BLASLONG n, info;
BLASLONG bk, i, blocking;
int mode;
BLASLONG lda, range_N[2];
BLASLONG lda;//, range_N[2];
blas_arg_t newarg;
FLOAT *a;
FLOAT alpha[2] = { ONE, ZERO};
@@ -96,8 +96,8 @@ blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa,
bk = n - i;
if (bk > blocking) bk = blocking;

range_N[0] = i;
range_N[1] = i + bk;
/* range_N[0] = i;
range_N[1] = i + bk; */

newarg.lda = lda;
newarg.ldb = lda;


Loading…
Cancel
Save