Merge pull request #283 from jcfr/fix-unused-var-warnings

langou · web-flow · commit 7851b1869cd7 · 2018-09-08T19:47:02.000-06:00
Fix -Wunused-variable in lapacke_*_aa_2stage_work.c
diff --git a/LAPACKE/src/lapacke_dsytrf_aa_2stage_work.c b/LAPACKE/src/lapacke_dsytrf_aa_2stage_work.c
@@ -50,7 +50,6 @@ lapack_int LAPACKE_dsytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_i
         }
     } else if( matrix_layout == LAPACK_ROW_MAJOR ) {
         lapack_int lda_t = MAX(1,n);
-        lapack_int ldb_t = MAX(1,n);
         double* a_t = NULL;
         double* tb_t = NULL;
         /* Check leading dimension(s) */
diff --git a/LAPACKE/src/lapacke_zhetrf_aa_2stage_work.c b/LAPACKE/src/lapacke_zhetrf_aa_2stage_work.c
@@ -50,7 +50,6 @@ lapack_int LAPACKE_zhetrf_aa_2stage_work( int matrix_layout, char uplo, lapack_i
         }
     } else if( matrix_layout == LAPACK_ROW_MAJOR ) {
         lapack_int lda_t = MAX(1,n);
-        lapack_int ldb_t = MAX(1,n);
         lapack_complex_double* a_t = NULL;
         lapack_complex_double* tb_t = NULL;
         /* Check leading dimension(s) */
diff --git a/LAPACKE/src/lapacke_zsytrf_aa_2stage_work.c b/LAPACKE/src/lapacke_zsytrf_aa_2stage_work.c
@@ -50,7 +50,6 @@ lapack_int LAPACKE_zsytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_i
         }
     } else if( matrix_layout == LAPACK_ROW_MAJOR ) {
         lapack_int lda_t = MAX(1,n);
-        lapack_int ldb_t = MAX(1,n);
         lapack_complex_double* a_t = NULL;
         lapack_complex_double* tb_t = NULL;
         /* Check leading dimension(s) */

Original file line number	Diff line number	Diff line change
`@@ -50,7 +50,6 @@ lapack_int LAPACKE_dsytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_i`
`50`	`50`	`}`
`51`	`51`	`} else if( matrix_layout == LAPACK_ROW_MAJOR ) {`
`52`	`52`	`lapack_int lda_t = MAX(1,n);`
`53`		`- lapack_int ldb_t = MAX(1,n);`
`54`	`53`	`double* a_t = NULL;`
`55`	`54`	`double* tb_t = NULL;`
`56`	`55`	`/* Check leading dimension(s) */`
Original file line number	Diff line number	Diff line change
`@@ -50,7 +50,6 @@ lapack_int LAPACKE_zhetrf_aa_2stage_work( int matrix_layout, char uplo, lapack_i`
`50`	`50`	`}`
`51`	`51`	`} else if( matrix_layout == LAPACK_ROW_MAJOR ) {`
`52`	`52`	`lapack_int lda_t = MAX(1,n);`
`53`		`- lapack_int ldb_t = MAX(1,n);`
`54`	`53`	`lapack_complex_double* a_t = NULL;`
`55`	`54`	`lapack_complex_double* tb_t = NULL;`
`56`	`55`	`/* Check leading dimension(s) */`
Original file line number	Diff line number	Diff line change
`@@ -50,7 +50,6 @@ lapack_int LAPACKE_zsytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_i`
`50`	`50`	`}`
`51`	`51`	`} else if( matrix_layout == LAPACK_ROW_MAJOR ) {`
`52`	`52`	`lapack_int lda_t = MAX(1,n);`
`53`		`- lapack_int ldb_t = MAX(1,n);`
`54`	`53`	`lapack_complex_double* a_t = NULL;`
`55`	`54`	`lapack_complex_double* tb_t = NULL;`
`56`	`55`	`/* Check leading dimension(s) */`