aboutsummaryrefslogtreecommitdiff
path: root/sysdeps/ieee754/ldbl-128
diff options
context:
space:
mode:
authorXiaolin Tang <tangxiaolin@loongson.cn>2022-11-23 11:44:56 +0800
committercaiyinyu <caiyinyu@loongson.cn>2022-11-29 16:00:28 +0800
commit2b23ab1feab5a59bcc1931666663b2a8eac3fdbc (patch)
tree037d70b1f7a836854162a9f86c2ed62a834130c7 /sysdeps/ieee754/ldbl-128
parent948652e4f82f5aedbe882178ae158990bde63c79 (diff)
downloadglibc-2b23ab1feab5a59bcc1931666663b2a8eac3fdbc.zip
glibc-2b23ab1feab5a59bcc1931666663b2a8eac3fdbc.tar.gz
glibc-2b23ab1feab5a59bcc1931666663b2a8eac3fdbc.tar.bz2
Use GCC builtins for lrint functions if desired.
This patch is using the corresponding GCC builtin for lrintf, lrint, lrintl and lrintf128 if the USE_FUNCTION_BUILTIN macros are defined to one in math-use-builtins-function.h. Co-Authored-By: Xi Ruoyao <xry111@xry111.site>
Diffstat (limited to 'sysdeps/ieee754/ldbl-128')
-rw-r--r--sysdeps/ieee754/ldbl-128/s_lrintl.c17
1 files changed, 12 insertions, 5 deletions
diff --git a/sysdeps/ieee754/ldbl-128/s_lrintl.c b/sysdeps/ieee754/ldbl-128/s_lrintl.c
index e8ec02d..ecb604a 100644
--- a/sysdeps/ieee754/ldbl-128/s_lrintl.c
+++ b/sysdeps/ieee754/ldbl-128/s_lrintl.c
@@ -24,16 +24,22 @@
#include <math_private.h>
#include <libm-alias-ldouble.h>
#include <fix-fp-int-convert-overflow.h>
+#include <math-use-builtins.h>
-static const _Float128 two112[2] =
-{
- L(5.19229685853482762853049632922009600E+33), /* 0x406F000000000000, 0 */
- L(-5.19229685853482762853049632922009600E+33) /* 0xC06F000000000000, 0 */
-};
long int
__lrintl (_Float128 x)
{
+#if USE_LRINTL_BUILTIN
+ return __builtin_lrintl (x);
+#else
+ /* Use generic implementation. */
+ static const _Float128 two112[2] =
+ {
+ L(5.19229685853482762853049632922009600E+33), /* 0x406F000000000000, 0 */
+ L(-5.19229685853482762853049632922009600E+33) /* 0xC06F000000000000, 0 */
+ };
+
int32_t j0;
uint64_t i0,i1;
_Float128 w;
@@ -131,6 +137,7 @@ __lrintl (_Float128 x)
}
return sx ? -result : result;
+#endif /* ! USE_LRINTL_BUILTIN */
}
libm_alias_ldouble (__lrint, lrint)