Mercurial > octave-nkf
changeset 11359:e4ba3cb2d27e
isfield: Additional test for cellstring of field names
| author | Rik <octave@nomad.inbox5.com> |
|---|---|
| date | Mon, 13 Dec 2010 22:02:44 -0800 |
| parents | f5ee3e6e9266 |
| children | 2b03258c240b |
| files | src/ChangeLog src/ov-struct.cc |
| diffstat | 2 files changed, 10 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Mon Dec 13 20:58:10 2010 -0800 +++ b/src/ChangeLog Mon Dec 13 22:02:44 2010 -0800 @@ -1,3 +1,7 @@ +2010-12-13 Rik <octave@nomad.inbox5.com> + + * ov-struct.cc (isfield): Additional test for cellstring of field names. + 2010-12-13 Rik <octave@nomad.inbox5.com> * data.cc (mod): Additional tests for mod with non-integer real values.
--- a/src/ov-struct.cc Mon Dec 13 20:58:10 2010 -0800 +++ b/src/ov-struct.cc Mon Dec 13 22:02:44 2010 -0800 @@ -2024,12 +2024,12 @@ %!# test isfield %!test %! x(3).d=1; x(2).a=2; x(1).b=3; x(2).c=3; -%! assert (isfield (x, "b")); -%!assert( isfield( struct("a", "1"), "a")); -%!assert( isfield( {1}, "c"), logical (0)); -%!assert( isfield( struct("a", "1"), 10), logical (0)); -%!assert( isfield( struct("a", "b"), "a "), logical (0)); - +%! assert (isfield (x, 'b')); +%!assert (isfield (struct('a', '1'), 'a')); +%!assert (isfield ({1}, 'c'), false); +%!assert (isfield (struct('a', '1'), 10), false); +%!assert (isfield (struct('a', 'b'), "a "), false); +%!assert (isfield (struct('a', 1, 'b', 2), {'a', 'c'}), [true, false]); */ DEFUN (cell2struct, args, ,