# HG changeset patch # User Jaroslav Hajek # Date 1223040718 -7200 # Node ID 01cad2a83492a2eb84ca35dba0f99cd096b1b93d # Parent 78cf5edb69cedfc3f5a98514c74c9325de0e56a9 fix tests diff -r 78cf5edb69ce -r 01cad2a83492 test/test_poly.m --- 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 [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])));