Mercurial > hg > octave-max

changeset 1946:ec07d85b4152

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1996-02-14 01:19:57 by jwe]
author jwe
date Wed, 14 Feb 1996 01:19:57 +0000
parents 8c4bce5e773e
children 5ab3c25a3cf9
files liboctave/CmplxSVD.cc
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/liboctave/CmplxSVD.cc
+++ b/liboctave/CmplxSVD.cc
@@ -78,7 +78,8 @@
   int m = a.rows ();
   int n = a.cols ();
 
-  Complex *tmp_data = dup (a.data (), a.length ());
+  ComplexMatrix atmp = a;
+  Complex *tmp_data = atmp.fortran_vec ();
 
   int min_mn = m < n ? m : n;
   int max_mn = m > n ? m : n;