Mercurial > octave-nkf

comparison liboctave/sparse-dmsolve.cc @ 11574:a83bad07f7e3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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
comparison
equal deleted inserted replaced
11573:6f8ffe2c6f76 11574:a83bad07f7e3
277 dmsolve_permute (MArray<RT> &a, const MArray<T>& b, const octave_idx_type *p) 277 dmsolve_permute (MArray<RT> &a, const MArray<T>& b, const octave_idx_type *p)
278 { 278 {
279 octave_idx_type b_nr = b.rows (); 279 octave_idx_type b_nr = b.rows ();
280 octave_idx_type b_nc = b.cols (); 280 octave_idx_type b_nc = b.cols ();
281 const T *Bx = b.fortran_vec(); 281 const T *Bx = b.fortran_vec();
282 a.resize(b_nr, b_nc); 282 a.resize (dim_vector (b_nr, b_nc));
283 RT *Btx = a.fortran_vec(); 283 RT *Btx = a.fortran_vec();
284 for (octave_idx_type j = 0; j < b_nc; j++) 284 for (octave_idx_type j = 0; j < b_nc; j++)
285 { 285 {
286 octave_idx_type off = j * b_nr; 286 octave_idx_type off = j * b_nr;
287 for (octave_idx_type i = 0; i < b_nr; i++) 287 for (octave_idx_type i = 0; i < b_nr; i++)