Mercurial > hg > octave-nkf
diff src/data.cc @ 9329:67fc970dad7d
improve indexed assignment using indexed numel
author | Jaroslav Hajek <highegg@gmail.com> |
---|---|
date | Wed, 10 Jun 2009 11:31:58 +0200 |
parents | 0d9178575dd7 |
children | c0b104835d0d |
line wrap: on
line diff
--- a/src/data.cc +++ b/src/data.cc @@ -2334,18 +2334,14 @@ @end deftypefn") { octave_value retval; - - if (args.length () == 1) + octave_idx_type nargin = args.length (); + + if (nargin >= 1) { - int numel = args(0).numel (); + octave_idx_type numel = args(0).numel (args.slice (1, nargin-1)); if (! error_state) - { - if (numel < 0) - numel = 0; - retval = numel; - } } else print_usage ();