Mercurial > octave-libgccjit
changeset 17907:6a381b9ae055
assert.m: Modify 4 failing %!error tests to accept 3 digit exponents for MinGW.
* scripts/testfun/assert.m: Modify regular expression in %!error block
"expected result" to accept either 2 or 3 digit exponents.
| author | Rik <rik@octave.org> |
|---|---|
| date | Tue, 12 Nov 2013 15:11:17 -0800 |
| parents | c757f5421ecc |
| children | 7df8f5372ea8 |
| files | scripts/testfun/assert.m |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/testfun/assert.m Tue Nov 12 12:22:16 2013 -0800 +++ b/scripts/testfun/assert.m Tue Nov 12 15:11:17 2013 -0800 @@ -405,8 +405,8 @@ %!error <Abs err 1 exceeds tol> assert (3, 4) %!assert (3+eps, 3, eps) %!assert (3, 3+eps, eps) -%!error <Abs err 4.4409e-16 exceeds tol> assert (3+2*eps, 3, eps) -%!error <Abs err 4.4409e-16 exceeds tol> assert (3, 3+2*eps, eps) +%!error <Abs err 4.4409e-0?16 exceeds tol> assert (3+2*eps, 3, eps) +%!error <Abs err 4.4409e-0?16 exceeds tol> assert (3, 3+2*eps, eps) ## vectors %!assert ([1,2,3],[1,2,3]); @@ -443,9 +443,9 @@ ## test relative vs. absolute tolerances %!test assert (0.1+eps, 0.1, 2*eps); -%!error <Rel err 2.2204e-15 exceeds tol> assert (0.1+eps, 0.1, -2*eps); +%!error <Rel err 2.2204e-0?15 exceeds tol> assert (0.1+eps, 0.1, -2*eps); %!test assert (100+100*eps, 100, -2*eps); -%!error <Abs err 2.8422e-14 exceeds tol> assert (100+100*eps, 100, 2*eps); +%!error <Abs err 2.8422e-0?14 exceeds tol> assert (100+100*eps, 100, 2*eps); ## Corner case of relative tolerance with 0 divider %!error <Abs err 2 exceeds tol 0.1> assert (2, 0, -0.1)