[PATCH] Fix error in fdim/f for infinities
Corinna Vinschen
vinschen@redhat.com
Tue Mar 10 14:47:14 GMT 2020
On Mar 10 11:24, Fabian Schriever wrote:
> The comparison c == FP_INFINITE causes the function to return +inf as it
> expects x = +inf to always be larger than y. This shortcut causes
> several issues as it also returns +inf for the following cases:
> - fdim(+inf, +inf), expected (as per C99): +0.0
> - fdim(-inf, any non NaN), expected: +0.0
>
> I don't see a reason to keep the comparison as all the infinity cases
> return the correct result using just the ternary operation.
> ---
> newlib/libm/common/s_fdim.c | 5 +----
> newlib/libm/common/sf_fdim.c | 5 +----
> 2 files changed, 2 insertions(+), 8 deletions(-)
>
> diff --git a/newlib/libm/common/s_fdim.c b/newlib/libm/common/s_fdim.c
> index 73a027953..61a4908f3 100644
> --- a/newlib/libm/common/s_fdim.c
> +++ b/newlib/libm/common/s_fdim.c
> @@ -49,11 +49,8 @@ ANSI C, POSIX.
> double y;
> #endif
> {
> - int c = __fpclassifyd(x);
> - if (c == FP_NAN) return(x);
> + if (__fpclassifyd(x) == FP_NAN) return(x);
> if (__fpclassifyd(y) == FP_NAN) return(y);
> - if (c == FP_INFINITE)
> - return HUGE_VAL;
>
> return x > y ? x - y : 0.0;
> }
> diff --git a/newlib/libm/common/sf_fdim.c b/newlib/libm/common/sf_fdim.c
> index fe349098b..8fee57002 100644
> --- a/newlib/libm/common/sf_fdim.c
> +++ b/newlib/libm/common/sf_fdim.c
> @@ -14,11 +14,8 @@
> float y;
> #endif
> {
> - int c = __fpclassifyf(x);
> - if (c == FP_NAN) return(x);
> + if (__fpclassifyf(x) == FP_NAN) return(x);
> if (__fpclassifyf(y) == FP_NAN) return(y);
> - if (c == FP_INFINITE)
> - return HUGE_VALF;
>
> return x > y ? x - y : 0.0;
> }
> --
> 2.24.1.windows.2
>
Pushed.
Thanks,
Corinna
--
Corinna Vinschen
Cygwin Maintainer
Red Hat
-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 833 bytes
Desc: not available
URL: <http://sourceware.org/pipermail/newlib/attachments/20200310/1a16707b/attachment.sig>
More information about the Newlib
mailing list