Mercurial > hg > octave-lyh
diff liboctave/CMatrix.cc @ 11574:a83bad07f7e3
attempt better backward compatibility for Array resize functions
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 20 Jan 2011 00:12:05 -0500 |
parents | 57632dea2446 |
children | 12df7854fa7c |
line wrap: on
line diff
--- a/liboctave/CMatrix.cc +++ b/liboctave/CMatrix.cc @@ -1081,7 +1081,7 @@ lwork = static_cast<octave_idx_type> (std::real(z(0))); lwork = (lwork < 2 *nc ? 2*nc : lwork); - z.resize (lwork, 1); + z.resize (dim_vector (lwork, 1)); Complex *pz = z.fortran_vec (); info = 0; @@ -1447,7 +1447,7 @@ nsamples = nr; nn = 4*npts+15; - wsave.resize (nn, 1); + wsave.resize (dim_vector (nn, 1)); pwsave = wsave.fortran_vec (); Array<Complex> tmp (npts, 1); @@ -1516,7 +1516,7 @@ nsamples = nr; nn = 4*npts+15; - wsave.resize (nn, 1); + wsave.resize (dim_vector (nn, 1)); pwsave = wsave.fortran_vec (); Array<Complex> tmp (npts, 1); @@ -2709,7 +2709,7 @@ } lwork = static_cast<octave_idx_type> (std::real (work(0))); - work.resize (lwork, 1); + work.resize (dim_vector (lwork, 1)); F77_XFCN (zgelsd, ZGELSD, (m, n, nrhs, tmp_data, m, pretval, maxmn, ps, rcon, rank, @@ -2868,9 +2868,9 @@ lwork, prwork, piwork, info)); lwork = static_cast<octave_idx_type> (std::real (work(0))); - work.resize (lwork, 1); - rwork.resize (static_cast<octave_idx_type> (rwork(0)), 1); - iwork.resize (iwork(0), 1); + work.resize (dim_vector (lwork, 1)); + rwork.resize (dim_vector (static_cast<octave_idx_type> (rwork(0)), 1)); + iwork.resize (dim_vector (iwork(0), 1)); F77_XFCN (zgelsd, ZGELSD, (m, n, nrhs, tmp_data, m, pretval, maxmn, ps, rcon, rank, @@ -3293,7 +3293,7 @@ if (nr > 0 && nc > 0) { result.resize (nr); - idx_arg.resize (nr, 1); + idx_arg.resize (dim_vector (nr, 1)); for (octave_idx_type i = 0; i < nr; i++) { @@ -3367,7 +3367,7 @@ if (nr > 0 && nc > 0) { result.resize (nr); - idx_arg.resize (nr, 1); + idx_arg.resize (dim_vector (nr, 1)); for (octave_idx_type i = 0; i < nr; i++) { @@ -3441,7 +3441,7 @@ if (nr > 0 && nc > 0) { result.resize (nc); - idx_arg.resize (1, nc); + idx_arg.resize (dim_vector (1, nc)); for (octave_idx_type j = 0; j < nc; j++) { @@ -3515,7 +3515,7 @@ if (nr > 0 && nc > 0) { result.resize (nc); - idx_arg.resize (1, nc); + idx_arg.resize (dim_vector (1, nc)); for (octave_idx_type j = 0; j < nc; j++) {