Mercurial > hg > octave-nkf

diff src/ov-flt-cx-mat.cc @ 8290:7cbe01c21986

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
improve dense array indexing
author Jaroslav Hajek <highegg@gmail.com>
date Mon, 20 Oct 2008 16:54:28 +0200
parents a41df65f3f00
children 8b1a2555c4e2
line wrap: on
line diff
--- a/src/ov-flt-cx-mat.cc
+++ b/src/ov-flt-cx-mat.cc
@@ -108,14 +108,16 @@
 
 void
 octave_float_complex_matrix::assign (const octave_value_list& idx,
-			       const FloatNDArray& rhs)
+                                     const FloatNDArray& rhs)
 {
   octave_idx_type len = idx.length ();
 
+  Array<idx_vector> ra_idx (len);
+
   for (octave_idx_type i = 0; i < len; i++)
-    matrix.set_index (idx(i).index_vector ());
+    ra_idx(i) = idx(i).index_vector ();
 
-  ::assign (matrix, rhs);
+  matrix.assign (ra_idx, rhs);
 }
 
 bool