Mercurial > octave-nkf
changeset 11866:01cad2a83492 release-3-0-x
fix tests
author | Jaroslav Hajek <highegg@gmail.com> |
---|---|
date | Fri, 03 Oct 2008 15:31:58 +0200 |
parents | 78cf5edb69ce |
children | db621daaafaf |
files | test/test_poly.m |
diffstat | 1 files changed, 3 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/test/test_poly.m Fri Oct 03 14:56:33 2008 +0200 +++ b/test/test_poly.m Fri Oct 03 15:31:58 2008 +0200 @@ -37,7 +37,7 @@ %!error compan ([]); %% test/octave.test/poly/conv-1.m -%!assert(all (all (conv (ones (3, 1), ones (3, 1)) == [1, 2, 3, 2, 1]))); +%!assert(all (all (conv (ones (3, 1), ones (3, 1)) == [1, 2, 3, 2, 1].'))); %% test/octave.test/poly/conv-2.m %!assert(all (all (conv (ones (1, 3), ones (3, 1)) == [1, 2, 3, 2, 1]))); @@ -62,19 +62,16 @@ %% test/octave.test/poly/deconv-2.m %!test %! [b, r] = deconv ([3, 6], [1, 2, 3]); -%! assert(b == 0 && all (all (r == [0, 3, 6]))); +%! assert(b == 0 && all (all (r == [3, 6]))); %% test/octave.test/poly/deconv-3.m %!test %! [b, r] = deconv ([3, 6], [1; 2; 3]); -%! assert(b == 0 && all (all (r == [0, 3, 6]))); +%! assert(b == 0 && all (all (r == [3, 6]))); %% test/octave.test/poly/deconv-4.m %!error [b, r] = deconv ([3, 6], [1, 2; 3, 4]);; -%% test/octave.test/poly/deconv-5.m -%!error <number of rows must match> [b, r] = deconv ([3; 6], [1, 2, 3]); - %% test/octave.test/poly/poly-1.m %!assert(all (all (poly ([1, 2, 3]) == [1, -6, 11, -6])));