Mercurial > hg > octave-nkf
diff liboctave/sparse-sort.cc @ 5603:2c66c36d2698
[project @ 2006-01-31 11:57:47 by dbateman]
author | dbateman |
---|---|
date | Tue, 31 Jan 2006 11:57:47 +0000 |
parents | b4cb3f93c1e1 |
children | 93c65f2a5668 |
line wrap: on
line diff
--- a/liboctave/sparse-sort.cc +++ b/liboctave/sparse-sort.cc @@ -39,7 +39,7 @@ octave_sparse_sidxl_comp (octave_sparse_sort_idxl* i, octave_sparse_sort_idxl* j) { - int tmp = i->c - j->c; + octave_idx_type tmp = i->c - j->c; if (tmp < 0) return true; else if (tmp > 0) @@ -50,6 +50,18 @@ // Instantiate the sparse sorting class template class octave_sort<octave_sparse_sort_idxl *>; +// Need to know the original order of the sorted indexes in +// sparse assignments, and this class does that +bool +octave_idx_vector_comp (octave_idx_vector_sort* i, + octave_idx_vector_sort* j) +{ + return (i->i < j->i); +} + +// Instantiate the sparse index sorting class +template class octave_sort<octave_idx_vector_sort *>; + // Instantiate the sorting class of octave_idx_type, need in MUL macro template class octave_sort<octave_idx_type>;