Mercurial > hg > octave-nkf
diff src/ov-cell.cc @ 4705:a1b165f5e934
[project @ 2004-01-22 04:26:19 by jwe]
author | jwe |
---|---|
date | Thu, 22 Jan 2004 04:26:19 +0000 |
parents | 5e2c68946f30 |
children | 8f892ca5851d |
line wrap: on
line diff
--- a/src/ov-cell.cc +++ b/src/ov-cell.cc @@ -81,16 +81,16 @@ retval = tcell(0,0); else { - int nr = tcell.rows (); - int nc = tcell.columns (); - octave_value_list lst (nr * nc, octave_value ()); - int k = 0; - for (int j = 0; j < nc; j++) - for (int i = 0; i < nr; i++) - { - OCTAVE_QUIT; - lst(k++) = tcell(i,j); - } + int n = tcell.numel (); + + octave_value_list lst (n, octave_value ()); + + for (int i = 0; i < n; i++) + { + OCTAVE_QUIT; + lst(i) = tcell(i); + } + retval = octave_value (lst, true); } }