Mercurial > hg > octave-terminal
changeset 125:096ef59709b3
[project @ 1993-09-25 20:31:49 by jwe]
(Matrix::operator * (const ColumnVector& a) const): Correct dimension
of return value.
(ComplexMatrix::operator * (const ComplexColumnVector& a) const): Ditto.
author | jwe |
---|---|
date | Sat, 25 Sep 1993 20:31:49 +0000 |
parents | b09b2c84688b |
children | 46ac21715e23 |
files | liboctave/Matrix.cc |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/liboctave/Matrix.cc +++ b/liboctave/Matrix.cc @@ -1044,7 +1044,7 @@ double beta = 0.0; int i_one = 1; - double *y = new double [a.len]; + double *y = new double [nr]; F77_FCN (dgemv) (&trans, &nr, &nc, &alpha, data, &ld, a.data, &i_one, &beta, y, &i_one, 1L); @@ -3315,7 +3315,7 @@ Complex beta (0.0); int i_one = 1; - Complex *y = new Complex [a.len]; + Complex *y = new Complex [nr]; F77_FCN (zgemv) (&trans, &nr, &nc, &alpha, data, &ld, a.data, &i_one, &beta, y, &i_one, 1L);