Mercurial > octave

changeset 2381:81298641458d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1996-10-12 17:41:42 by jwe]
author jwe
date Sat, 12 Oct 1996 17:41:42 +0000
parents e807c025bfe8
children 58e5955495d7
files liboctave/Array-idx.h
diffstat 1 files changed, 14 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/liboctave/Array-idx.h	Sat Oct 12 05:37:00 1996 +0000
+++ b/liboctave/Array-idx.h	Sat Oct 12 17:41:42 1996 +0000
@@ -63,6 +63,19 @@
   idx_vector *tmp = get_idx ();
   idx_vector idx = tmp[0];
 
+  retval = index (idx);
+
+  clear_index ();
+
+  return retval;
+}
+
+template <class T>
+Array<T>
+Array<T>::index (idx_vector& idx) const
+{
+  Array<T> retval;
+
   int len = length ();
 
   int n = idx.freeze (len, "vector", liboctave_pzo_flag);
@@ -94,10 +107,9 @@
 	    }
 	}
     }
+
   // idx_vector::freeze() printed an error message for us.
 
-  clear_index ();
-
   return retval;
 }