Mercurial > hg > octave-lojdl
changeset 9086:4218f9515258
Allow sparse logical max/min
author | David Bateman <dbateman@free.fr> |
---|---|
date | Fri, 03 Apr 2009 22:29:53 +0200 |
parents | 136e72b9afa8 |
children | 961410931a4f |
files | src/ChangeLog src/DLD-FUNCTIONS/max.cc |
diffstat | 2 files changed, 9 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2008-04-03 David Bateman <dbateman@free.fr> + + * DLD-FUNCTIONS/max.cc (MINMAX_SPARSE_BODY): Allow sparse boolean + values. + 2009-04-01 Jaroslav Hajek <highegg@gmail.com> * ov-str-mat.cc (default_numeric_conversion_function):
--- a/src/DLD-FUNCTIONS/max.cc +++ b/src/DLD-FUNCTIONS/max.cc @@ -468,10 +468,9 @@ \ if (single_arg && (nargout == 1 || nargout == 0)) \ { \ - if (arg1.type_id () == octave_sparse_matrix::static_type_id ()) \ + if (arg1.is_real_type ()) \ retval(0) = arg1.sparse_matrix_value () .FCN (dim); \ - else if (arg1.type_id () == \ - octave_sparse_complex_matrix::static_type_id ()) \ + else if (arg1.is_complex_type ()) \ retval(0) = arg1.sparse_complex_matrix_value () .FCN (dim); \ else \ gripe_wrong_type_arg (#FCN, arg1); \ @@ -480,10 +479,9 @@ { \ Array2<octave_idx_type> index; \ \ - if (arg1.type_id () == octave_sparse_matrix::static_type_id ()) \ + if (arg1.is_real_type ()) \ retval(0) = arg1.sparse_matrix_value () .FCN (index, dim); \ - else if (arg1.type_id () == \ - octave_sparse_complex_matrix::static_type_id ()) \ + else if (arg1.is_complex_type ()) \ retval(0) = arg1.sparse_complex_matrix_value () .FCN (index, dim); \ else \ gripe_wrong_type_arg (#FCN, arg1); \