|
|
7c0489 |
From ce4f299c02be0a06130b70a62aa79b77385f4326 Mon Sep 17 00:00:00 2001
|
|
|
7c0489 |
From: Stefan Liebler <stli@linux.ibm.com>
|
|
|
7c0489 |
Date: Wed, 11 Dec 2019 15:09:26 +0100
|
|
|
7c0489 |
Subject: [PATCH 15/28] Adjust s_rintf.c and s_rintl.c regarding code style.
|
|
|
7c0489 |
|
|
|
7c0489 |
This patch just adjusts the generic implementation regarding code style.
|
|
|
7c0489 |
No functional change.
|
|
|
7c0489 |
|
|
|
7c0489 |
Reviewed-by: Adhemerval Zanella <adhemerval.zanella@linaro.org>
|
|
|
7c0489 |
(cherry picked from commit 99b39a83e72f4b58e2f284fd844622df26b3b5fe)
|
|
|
7c0489 |
---
|
|
|
7c0489 |
sysdeps/ieee754/flt-32/s_rintf.c | 44 +++++++++++++++------------
|
|
|
7c0489 |
sysdeps/ieee754/ldbl-128/s_rintl.c | 49 +++++++++++++++++-------------
|
|
|
7c0489 |
2 files changed, 53 insertions(+), 40 deletions(-)
|
|
|
7c0489 |
|
|
|
7c0489 |
diff --git a/sysdeps/ieee754/flt-32/s_rintf.c b/sysdeps/ieee754/flt-32/s_rintf.c
|
|
|
7c0489 |
index a266b1999e..3463a044e1 100644
|
|
|
7c0489 |
--- a/sysdeps/ieee754/flt-32/s_rintf.c
|
|
|
7c0489 |
+++ b/sysdeps/ieee754/flt-32/s_rintf.c
|
|
|
7c0489 |
@@ -19,7 +19,7 @@
|
|
|
7c0489 |
#include <math-use-builtins.h>
|
|
|
7c0489 |
|
|
|
7c0489 |
float
|
|
|
7c0489 |
-__rintf(float x)
|
|
|
7c0489 |
+__rintf (float x)
|
|
|
7c0489 |
{
|
|
|
7c0489 |
#if USE_RINTF_BUILTIN
|
|
|
7c0489 |
return __builtin_rintf (x);
|
|
|
7c0489 |
@@ -30,25 +30,31 @@ __rintf(float x)
|
|
|
7c0489 |
8.3886080000e+06, /* 0x4b000000 */
|
|
|
7c0489 |
-8.3886080000e+06, /* 0xcb000000 */
|
|
|
7c0489 |
};
|
|
|
7c0489 |
- int32_t i0,j0,sx;
|
|
|
7c0489 |
- float w,t;
|
|
|
7c0489 |
- GET_FLOAT_WORD(i0,x);
|
|
|
7c0489 |
- sx = (i0>>31)&1;
|
|
|
7c0489 |
- j0 = ((i0>>23)&0xff)-0x7f;
|
|
|
7c0489 |
- if(j0<23) {
|
|
|
7c0489 |
- if(j0<0) {
|
|
|
7c0489 |
- w = TWO23[sx]+x;
|
|
|
7c0489 |
- t = w-TWO23[sx];
|
|
|
7c0489 |
- GET_FLOAT_WORD(i0,t);
|
|
|
7c0489 |
- SET_FLOAT_WORD(t,(i0&0x7fffffff)|(sx<<31));
|
|
|
7c0489 |
- return t;
|
|
|
7c0489 |
- }
|
|
|
7c0489 |
- } else {
|
|
|
7c0489 |
- if(j0==0x80) return x+x; /* inf or NaN */
|
|
|
7c0489 |
- else return x; /* x is integral */
|
|
|
7c0489 |
+ int32_t i0, j0, sx;
|
|
|
7c0489 |
+ float w, t;
|
|
|
7c0489 |
+ GET_FLOAT_WORD (i0, x);
|
|
|
7c0489 |
+ sx = (i0 >> 31) & 1;
|
|
|
7c0489 |
+ j0 = ((i0 >> 23) & 0xff) - 0x7f;
|
|
|
7c0489 |
+ if (j0 < 23)
|
|
|
7c0489 |
+ {
|
|
|
7c0489 |
+ if(j0 < 0)
|
|
|
7c0489 |
+ {
|
|
|
7c0489 |
+ w = TWO23[sx] + x;
|
|
|
7c0489 |
+ t = w - TWO23[sx];
|
|
|
7c0489 |
+ GET_FLOAT_WORD (i0, t);
|
|
|
7c0489 |
+ SET_FLOAT_WORD (t, (i0 & 0x7fffffff) | (sx << 31));
|
|
|
7c0489 |
+ return t;
|
|
|
7c0489 |
}
|
|
|
7c0489 |
- w = TWO23[sx]+x;
|
|
|
7c0489 |
- return w-TWO23[sx];
|
|
|
7c0489 |
+ }
|
|
|
7c0489 |
+ else
|
|
|
7c0489 |
+ {
|
|
|
7c0489 |
+ if (j0 == 0x80)
|
|
|
7c0489 |
+ return x + x; /* inf or NaN */
|
|
|
7c0489 |
+ else
|
|
|
7c0489 |
+ return x; /* x is integral */
|
|
|
7c0489 |
+ }
|
|
|
7c0489 |
+ w = TWO23[sx] + x;
|
|
|
7c0489 |
+ return w - TWO23[sx];
|
|
|
7c0489 |
#endif /* ! USE_RINTF_BUILTIN */
|
|
|
7c0489 |
}
|
|
|
7c0489 |
#ifndef __rintf
|
|
|
7c0489 |
diff --git a/sysdeps/ieee754/ldbl-128/s_rintl.c b/sysdeps/ieee754/ldbl-128/s_rintl.c
|
|
|
7c0489 |
index f060503066..260f3aa9b9 100644
|
|
|
7c0489 |
--- a/sysdeps/ieee754/ldbl-128/s_rintl.c
|
|
|
7c0489 |
+++ b/sysdeps/ieee754/ldbl-128/s_rintl.c
|
|
|
7c0489 |
@@ -13,7 +13,7 @@
|
|
|
7c0489 |
* ====================================================
|
|
|
7c0489 |
*/
|
|
|
7c0489 |
|
|
|
7c0489 |
-#if defined(LIBM_SCCS) && !defined(lint)
|
|
|
7c0489 |
+#if defined (LIBM_SCCS) && ! defined (lint)
|
|
|
7c0489 |
static char rcsid[] = "$NetBSD: $";
|
|
|
7c0489 |
#endif
|
|
|
7c0489 |
|
|
|
7c0489 |
@@ -32,7 +32,8 @@ static char rcsid[] = "$NetBSD: $";
|
|
|
7c0489 |
#include <libm-alias-ldouble.h>
|
|
|
7c0489 |
#include <math-use-builtins.h>
|
|
|
7c0489 |
|
|
|
7c0489 |
-_Float128 __rintl(_Float128 x)
|
|
|
7c0489 |
+_Float128
|
|
|
7c0489 |
+__rintl (_Float128 x)
|
|
|
7c0489 |
{
|
|
|
7c0489 |
#if USE_RINTL_BUILTIN
|
|
|
7c0489 |
return __builtin_rintl (x);
|
|
|
7c0489 |
@@ -43,26 +44,32 @@ _Float128 __rintl(_Float128 x)
|
|
|
7c0489 |
5.19229685853482762853049632922009600E+33L, /* 0x406F000000000000, 0 */
|
|
|
7c0489 |
-5.19229685853482762853049632922009600E+33L /* 0xC06F000000000000, 0 */
|
|
|
7c0489 |
};
|
|
|
7c0489 |
- int64_t i0,j0,sx;
|
|
|
7c0489 |
- uint64_t i1 __attribute__ ((unused));
|
|
|
7c0489 |
- _Float128 w,t;
|
|
|
7c0489 |
- GET_LDOUBLE_WORDS64(i0,i1,x);
|
|
|
7c0489 |
- sx = (((uint64_t)i0)>>63);
|
|
|
7c0489 |
- j0 = ((i0>>48)&0x7fff)-0x3fff;
|
|
|
7c0489 |
- if(j0<112) {
|
|
|
7c0489 |
- if(j0<0) {
|
|
|
7c0489 |
- w = TWO112[sx]+x;
|
|
|
7c0489 |
- t = w-TWO112[sx];
|
|
|
7c0489 |
- GET_LDOUBLE_MSW64(i0,t);
|
|
|
7c0489 |
- SET_LDOUBLE_MSW64(t,(i0&0x7fffffffffffffffLL)|(sx<<63));
|
|
|
7c0489 |
- return t;
|
|
|
7c0489 |
- }
|
|
|
7c0489 |
- } else {
|
|
|
7c0489 |
- if(j0==0x4000) return x+x; /* inf or NaN */
|
|
|
7c0489 |
- else return x; /* x is integral */
|
|
|
7c0489 |
+ int64_t i0, j0, sx;
|
|
|
7c0489 |
+ uint64_t i1 __attribute__ ((unused));
|
|
|
7c0489 |
+ _Float128 w, t;
|
|
|
7c0489 |
+ GET_LDOUBLE_WORDS64 (i0, i1, x);
|
|
|
7c0489 |
+ sx = (((uint64_t) i0) >> 63);
|
|
|
7c0489 |
+ j0 = ((i0 >> 48) & 0x7fff) - 0x3fff;
|
|
|
7c0489 |
+ if (j0 < 112)
|
|
|
7c0489 |
+ {
|
|
|
7c0489 |
+ if (j0 < 0)
|
|
|
7c0489 |
+ {
|
|
|
7c0489 |
+ w = TWO112[sx] + x;
|
|
|
7c0489 |
+ t = w - TWO112[sx];
|
|
|
7c0489 |
+ GET_LDOUBLE_MSW64 (i0, t);
|
|
|
7c0489 |
+ SET_LDOUBLE_MSW64 (t, (i0 & 0x7fffffffffffffffLL) | (sx << 63));
|
|
|
7c0489 |
+ return t;
|
|
|
7c0489 |
}
|
|
|
7c0489 |
- w = TWO112[sx]+x;
|
|
|
7c0489 |
- return w-TWO112[sx];
|
|
|
7c0489 |
+ }
|
|
|
7c0489 |
+ else
|
|
|
7c0489 |
+ {
|
|
|
7c0489 |
+ if (j0 == 0x4000)
|
|
|
7c0489 |
+ return x + x; /* inf or NaN */
|
|
|
7c0489 |
+ else
|
|
|
7c0489 |
+ return x; /* x is integral */
|
|
|
7c0489 |
+ }
|
|
|
7c0489 |
+ w = TWO112[sx] + x;
|
|
|
7c0489 |
+ return w - TWO112[sx];
|
|
|
7c0489 |
#endif /* ! USE_RINTL_BUILTIN */
|
|
|
7c0489 |
}
|
|
|
7c0489 |
libm_alias_ldouble (__rint, rint)
|
|
|
7c0489 |
--
|
|
|
7c0489 |
2.18.2
|
|
|
7c0489 |
|