floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

address minor warnings from gcc7

This commit is contained in:
Andrew 2019-09-07 10:21:08 +03:00
parent 6e9a93ec19
commit 4de545aa7d
3 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
driver/others/openblas_get_config.c
View File

@ -78,10 +78,10 @@ char tmpstr[20];
#ifdef DYNAMIC_ARCH #ifdef DYNAMIC_ARCH
strcat(tmp_config_str, gotoblas_corename()); strcat(tmp_config_str, gotoblas_corename());
#endif #endif
if (openblas_get_parallel() == 0) if (openblas_get_parallel() == 0)
sprintf(tmpstr, " SINGLE_THREADED"); sprintf(tmpstr, " SINGLE_THREADED");
else else
snprintf(tmpstr,19," MAX_THREADS=%d",MAX_CPU_NUMBER); snprintf(tmpstr,19," MAX_THREADS=%d",MAX_CPU_NUMBER);
strcat(tmp_config_str, tmpstr); strcat(tmp_config_str, tmpstr);
return tmp_config_str; return tmp_config_str;
} }

6
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 n, info;
BLASLONG bk, i, blocking, start_i; BLASLONG bk, i, blocking, start_i;
int mode; int mode;
BLASLONG lda, range_N[2]; BLASLONG lda; // , range_N[2];
blas_arg_t newarg; blas_arg_t newarg;
FLOAT *a; FLOAT *a;
FLOAT alpha[2] = { ONE, ZERO}; 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; bk = n - i;
if (bk > blocking) bk = blocking; if (bk > blocking) bk = blocking;
range_N[0] = i; /* range_N[0] = i;
range_N[1] = i + bk; range_N[1] = i + bk; */
newarg.lda = lda; newarg.lda = lda;
newarg.ldb = lda; newarg.ldb = lda;

6
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 n, info;
BLASLONG bk, i, blocking; BLASLONG bk, i, blocking;
int mode; int mode;
BLASLONG lda, range_N[2]; BLASLONG lda; //, range_N[2];
blas_arg_t newarg; blas_arg_t newarg;
FLOAT *a; FLOAT *a;
FLOAT alpha[2] = { ONE, ZERO}; 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; bk = n - i;
if (bk > blocking) bk = blocking; if (bk > blocking) bk = blocking;
range_N[0] = i; /* range_N[0] = i;
range_N[1] = i + bk; range_N[1] = i + bk; */
newarg.lda = lda; newarg.lda = lda;
newarg.ldb = lda; newarg.ldb = lda;