Mercurial > hg > octave-nkf
changeset 20266:df3244834a50
fix tests now that assert ([]) fails
* uimenu.m: Fix test now that FLTK menu bar doesn't have a Help menu.
* isbanded.m: Fix test for [] result to actually test for [].
| author | John W. Eaton <jwe@octave.org> |
|---|---|
| date | Thu, 09 Apr 2015 16:36:56 -0400 |
| parents | 438485f6a479 |
| children | e10ad5214a59 |
| files | scripts/gui/uimenu.m scripts/linear-algebra/isbanded.m |
| diffstat | 2 files changed, 2 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/gui/uimenu.m +++ b/scripts/gui/uimenu.m @@ -119,7 +119,7 @@ %! graphics_toolkit (toolkit); %! end_unwind_protect -## check for top level menus file, edit, and help +## check for top level menus file and edit %!testif HAVE_FLTK %! toolkit = graphics_toolkit ("fltk"); %! hf = figure ("visible", "off"); @@ -128,8 +128,6 @@ %! assert (ishghandle (uif)); %! uie = findall (hf, "label", "&edit"); %! assert (ishghandle (uie)); -%! uih = findall (hf, "label", "&help"); -%! assert (ishghandle (uih)); %! unwind_protect_cleanup %! close (hf); %! graphics_toolkit (toolkit);
--- a/scripts/linear-algebra/isbanded.m +++ b/scripts/linear-algebra/isbanded.m @@ -58,7 +58,7 @@ %!assert (! isbanded ("string", 0, 0)) %!assert (! isbanded (zeros (2,2,2), 0, 0)) -%!assert (isbanded ([], 0, 0)) +%!assert (isbanded ([], 0, 0), []) %!assert (isbanded (1,0,0)) %!assert (isbanded (1,10,10))