Mercurial > hg > octave-lyh

diff liboctave/floatSVD.cc @ 10350:12884915a8e4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merge MArray classes & improve Array interface
author Jaroslav Hajek <highegg@gmail.com>
date Sat, 23 Jan 2010 21:41:03 +0100
parents 07ebe522dac2
children 3ce0c530a9c9
line wrap: on
line diff
--- a/liboctave/floatSVD.cc
+++ b/liboctave/floatSVD.cc
@@ -135,7 +135,7 @@
 
   octave_idx_type lwork = -1;
 
-  Array<float> work (1);
+  Array<float> work (1, 1);
 
   octave_idx_type one = 1;
   octave_idx_type m1 = std::max (m, one), nrow_vt1 = std::max (nrow_vt, one);
@@ -148,7 +148,7 @@
                              F77_CHAR_ARG_LEN (1)));
 
   lwork = static_cast<octave_idx_type> (work(0));
-  work.resize (lwork);
+  work.resize (lwork, 1);
 
   F77_XFCN (sgesvd, SGESVD, (F77_CONST_CHAR_ARG2 (&jobu, 1),
                              F77_CONST_CHAR_ARG2 (&jobv, 1),