Mercurial > octave-nkf

changeset 3722:ecc97b03ec09

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[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	Tue Oct 10 22:36:26 2000 +0000
+++ b/liboctave/Array2-idx.h	Tue Oct 10 23:41:20 2000 +0000
@@ -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	Tue Oct 10 22:36:26 2000 +0000
+++ b/liboctave/ChangeLog	Tue Oct 10 23:41:20 2000 +0000
@@ -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,