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