Mercurial > hg > octave-lyh
diff src/ov-cx-sparse.cc @ 10512:aac9f4265048
rewrite sparse indexed assignment
author | Jaroslav Hajek <highegg@gmail.com> |
---|---|
date | Tue, 13 Apr 2010 12:36:21 +0200 |
parents | 57a59eae83cc |
children | b4d2080b6df7 |
line wrap: on
line diff
--- a/src/ov-cx-sparse.cc +++ b/src/ov-cx-sparse.cc @@ -101,25 +101,6 @@ return retval; } -void -octave_sparse_complex_matrix::assign (const octave_value_list& idx, - const SparseComplexMatrix& rhs) -{ - octave_base_sparse<SparseComplexMatrix>::assign (idx, rhs); -} - -void -octave_sparse_complex_matrix::assign (const octave_value_list& idx, - const SparseMatrix& rhs) -{ - int len = idx.length (); - - for (int i = 0; i < len; i++) - matrix.set_index (idx(i).index_vector ()); - - ::assign (matrix, rhs); -} - double octave_sparse_complex_matrix::double_value (bool force_conversion) const {