diff options
Diffstat (limited to 'blas/level2_real_impl.h')
| -rw-r--r-- | blas/level2_real_impl.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/blas/level2_real_impl.h b/blas/level2_real_impl.h index 9722a4674..cac89b268 100644 --- a/blas/level2_real_impl.h +++ b/blas/level2_real_impl.h @@ -12,7 +12,7 @@ // y = alpha*A*x + beta*y int EIGEN_BLAS_FUNC(symv) (char *uplo, int *n, RealScalar *palpha, RealScalar *pa, int *lda, RealScalar *px, int *incx, RealScalar *pbeta, RealScalar *py, int *incy) { - typedef void (*functype)(int, const Scalar*, int, const Scalar*, int, Scalar*, Scalar); + typedef void (*functype)(int, const Scalar*, int, const Scalar*, Scalar*, Scalar); static functype func[2]; static bool init = false; @@ -59,7 +59,7 @@ int EIGEN_BLAS_FUNC(symv) (char *uplo, int *n, RealScalar *palpha, RealScalar *p if(code>=2 || func[code]==0) return 0; - func[code](*n, a, *lda, actual_x, 1, actual_y, alpha); + func[code](*n, a, *lda, actual_x, actual_y, alpha); if(actual_x!=x) delete[] actual_x; if(actual_y!=y) delete[] copy_back(actual_y,y,*n,*incy); |