Mercurial > octave
changeset 28687:d150180e41e0
maint: merge stable to default.
author | Markus Mützel <markus.muetzel@gmx.de> |
---|---|
date | Fri, 04 Sep 2020 13:32:25 +0200 |
parents | 65fde9fe3b60 (current diff) 22a85c6c1de7 (diff) |
children | 2cf0d03afdd4 |
files | |
diffstat | 1 files changed, 8 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/libinterp/corefcn/mappers.cc Fri Aug 28 16:06:32 2020 +0200 +++ b/libinterp/corefcn/mappers.cc Fri Sep 04 13:32:25 2020 +0200 @@ -133,10 +133,10 @@ %! v = [0, pi, pi/2, pi/2]; %! assert (real (acos (x)), v); -%!xtest <*52627> +%!xtest <52627> %! ## Same test code as above, but intended only for test statistics on Mac and %! ## Windows. Their trig/hyperbolic functions have huge tolerances. -%! if (! ismac ()), return; endif +%! if (! ismac () && ! ispc ()), return; endif %! x = [1, -1, i, -i] .* 1e150; %! v = [0, pi, pi/2, pi/2]; %! assert (real (acos (x)), v); @@ -208,10 +208,10 @@ %! v = [0, pi, pi/2, -pi/2]; %! assert (imag (acosh (x)), v); -%!xtest <*52627> +%!xtest <52627> %! ## Same test code as above, but intended only for test statistics on Mac and %! ## Windows. Their trig/hyperbolic functions have huge tolerances. -%! if (! ismac ()), return; endif +%! if (! ismac () && ! ispc ()), return; endif %! x = [1, -1, i, -i] .* 1e150; %! v = [0, pi, pi/2, -pi/2]; %! assert (imag (acosh (x)), v); @@ -336,10 +336,10 @@ %! v = [pi/2, -pi/2, 0, -0]; %! assert (real (asin (x)), v); -%!xtest <*52627> +%!xtest <52627> %! ## Same test code as above, but intended only for test statistics on Mac and %! ## Windows. Their trig/hyperbolic functions have huge tolerances. -%! if (! ismac ()), return; endif +%! if (! ismac () && ! ispc ()), return; endif %! x = [1, -1, i, -i] .* 1e150; %! v = [pi/2, -pi/2, 0, -0]; %! assert (real (asin (x)), v); @@ -379,10 +379,10 @@ %! v = [0, 0, pi/2, -pi/2]; %! assert (imag (asinh (x)), v); -%!xtest <*52627> +%!xtest <52627> %! ## Same test code as above, but intended only for test statistics on Mac and %! ## Windows. Their trig/hyperbolic functions have huge tolerances. -%! if (! ismac ()), return; endif +%! if (! ismac () && ! ispc ()), return; endif %! x = [1, -1, i, -i] .* 1e150; %! v = [0, 0, pi/2, -pi/2]; %! assert (imag (asinh (x)), v);