Mercurial > hg > octave-nkf

diff liboctave/CmplxQR.cc @ 4663:bf7272f8ba8c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2003-11-25 06:05:20 by jwe]
author jwe
date Tue, 25 Nov 2003 06:07:28 +0000
parents 7b957b442818
children 19bcdc6a9bb8
line wrap: on
line diff
--- a/liboctave/CmplxQR.cc
+++ b/liboctave/CmplxQR.cc
@@ -124,7 +124,7 @@
 
 	  lwork = 32 * n2;
 	  work.resize (lwork);
-	  pwork = work.fortran_vec ();
+	  Complex *pwork2 = work.fortran_vec ();
 
 	  F77_XFCN (zungqr, ZUNGQR, (m, n2, min_mn, tmp_data, m, ptau,
 				     pwork, lwork, info));