# HG changeset patch # User Rik # Date 1382109592 25200 # Node ID 279d4bde41d53fdb92d97fef6d26b9965c315834 # Parent 93e272018df26335dc8fac843fa7212c29431d82 skewness.m: Correct %!test for "divide-by-zero" * scripts/statistics/base/skewness.m: Turn on "divide-by-zero" warning before starting test. diff -r 93e272018df2 -r 279d4bde41d5 scripts/statistics/base/skewness.m --- a/scripts/statistics/base/skewness.m Fri Oct 18 01:36:31 2013 +0200 +++ b/scripts/statistics/base/skewness.m Fri Oct 18 08:19:52 2013 -0700 @@ -148,9 +148,10 @@ %!assert (skewness (single ([1:5 10])), single (1.0513283), eps ("single")) %!assert (skewness (single ([1 2]), 0), single (NaN)) -## Verify no "division-by-zero" warnings +## Verify no "divide-by-zero" warnings %!test %! wstate = warning ("query", "Octave:divide-by-zero"); +%! warning ("on", "Octave:divide-by-zero"); %! unwind_protect %! lastwarn (""); # clear last warning %! skewness (1);