diff options
Diffstat (limited to 'libquadmath/math/modfq.c')
-rw-r--r-- | libquadmath/math/modfq.c | 19 |
1 files changed, 16 insertions, 3 deletions
diff --git a/libquadmath/math/modfq.c b/libquadmath/math/modfq.c index 8c5db54bb76..12a87e75ee1 100644 --- a/libquadmath/math/modfq.c +++ b/libquadmath/math/modfq.c @@ -1,4 +1,4 @@ -/* modfq.c -- __float128 version of s_modf.c. +/* s_modfl.c -- long double version of s_modf.c. * Conversion to IEEE quad long double by Jakub Jelinek, jj@ultra.linux.cz. */ @@ -13,12 +13,25 @@ * ==================================================== */ +#if defined(LIBM_SCCS) && !defined(lint) +static char rcsid[] = "$NetBSD: $"; +#endif + +/* + * modfq(long double x, long double *iptr) + * return fraction part of x, and return x's integral part in *iptr. + * Method: + * Bit twiddling. + * + * Exception: + * No exception. + */ + #include "quadmath-imp.h" static const __float128 one = 1.0; -__float128 -modfq (__float128 x, __float128 *iptr) +__float128 modfq(__float128 x, __float128 *iptr) { int64_t i0,i1,j0; uint64_t i; |