Mercurial > octave
changeset 28907:11f1207111c5
maint: Don't use semicolon at end of single-line BIST tests.
* Cell.cc, colamd.cc, mappers.cc, sparse.cc, strfns.cc, sub2ind.cc, tril.cc,
variables.cc, ov-cell.cc, integral3.m, quadv.m, import.m, isosurface.m,
betainc.m, cosint.m, gammainc.m, native2unicode.m, bug-50014.tst,
package-function.tst, static-method.tst, func.tst, if.tst, bug-51725.tst,
mk-sparse-tst.sh, nest.tst, pkg.tst:
Delete semicolon from end of %!assert, %!error, %!warning
single-line BIST tests.
author | Rik <rik@octave.org> |
---|---|
date | Tue, 13 Oct 2020 14:23:39 -0700 |
parents | 1e28d487f0c1 |
children | 1572a4329015 |
files | libinterp/corefcn/Cell.cc libinterp/corefcn/colamd.cc libinterp/corefcn/mappers.cc libinterp/corefcn/sparse.cc libinterp/corefcn/strfns.cc libinterp/corefcn/sub2ind.cc libinterp/corefcn/tril.cc libinterp/corefcn/variables.cc libinterp/octave-value/ov-cell.cc scripts/general/integral3.m scripts/general/quadv.m scripts/path/import.m scripts/plot/draw/isosurface.m scripts/specfun/betainc.m scripts/specfun/cosint.m scripts/specfun/gammainc.m scripts/strings/native2unicode.m test/bug-50014/bug-50014.tst test/fcn-handle/package-function.tst test/fcn-handle/static-method.tst test/func.tst test/if.tst test/mex/bug-51725.tst test/mk-sparse-tst.sh test/nest/nest.tst test/pkg/pkg.tst |
diffstat | 26 files changed, 81 insertions(+), 81 deletions(-) [+] |
line wrap: on
line diff
--- a/libinterp/corefcn/Cell.cc Tue Oct 13 13:55:09 2020 -0700 +++ b/libinterp/corefcn/Cell.cc Tue Oct 13 14:23:39 2020 -0700 @@ -234,7 +234,7 @@ %% This behavior is required for Matlab compatibility. %!shared a %! a = {"foo", "bar"}; -%!assert (a(), a); +%!assert (a(), a) %!error <invalid empty index expression> a{} */
--- a/libinterp/corefcn/colamd.cc Tue Oct 13 13:55:09 2020 -0700 +++ b/libinterp/corefcn/colamd.cc Tue Oct 13 14:23:39 2020 -0700 @@ -772,10 +772,10 @@ } /* -%!assert (etree (sparse ([1,2], [1,2], [1,1], 2, 2)), [0, 0]); -%!assert (etree (sparse ([1,2], [1,2], [true, true], 2, 2)), [0, 0]); -%!assert (etree (sparse ([1,2], [1,2], [i,i], 2, 2)), [0, 0]); -%!assert (etree (gallery ("poisson", 16)), [2:256, 0]); +%!assert (etree (sparse ([1,2], [1,2], [1,1], 2, 2)), [0, 0]) +%!assert (etree (sparse ([1,2], [1,2], [true, true], 2, 2)), [0, 0]) +%!assert (etree (sparse ([1,2], [1,2], [i,i], 2, 2)), [0, 0]) +%!assert (etree (gallery ("poisson", 16)), [2:256, 0]) %!error etree () %!error etree (1, 2, 3)
--- a/libinterp/corefcn/mappers.cc Tue Oct 13 13:55:09 2020 -0700 +++ b/libinterp/corefcn/mappers.cc Tue Oct 13 14:23:39 2020 -0700 @@ -1216,7 +1216,7 @@ %! result(double ("0":"9") + 1) = true; %! result(double ("a":"z") + 1) = true; %! assert (isalnum (charset), result); -%!assert (isalnum(["Ä8Aa?"; "(Uß ;"]), logical ([1 1 1 1 1 0; 0 1 1 1 0 0])); +%!assert (isalnum(["Ä8Aa?"; "(Uß ;"]), logical ([1 1 1 1 1 0; 0 1 1 1 0 0])) %!error isalnum () %!error isalnum (1, 2) @@ -1245,7 +1245,7 @@ %! result(double ("A":"Z") + 1) = true; %! result(double ("a":"z") + 1) = true; %! assert (isalpha (charset), result); -%!assert (isalpha("Ä8Aa(Uß ;"), logical ([1 1 0 1 1 0 1 1 1 0 0])); +%!assert (isalpha("Ä8Aa(Uß ;"), logical ([1 1 0 1 1 0 1 1 1 0 0])) %!error isalpha () %!error isalpha (1, 2) @@ -1321,7 +1321,7 @@ %! result = false (1, 128); %! result(double ("0":"9") + 1) = true; %! assert (isdigit (charset), result); -%!assert (isdigit("Ä8Aa(Uß ;"), logical ([0 0 1 0 0 0 0 0 0 0 0])); +%!assert (isdigit("Ä8Aa(Uß ;"), logical ([0 0 1 0 0 0 0 0 0 0 0])) %!error isdigit () %!error isdigit (1, 2) @@ -1388,7 +1388,7 @@ %! result = false (1, 128); %! result(34:127) = true; %! assert (isgraph (charset), result); -%!assert (isgraph("Ä8Aa(Uß ;"), logical ([1 1 1 1 1 1 1 1 1 0 1])); +%!assert (isgraph("Ä8Aa(Uß ;"), logical ([1 1 1 1 1 1 1 1 1 0 1])) %!error isgraph () %!error isgraph (1, 2) @@ -1414,7 +1414,7 @@ %! result = false (1, 128); %! result(double ("a":"z") + 1) = true; %! assert (islower (charset), result); -%!assert (islower("Ä8Aa(Uß ;"), logical ([0 0 0 0 1 0 0 1 1 0 0])); +%!assert (islower("Ä8Aa(Uß ;"), logical ([0 0 0 0 1 0 0 1 1 0 0])) %!error islower () %!error islower (1, 2) @@ -1521,7 +1521,7 @@ %! result = false (1, 128); %! result(33:127) = true; %! assert (isprint (charset), result); -%!assert (isprint("Ä8Aa(Uß ;"), logical ([1 1 1 1 1 1 1 1 1 1 1])); +%!assert (isprint("Ä8Aa(Uß ;"), logical ([1 1 1 1 1 1 1 1 1 1 1])) %!error isprint () %!error isprint (1, 2) @@ -1550,7 +1550,7 @@ %! result(92:97) = true; %! result(124:127) = true; %! assert (ispunct (charset), result); -%!assert (ispunct("Ä8Aa(Uß ;"), logical ([0 0 0 0 0 1 0 0 0 0 1])); +%!assert (ispunct("Ä8Aa(Uß ;"), logical ([0 0 0 0 0 1 0 0 0 0 1])) %!error ispunct () %!error ispunct (1, 2) @@ -1577,7 +1577,7 @@ %! result = false (1, 128); %! result(double (" \f\n\r\t\v") + 1) = true; %! assert (isspace (charset), result); -%!assert (isspace("Ä8Aa(Uß ;"), logical ([0 0 0 0 0 0 0 0 0 1 0])); +%!assert (isspace("Ä8Aa(Uß ;"), logical ([0 0 0 0 0 0 0 0 0 1 0])) %!error isspace () %!error isspace (1, 2) @@ -1603,7 +1603,7 @@ %! result = false (1, 128); %! result(double ("A":"Z") + 1) = true; %! assert (isupper (charset), result); -%!assert (isupper("Ä8Aa(Uß ;"), logical ([1 1 0 1 0 0 1 0 0 0 0])); +%!assert (isupper("Ä8Aa(Uß ;"), logical ([1 1 0 1 0 0 1 0 0 0 0])) %!error isupper () %!error isupper (1, 2) @@ -1631,7 +1631,7 @@ %! result(double ("0":"9") + 1) = true; %! result(double ("a":"f") + 1) = true; %! assert (isxdigit (charset), result); -%!assert (isxdigit("Ä8Aa(Uß ;"), logical ([0 0 1 1 1 0 0 0 0 0 0])); +%!assert (isxdigit("Ä8Aa(Uß ;"), logical ([0 0 1 1 1 0 0 0 0 0 0])) %!error isxdigit () %!error isxdigit (1, 2)
--- a/libinterp/corefcn/sparse.cc Tue Oct 13 13:55:09 2020 -0700 +++ b/libinterp/corefcn/sparse.cc Tue Oct 13 14:23:39 2020 -0700 @@ -242,7 +242,7 @@ /* ## Tests for sparse constructor are in test/sparse.tst -%!assert (1); +%!assert (1) */ DEFUN (spalloc, args, ,
--- a/libinterp/corefcn/strfns.cc Tue Oct 13 13:55:09 2020 -0700 +++ b/libinterp/corefcn/strfns.cc Tue Oct 13 14:23:39 2020 -0700 @@ -1038,7 +1038,7 @@ } /* -%!assert (unicode_idx (["aäou"; "Ä∞"]), [1 2 2 3 4; 5 5 6 6 6]); +%!assert (unicode_idx (["aäou"; "Ä∞"]), [1 2 2 3 4; 5 5 6 6 6]) */ DEFUN (__u8_validate__, args, , @@ -1112,7 +1112,7 @@ %!assert (newline (), "\n") %!error newline (1) -%!error [a, b] = newline (); +%!error [a, b] = newline () */ DEFUN (list_in_columns, args, ,
--- a/libinterp/corefcn/sub2ind.cc Tue Oct 13 13:55:09 2020 -0700 +++ b/libinterp/corefcn/sub2ind.cc Tue Oct 13 14:23:39 2020 -0700 @@ -313,7 +313,7 @@ %! r = ind2sub ([2, 2, 2], 1:8); %! assert (r, 1:8); -%!error <DIMS must contain integers> ind2sub ([2, -2], 3); -%!error <index out of range> ind2sub ([2, 2, 2], 1:9); -%!error <invalid index> ind2sub ([2, 2, 2], -1:8); +%!error <DIMS must contain integers> ind2sub ([2, -2], 3) +%!error <index out of range> ind2sub ([2, 2, 2], 1:9) +%!error <invalid index> ind2sub ([2, 2, 2], -1:8) */
--- a/libinterp/corefcn/tril.cc Tue Oct 13 13:55:09 2020 -0700 +++ b/libinterp/corefcn/tril.cc Tue Oct 13 14:23:39 2020 -0700 @@ -441,16 +441,16 @@ %! lm3 = [0, 0, 0; 0, 0, 0; 0, 0, 0; 10, 0, 0]; %! lm4 = [0, 0, 0; 0, 0, 0; 0, 0, 0; 0, 0, 0]; %! -%!assert (tril (a, 3), l2); -%!assert (tril (a, 2), l2); -%!assert (tril (a, 1), l1); -%!assert (tril (a, 0), l0); -%!assert (tril (a), l0); -%!assert (tril (a, -1), lm1); -%!assert (tril (a, -2), lm2); -%!assert (tril (a, -3), lm3); -%!assert (tril (a, -4), lm4); -%!assert (tril (a, -5), lm4); +%!assert (tril (a, 3), l2) +%!assert (tril (a, 2), l2) +%!assert (tril (a, 1), l1) +%!assert (tril (a, 0), l0) +%!assert (tril (a), l0) +%!assert (tril (a, -1), lm1) +%!assert (tril (a, -2), lm2) +%!assert (tril (a, -3), lm3) +%!assert (tril (a, -4), lm4) +%!assert (tril (a, -5), lm4) %!shared a, u3, u2, u1, u0, um1, um2, um3 %! @@ -464,16 +464,16 @@ %! um2 = [1, 2, 3; 4, 5, 6; 7, 8, 9; 0, 11, 12]; %! um3 = [1, 2, 3; 4, 5, 6; 7, 8, 9; 10, 11, 12]; %! -%!assert (triu (a, 4), u3); -%!assert (triu (a, 3), u3); -%!assert (triu (a, 2), u2); -%!assert (triu (a, 1), u1); -%!assert (triu (a, 0), u0); -%!assert (triu (a), u0); -%!assert (triu (a, -1), um1); -%!assert (triu (a, -2), um2); -%!assert (triu (a, -3), um3); -%!assert (triu (a, -4), um3); +%!assert (triu (a, 4), u3) +%!assert (triu (a, 3), u3) +%!assert (triu (a, 2), u2) +%!assert (triu (a, 1), u1) +%!assert (triu (a, 0), u0) +%!assert (triu (a), u0) +%!assert (triu (a, -1), um1) +%!assert (triu (a, -2), um2) +%!assert (triu (a, -3), um3) +%!assert (triu (a, -4), um3) %!error tril () %!error triu ()
--- a/libinterp/corefcn/variables.cc Tue Oct 13 13:55:09 2020 -0700 +++ b/libinterp/corefcn/variables.cc Tue Oct 13 14:23:39 2020 -0700 @@ -492,10 +492,10 @@ %! end_unwind_protect %! assert (exist (fullfile (pwd (), "%nonexistentfile%"), "file"), 0); -%!assert (exist ("fftw"), 3); -%!assert (exist ("fftw.oct"), 3); -%!assert (exist ("fftw", "file"), 3); -%!assert (exist ("fftw", "builtin"), 0); +%!assert (exist ("fftw"), 3) +%!assert (exist ("fftw.oct"), 3) +%!assert (exist ("fftw", "file"), 3) +%!assert (exist ("fftw", "builtin"), 0) %!assert (exist ("sin"), 5) %!assert (exist ("sin", "builtin"), 5)
--- a/libinterp/octave-value/ov-cell.cc Tue Oct 13 13:55:09 2020 -0700 +++ b/libinterp/octave-value/ov-cell.cc Tue Oct 13 14:23:39 2020 -0700 @@ -1275,7 +1275,7 @@ /* ## This might work on some system someday, but for now, who has a system ## where a 16 yottabyte array can be allocated? See bug #50934. -%!error <out of memory> cell (1e24, 1); +%!error <out of memory> cell (1e24, 1) */ DEFUN (iscellstr, args, ,
--- a/scripts/general/integral3.m Tue Oct 13 13:55:09 2020 -0700 +++ b/scripts/general/integral3.m Tue Oct 13 14:23:39 2020 -0700 @@ -286,10 +286,10 @@ %!shared f %! f = @(x, y, z) x .* y .* z; -%!assert (integral3 (f, 0, 1, 0, 1, 0, 1), 0.125, 1e-10); -%!assert (integral3 (f, 0, 1, 0, 1, 0, 1, "method", "tiled"), 0.125, 1e-10); -%!assert (integral3 (f, 0, 1, 0, 1, 0, 1, "method", "iterated"), 0.125, 1e-10); -%!assert (integral3 (f, 0, 1, 0, 1, 0, 1, "method", "auto"), 0.125, 1e-10); +%!assert (integral3 (f, 0, 1, 0, 1, 0, 1), 0.125, 1e-10) +%!assert (integral3 (f, 0, 1, 0, 1, 0, 1, "method", "tiled"), 0.125, 1e-10) +%!assert (integral3 (f, 0, 1, 0, 1, 0, 1, "method", "iterated"), 0.125, 1e-10) +%!assert (integral3 (f, 0, 1, 0, 1, 0, 1, "method", "auto"), 0.125, 1e-10) ## vectorized = false test %!test
--- a/scripts/general/quadv.m Tue Oct 13 13:55:09 2020 -0700 +++ b/scripts/general/quadv.m Tue Oct 13 14:23:39 2020 -0700 @@ -210,7 +210,7 @@ %!assert (quadv (@sin, 0, pi), 2, 1e-6) ## Test weak singularities at the edge -%!assert (quadv (@(x) 1 ./ sqrt (x), 0, 1), 2, 15*1e-6); +%!assert (quadv (@(x) 1 ./ sqrt (x), 0, 1), 2, 15*1e-6) ## Test vector-valued functions %!assert (quadv (@(x) [(sin (x)), (sin (2 * x))], 0, pi), [2, 0], 1e-6)
--- a/scripts/path/import.m Tue Oct 13 13:55:09 2020 -0700 +++ b/scripts/path/import.m Tue Oct 13 14:23:39 2020 -0700 @@ -65,4 +65,4 @@ endfunction -%!error <not yet implemented> import ("foobar"); +%!error <not yet implemented> import ("foobar")
--- a/scripts/plot/draw/isosurface.m Tue Oct 13 13:55:09 2020 -0700 +++ b/scripts/plot/draw/isosurface.m Tue Oct 13 14:23:39 2020 -0700 @@ -592,9 +592,9 @@ %! [xx, yy, zz] = meshgrid (x, y, z); %! fvc = isosurface (xx, yy, zz, val, iso); %!error <ISOVAL must be a scalar> fvc = isosurface (val, [iso iso], yy) -%!error <COL must match the size of V> fvc = isosurface (val, [iso iso]); +%!error <COL must match the size of V> fvc = isosurface (val, [iso iso]) %!error <COL must be passed to return C> [f, v, c] = isosurface (val, iso) -%!warning <colors will be calculated, but no output argument to receive it.> +%!warning <colors will be calculated, but no output argument to receive it> %! [f, v] = isosurface (val, iso, yy); ## test for __calc_isovalue_from_data__
--- a/scripts/specfun/betainc.m Tue Oct 13 13:55:09 2020 -0700 +++ b/scripts/specfun/betainc.m Tue Oct 13 14:23:39 2020 -0700 @@ -205,12 +205,12 @@ %! y_ex = [0.999999999999989; 0.999999999999992; 0.999999999999995]; %! assert (y, y_ex, -1e-14); -%!assert (betainc (0.001, 20, 30), 2.750687665855991e-47, -3e-14); -%!assert (betainc (0.0001, 20, 30), 2.819953178893307e-67, -7e-14); -%!assert <*54383> (betainc (0.99, 20, 30, "upper"), 1.5671643161872703e-47, -7e-14); -%!assert (betainc (0.999, 20, 30, "upper"), 1.850806276141535e-77, -7e-14); -%!assert (betainc (0.5, 200, 300), 0.9999964565197356, -1e-15); -%!assert (betainc (0.5, 200, 300, "upper"), 3.54348026439253e-06, -3e-13); +%!assert (betainc (0.001, 20, 30), 2.750687665855991e-47, -3e-14) +%!assert (betainc (0.0001, 20, 30), 2.819953178893307e-67, -7e-14) +%!assert <*54383> (betainc (0.99, 20, 30, "upper"), 1.5671643161872703e-47, -7e-14) +%!assert (betainc (0.999, 20, 30, "upper"), 1.850806276141535e-77, -7e-14) +%!assert (betainc (0.5, 200, 300), 0.9999964565197356, -1e-15) +%!assert (betainc (0.5, 200, 300, "upper"), 3.54348026439253e-06, -3e-13) ## Test trivial values %!test
--- a/scripts/specfun/cosint.m Tue Oct 13 13:55:09 2020 -0700 +++ b/scripts/specfun/cosint.m Tue Oct 13 14:23:39 2020 -0700 @@ -161,7 +161,7 @@ endfunction -%!assert (cosint (1.1), 0.38487337742465081550, 2 * eps); +%!assert (cosint (1.1), 0.38487337742465081550, 2 * eps) %!test %! x = [2, 3, pi; exp(1), 5, 6];
--- a/scripts/specfun/gammainc.m Tue Oct 13 13:55:09 2020 -0700 +++ b/scripts/specfun/gammainc.m Tue Oct 13 14:23:39 2020 -0700 @@ -478,9 +478,9 @@ %! -2.9582761911890713293e7-1i * 9.612022339061679758e6, -30*eps) %!assert (gammainc (-10, 10, "upper"), -3.112658165341493126871616e7, ... %! -2*eps) -%!assert (gammainc (-10, 10, "scaledlower"), 0.5128019364747265, -1e-14); -%!assert (gammainc (-10, 10, "scaledupper"), -0.5128019200000000, -1e-14); -%!assert (gammainc (200, 201, "upper"), 0.518794309678684497, -2 * eps); +%!assert (gammainc (-10, 10, "scaledlower"), 0.5128019364747265, -1e-14) +%!assert (gammainc (-10, 10, "scaledupper"), -0.5128019200000000, -1e-14) +%!assert (gammainc (200, 201, "upper"), 0.518794309678684497, -2 * eps) %!assert (gammainc (200, 201, "scaledupper"), %! 18.4904360746560462660798514, -eps) ## Here we are very good (no D (x,a)) involved
--- a/scripts/strings/native2unicode.m Tue Oct 13 13:55:09 2020 -0700 +++ b/scripts/strings/native2unicode.m Tue Oct 13 14:23:39 2020 -0700 @@ -88,9 +88,9 @@ %! assert (double (native2unicode ([164:166 0 167:170], 'ISO-8859-5')), %! [208 132 208 133 208 134 0 208 135 208 136 208 137 208 138]); -%!assert (native2unicode ("foobar"), "foobar"); +%!assert (native2unicode ("foobar"), "foobar") %!assert <*54384> (double (native2unicode ([0 0 120.3 0 0 122.6 0 0])), -%! [0 0 120 0 0 123 0 0]); +%! [0 0 120 0 0 123 0 0]) %!error <Invalid call> native2unicode () %!error <called with too many inputs> native2unicode (1, 'ISO-8859-1', 'test')
--- a/test/bug-50014/bug-50014.tst Tue Oct 13 13:55:09 2020 -0700 +++ b/test/bug-50014/bug-50014.tst Tue Oct 13 14:23:39 2020 -0700 @@ -26,7 +26,7 @@ %!error <duplicate subfunction or nested function name> %! duplicate_nested_function () -%!assert (duplicate_nested_in_subfunction_ok (), 3); +%!assert (duplicate_nested_in_subfunction_ok (), 3) %!error <duplicate subfunction or nested function name> %! duplicate_nested_parent_function () @@ -52,4 +52,4 @@ %!error <duplicate subfunction or nested function name> %! duplicate_subfunction_old_syntax () -%!assert (duplicate_subfunction_separate_scope_ok (), 3); +%!assert (duplicate_subfunction_separate_scope_ok (), 3)
--- a/test/fcn-handle/package-function.tst Tue Oct 13 13:55:09 2020 -0700 +++ b/test/fcn-handle/package-function.tst Tue Oct 13 14:23:39 2020 -0700 @@ -33,4 +33,4 @@ ## Also test without function handle. %!assert <*55975> (pkga.pkgb.f1 (), "pkg f1"); -%!assert (pkga.pkgb.f2 (), "pkg f2"); +%!assert (pkga.pkgb.f2 (), "pkg f2")
--- a/test/fcn-handle/static-method.tst Tue Oct 13 13:55:09 2020 -0700 +++ b/test/fcn-handle/static-method.tst Tue Oct 13 14:23:39 2020 -0700 @@ -33,4 +33,4 @@ ## Also test without function handle. %!assert <*55975> (pkga.pkgb.bug51709_a.smeth (), "pkg bug51709_a"); -%!assert (pkga.pkgb.bug51709_b.smeth (), "pkg bug51709_b"); +%!assert (pkga.pkgb.bug51709_b.smeth (), "pkg bug51709_b")
--- a/test/func.tst Tue Oct 13 13:55:09 2020 -0700 +++ b/test/func.tst Tue Oct 13 14:23:39 2020 -0700 @@ -211,8 +211,8 @@ %! retval = in1; %!endfunction -%!error <can't make function parameter retval persistent> __fnpersist1__ (1); -%!error <can't make function parameter in1 persistent> __fnpersist2__ (1); +%!error <can't make function parameter retval persistent> __fnpersist1__ (1) +%!error <can't make function parameter in1 persistent> __fnpersist2__ (1) ## Check nargin, nargout validation by interpreter %!function __fn_nargout0__ (in1)
--- a/test/if.tst Tue Oct 13 13:55:09 2020 -0700 +++ b/test/if.tst Tue Oct 13 14:23:39 2020 -0700 @@ -107,15 +107,15 @@ %! assert (x, 13); ## test "is_true" of different data types -%!error diag (NaN) || 0; +%!error diag (NaN) || 0 %!test %! d1 = diag ([]) || 0; %! d2 = diag (1) || 0; %! d3 = diag ([1 2]) || 0; %! assert ([d1 d2 d3], [false true false]); -%!error sparse (NaN) || 0; -%!error sparse ([1 1 ; 1 NaN]) || 0; +%!error sparse (NaN) || 0 +%!error sparse ([1 1 ; 1 NaN]) || 0 %!test %! s1 = sparse ([]) || 0; %! s2 = sparse (1) || 0;
--- a/test/mex/bug-51725.tst Tue Oct 13 13:55:09 2020 -0700 +++ b/test/mex/bug-51725.tst Tue Oct 13 14:23:39 2020 -0700 @@ -24,4 +24,4 @@ ######################################################################## %!assert (bug_51725 (), []) -%!error <element number 2 undefined in return list> [x,y,z] = bug_51725 (); +%!error <element number 2 undefined in return list> [x,y,z] = bug_51725 ()
--- a/test/mk-sparse-tst.sh Tue Oct 13 13:55:09 2020 -0700 +++ b/test/mk-sparse-tst.sh Tue Oct 13 14:23:39 2020 -0700 @@ -216,7 +216,7 @@ %!assert (nnz (sparse (1,1,0)), 0) %!assert (nnz (sparse (eye (3))*0), 0) %!assert (nnz (sparse (eye (3))-sparse (eye (3))), 0) -%!assert (full (sparse (eye (3))/0), full (eye (3)/0)); +%!assert (full (sparse (eye (3))/0), full (eye (3)/0)) EOF } @@ -576,8 +576,8 @@ %!assert (as', sparse (af')) %!assert (-as, sparse (-af)) %!assert (!as, sparse (!af)) -%!error [i,j] = size (af);as(i-1,j+1); -%!error [i,j] = size (af);as(i+1,j-1); +%!error [i,j] = size (af);as(i-1,j+1) +%!error [i,j] = size (af);as(i+1,j-1) %!test %! [Is,Js,Vs] = find (as); %! [If,Jf,Vf] = find (af);
--- a/test/nest/nest.tst Tue Oct 13 13:55:09 2020 -0700 +++ b/test/nest/nest.tst Tue Oct 13 14:23:39 2020 -0700 @@ -156,5 +156,5 @@ %! assert (observed, [1, 2, 1, 3, 2]); ## Test visibility of nested function from script called from parent. -%!assert (script_nest_2 (42), 84); +%!assert (script_nest_2 (42), 84) %!error script_nest_2 (0)
--- a/test/pkg/pkg.tst Tue Oct 13 13:55:09 2020 -0700 +++ b/test/pkg/pkg.tst Tue Oct 13 14:23:39 2020 -0700 @@ -116,7 +116,7 @@ %! end_unwind_protect %! endfor %! -%!error <package foobar is not installed> pkg ("load", "foobar"); +%!error <package foobar is not installed> pkg ("load", "foobar") # -nodeps ## FIXME: Need test