Mercurial > octave-nkf

diff liboctave/idx-vector.cc @ 10479:ded9beac7582

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
optimize sparse matrix assembly
author Jaroslav Hajek <highegg@gmail.com>
date Wed, 31 Mar 2010 10:03:55 +0200
parents 739109ef88ee
children 4e64fbbd5c58
line wrap: on
line diff
--- a/liboctave/idx-vector.cc	Tue Mar 30 15:25:54 2010 -0400
+++ b/liboctave/idx-vector.cc	Wed Mar 31 10:03:55 2010 +0200
@@ -215,7 +215,7 @@
 {
   Array<octave_idx_type> retval (dim_vector (1, len));
   for (octave_idx_type i = 0; i < len; i++)
-    retval.xelem (i) = start + len*step;
+    retval.xelem (i) = start + i*step;
 
   return retval;
 }
@@ -994,7 +994,7 @@
 idx_vector::raw (void)
 {
   if (rep->idx_class () != class_vector)
-    *this = as_array ();
+    *this = idx_vector (as_array (), extent (0));
 
   idx_vector_rep * r = dynamic_cast<idx_vector_rep *> (rep);
   assert (r != 0);