Mercurial > octave

changeset 124:b09b2c84688b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1993-09-22 11:01:59 by jwe]
author jwe
date Wed, 22 Sep 1993 11:01:59 +0000
parents 174de3807b61
children 096ef59709b3
files liboctave/Matrix.cc
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/liboctave/Matrix.cc	Tue Sep 21 20:39:54 1993 +0000
+++ b/liboctave/Matrix.cc	Wed Sep 22 11:01:59 1993 +0000
@@ -1049,7 +1049,7 @@
   F77_FCN (dgemv) (&trans, &nr, &nc, &alpha, data, &ld, a.data,
 		   &i_one, &beta, y, &i_one, 1L); 
 
-  return ColumnVector (y, a.len);
+  return ColumnVector (y, nr);
 }
 
 ComplexColumnVector
@@ -3320,7 +3320,7 @@
   F77_FCN (zgemv) (&trans, &nr, &nc, &alpha, data, &ld, a.data,
 		   &i_one, &beta, y, &i_one, 1L); 
 
-  return ComplexColumnVector (y, a.len);
+  return ComplexColumnVector (y, nr);
 }
 
 // matrix by diagonal matrix -> matrix operations