Browse Source

Remove unused variable

tags/v0.3.18
Martin Kroeker GitHub 4 years ago
parent
commit
20581bf303
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
  1. +1
    -1
      interface/zsyr.c

+ 1
- 1
interface/zsyr.c View File

@@ -119,7 +119,7 @@ void NAME(char *UPLO, blasint *N, FLOAT *ALPHA,
void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, int n, FLOAT alpha, FLOAT *x, int incx, FLOAT *a, int lda) { void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo, int n, FLOAT alpha, FLOAT *x, int incx, FLOAT *a, int lda) {


FLOAT *buffer; FLOAT *buffer;
int trans, uplo;
int uplo;
blasint info; blasint info;
FLOAT * ALPHA = α FLOAT * ALPHA = α
FLOAT alpha_r = ALPHA[0]; FLOAT alpha_r = ALPHA[0];


Loading…
Cancel
Save