Mercurial > hg > octave-nkf
changeset 3722:ecc97b03ec09
[project @ 2000-10-10 23:41:20 by jwe]
author | jwe |
---|---|
date | Tue, 10 Oct 2000 23:41:20 +0000 |
parents | 47a152583f04 |
children | 4c3774db5b3c |
files | liboctave/Array2-idx.h liboctave/ChangeLog |
diffstat | 2 files changed, 9 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/liboctave/Array2-idx.h +++ b/liboctave/Array2-idx.h @@ -70,7 +70,10 @@ { Array<T> tmp = Array<T>::index (idx_arg); - retval = Array2<T> (tmp, idx_orig_rows, idx_orig_columns); + if (tmp.length () != 0) + retval = Array2<T> (tmp, idx_orig_rows, idx_orig_columns); + else + retval = Array2<T> (tmp, 0, 0); } else if (nr == 1 || nc == 1) {
--- a/liboctave/ChangeLog +++ b/liboctave/ChangeLog @@ -1,3 +1,8 @@ +2000-10-10 John W. Eaton <jwe@bevo.che.wisc.edu> + + * Array2-idx.h (Array2<T>::index (idx_vector&)): Correctly set + size if Array<T>::index returns an empty array. + 2000-08-02 John W. Eaton <jwe@bevo.che.wisc.edu> * file-ops.cc (file_ops::link, file_ops::symlink,