AuroraMiddleware/glibc
1
0
Fork 0
mirror of https://sourceware.org/git/glibc.git synced 2024-12-23 03:10:05 +00:00
Code Issues Packages Projects Releases Wiki Activity

float128: Add wrappers to override ldbl-128 as float128.

Browse Source 
This change defines float128_private.h which contains
macros used to override long double naming conventions
when building a ldbl file.

	* math/math.h [__HAVE_FLOAT128 && __GLIBC_USE (IEC_60559_TYPES_EXT)]
	(SNANF128): New macro.
	* math/e_sqrtf128.c: New file.
	* math/s_fmaxmag_template.c: Include math_private.h in order to
	make inline expansion of fabs128().
	* math/s_fminmag_template.c: Likewise.

	* sysdeps/ieee754/float128/e_acosf128.c: New file.
	* sysdeps/ieee754/float128/e_acoshf128.c: New file.
	* sysdeps/ieee754/float128/e_asinf128.c: New file.
	* sysdeps/ieee754/float128/e_atan2f128.c: New file.
	* sysdeps/ieee754/float128/e_atanhf128.c: New file.
	* sysdeps/ieee754/float128/e_coshf128.c: New file.
	* sysdeps/ieee754/float128/e_exp10f128.c: New file.
	* sysdeps/ieee754/float128/e_expf128.c: New file.
	* sysdeps/ieee754/float128/e_fmodf128.c: New file.
	* sysdeps/ieee754/float128/e_gammaf128_r.c: New file.
	* sysdeps/ieee754/float128/e_hypotf128.c: New file.
	* sysdeps/ieee754/float128/e_ilogbf128.c: New file.
	* sysdeps/ieee754/float128/e_j0f128.c: New file.
	* sysdeps/ieee754/float128/e_j1f128.c: New file.
	* sysdeps/ieee754/float128/e_jnf128.c: New file.
	* sysdeps/ieee754/float128/e_lgammaf128_r.c: New file.
	* sysdeps/ieee754/float128/e_log10f128.c: New file.
	* sysdeps/ieee754/float128/e_log2f128.c: New file.
	* sysdeps/ieee754/float128/e_logf128.c: New file.
	* sysdeps/ieee754/float128/e_powf128.c: New file.
	* sysdeps/ieee754/float128/e_rem_pio2f128.c: New file.
	* sysdeps/ieee754/float128/e_remainderf128.c: New file.
	* sysdeps/ieee754/float128/e_scalbf128.c: New file.
	* sysdeps/ieee754/float128/e_sinhf128.c: New file.
	* sysdeps/ieee754/float128/float128_private.h: New file.
	* sysdeps/ieee754/float128/gamma_productf128.c: New file.
	* sysdeps/ieee754/float128/ieee754_float128.h: New file.
	* sysdeps/ieee754/float128/k_cosf128.c: New file.
	* sysdeps/ieee754/float128/k_sincosf128.c: New file.
	* sysdeps/ieee754/float128/k_sinf128.c: New file.
	* sysdeps/ieee754/float128/k_tanf128.c: New file.
	* sysdeps/ieee754/float128/lgamma_negf128.c: New file.
	* sysdeps/ieee754/float128/lgamma_productf128.c: New file.
	* sysdeps/ieee754/float128/s_asinhf128.c: New file.
	* sysdeps/ieee754/float128/s_atanf128.c: New file.
	* sysdeps/ieee754/float128/s_cbrtf128.c: New file.
	* sysdeps/ieee754/float128/s_ceilf128.c: New file.
	* sysdeps/ieee754/float128/s_copysignf128.c: New file.
	* sysdeps/ieee754/float128/s_cosf128.c: New file.
	* sysdeps/ieee754/float128/s_erff128.c: New file.
	* sysdeps/ieee754/float128/s_expm1f128.c: New file.
	* sysdeps/ieee754/float128/s_fabsf128.c: New file.
	* sysdeps/ieee754/float128/s_finitef128.c: New file.
	* sysdeps/ieee754/float128/s_floorf128.c: New file.
	* sysdeps/ieee754/float128/s_fmaf128.c: New file.
	* sysdeps/ieee754/float128/s_fpclassifyf128.c: New file.
	* sysdeps/ieee754/float128/s_frexpf128.c: New file.
	* sysdeps/ieee754/float128/s_fromfpf128.c: New file.
	* sysdeps/ieee754/float128/s_fromfpxf128.c: New file.
	* sysdeps/ieee754/float128/s_getpayloadf128.c: New file.
	* sysdeps/ieee754/float128/s_isinff128.c: New file.
	* sysdeps/ieee754/float128/s_isnanf128.c: New file.
	* sysdeps/ieee754/float128/s_issignalingf128.c: New file.
	* sysdeps/ieee754/float128/s_llrintf128.c: New file.
	* sysdeps/ieee754/float128/s_llroundf128.c: New file.
	* sysdeps/ieee754/float128/s_log1pf128.c: New file.
	* sysdeps/ieee754/float128/s_logbf128.c: New file.
	* sysdeps/ieee754/float128/s_lrintf128.c: New file.
	* sysdeps/ieee754/float128/s_lroundf128.c: New file.
	* sysdeps/ieee754/float128/s_modff128.c: New file.
	* sysdeps/ieee754/float128/s_nearbyintf128.c: New file.
	* sysdeps/ieee754/float128/s_nextafterf128.c: New file.
	* sysdeps/ieee754/float128/s_nexttowardf128.c: New file.
	* sysdeps/ieee754/float128/s_nextupf128.c: New file.
	* sysdeps/ieee754/float128/s_remquof128.c: New file.
	* sysdeps/ieee754/float128/s_rintf128.c: New file.
	* sysdeps/ieee754/float128/s_roundevenf128.c: New file.
	* sysdeps/ieee754/float128/s_roundf128.c: New file.
	* sysdeps/ieee754/float128/s_scalblnf128.c: New file.
	* sysdeps/ieee754/float128/s_scalbnf128.c: New file.
	* sysdeps/ieee754/float128/s_setpayloadf128.c: New file.
	* sysdeps/ieee754/float128/s_setpayloadsigf128.c: New file.
	* sysdeps/ieee754/float128/s_signbitf128.c: New file.
	* sysdeps/ieee754/float128/s_significandf128.c: New file.
	* sysdeps/ieee754/float128/s_sincosf128.c: New file.
	* sysdeps/ieee754/float128/s_sinf128.c: New file.
	* sysdeps/ieee754/float128/s_tanf128.c: New file.
	* sysdeps/ieee754/float128/s_tanhf128.c: New file.
	* sysdeps/ieee754/float128/s_totalorderf128.c: New file.
	* sysdeps/ieee754/float128/s_totalordermagf128.c: New file.
	* sysdeps/ieee754/float128/s_truncf128.c: New file.
	* sysdeps/ieee754/float128/s_ufromfpf128.c: New file.
	* sysdeps/ieee754/float128/s_ufromfpxf128.c: New file.
	* sysdeps/ieee754/float128/t_sincosf128.c: New file.
	* sysdeps/ieee754/float128/x2y2m1f128.c: New file.

	* sysdeps/ieee754/ldbl-128ibm/bits/iscanonical.h:
	(__iscanonicalf128): Define as a macro.
This commit is contained in:
Paul E. Murphy 2016-08-08 15:49:31 -05:00 committed by Gabriel F. T. Gomes
parent 6a2c695266
commit 302bb1a3c3
91 changed files with 765 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

100
ChangeLog
View File

@ -1,3 +1,103 @@
2017-05-25 Paul E. Murphy <murphyp@linux.vnet.ibm.com>
Gabriel F. T. Gomes <gftg@linux.vnet.ibm.com>
Tulio Magno Quites Machado Filho <tuliom@linux.vnet.ibm.com>
* math/math.h [__HAVE_FLOAT128 && __GLIBC_USE (IEC_60559_TYPES_EXT)]
(SNANF128): New macro.
* math/e_sqrtf128.c: New file.
* math/s_fmaxmag_template.c: Include math_private.h in order to
make inline expansion of fabs128().
* math/s_fminmag_template.c: Likewise.
* sysdeps/ieee754/float128/e_acosf128.c: New file.
* sysdeps/ieee754/float128/e_acoshf128.c: New file.
* sysdeps/ieee754/float128/e_asinf128.c: New file.
* sysdeps/ieee754/float128/e_atan2f128.c: New file.
* sysdeps/ieee754/float128/e_atanhf128.c: New file.
* sysdeps/ieee754/float128/e_coshf128.c: New file.
* sysdeps/ieee754/float128/e_exp10f128.c: New file.
* sysdeps/ieee754/float128/e_expf128.c: New file.
* sysdeps/ieee754/float128/e_fmodf128.c: New file.
* sysdeps/ieee754/float128/e_gammaf128_r.c: New file.
* sysdeps/ieee754/float128/e_hypotf128.c: New file.
* sysdeps/ieee754/float128/e_ilogbf128.c: New file.
* sysdeps/ieee754/float128/e_j0f128.c: New file.
* sysdeps/ieee754/float128/e_j1f128.c: New file.
* sysdeps/ieee754/float128/e_jnf128.c: New file.
* sysdeps/ieee754/float128/e_lgammaf128_r.c: New file.
* sysdeps/ieee754/float128/e_log10f128.c: New file.
* sysdeps/ieee754/float128/e_log2f128.c: New file.
* sysdeps/ieee754/float128/e_logf128.c: New file.
* sysdeps/ieee754/float128/e_powf128.c: New file.
* sysdeps/ieee754/float128/e_rem_pio2f128.c: New file.
* sysdeps/ieee754/float128/e_remainderf128.c: New file.
* sysdeps/ieee754/float128/e_scalbf128.c: New file.
* sysdeps/ieee754/float128/e_sinhf128.c: New file.
* sysdeps/ieee754/float128/float128_private.h: New file.
* sysdeps/ieee754/float128/gamma_productf128.c: New file.
* sysdeps/ieee754/float128/ieee754_float128.h: New file.
* sysdeps/ieee754/float128/k_cosf128.c: New file.
* sysdeps/ieee754/float128/k_sincosf128.c: New file.
* sysdeps/ieee754/float128/k_sinf128.c: New file.
* sysdeps/ieee754/float128/k_tanf128.c: New file.
* sysdeps/ieee754/float128/lgamma_negf128.c: New file.
* sysdeps/ieee754/float128/lgamma_productf128.c: New file.
* sysdeps/ieee754/float128/s_asinhf128.c: New file.
* sysdeps/ieee754/float128/s_atanf128.c: New file.
* sysdeps/ieee754/float128/s_cbrtf128.c: New file.
* sysdeps/ieee754/float128/s_ceilf128.c: New file.
* sysdeps/ieee754/float128/s_copysignf128.c: New file.
* sysdeps/ieee754/float128/s_cosf128.c: New file.
* sysdeps/ieee754/float128/s_erff128.c: New file.
* sysdeps/ieee754/float128/s_expm1f128.c: New file.
* sysdeps/ieee754/float128/s_fabsf128.c: New file.
* sysdeps/ieee754/float128/s_finitef128.c: New file.
* sysdeps/ieee754/float128/s_floorf128.c: New file.
* sysdeps/ieee754/float128/s_fmaf128.c: New file.
* sysdeps/ieee754/float128/s_fpclassifyf128.c: New file.
* sysdeps/ieee754/float128/s_frexpf128.c: New file.
* sysdeps/ieee754/float128/s_fromfpf128.c: New file.
* sysdeps/ieee754/float128/s_fromfpxf128.c: New file.
* sysdeps/ieee754/float128/s_getpayloadf128.c: New file.
* sysdeps/ieee754/float128/s_isinff128.c: New file.
* sysdeps/ieee754/float128/s_isnanf128.c: New file.
* sysdeps/ieee754/float128/s_issignalingf128.c: New file.
* sysdeps/ieee754/float128/s_llrintf128.c: New file.
* sysdeps/ieee754/float128/s_llroundf128.c: New file.
* sysdeps/ieee754/float128/s_log1pf128.c: New file.
* sysdeps/ieee754/float128/s_logbf128.c: New file.
* sysdeps/ieee754/float128/s_lrintf128.c: New file.
* sysdeps/ieee754/float128/s_lroundf128.c: New file.
* sysdeps/ieee754/float128/s_modff128.c: New file.
* sysdeps/ieee754/float128/s_nearbyintf128.c: New file.
* sysdeps/ieee754/float128/s_nextafterf128.c: New file.
* sysdeps/ieee754/float128/s_nexttowardf128.c: New file.
* sysdeps/ieee754/float128/s_nextupf128.c: New file.
* sysdeps/ieee754/float128/s_remquof128.c: New file.
* sysdeps/ieee754/float128/s_rintf128.c: New file.
* sysdeps/ieee754/float128/s_roundevenf128.c: New file.
* sysdeps/ieee754/float128/s_roundf128.c: New file.
* sysdeps/ieee754/float128/s_scalblnf128.c: New file.
* sysdeps/ieee754/float128/s_scalbnf128.c: New file.
* sysdeps/ieee754/float128/s_setpayloadf128.c: New file.
* sysdeps/ieee754/float128/s_setpayloadsigf128.c: New file.
* sysdeps/ieee754/float128/s_signbitf128.c: New file.
* sysdeps/ieee754/float128/s_significandf128.c: New file.
* sysdeps/ieee754/float128/s_sincosf128.c: New file.
* sysdeps/ieee754/float128/s_sinf128.c: New file.
* sysdeps/ieee754/float128/s_tanf128.c: New file.
* sysdeps/ieee754/float128/s_tanhf128.c: New file.
* sysdeps/ieee754/float128/s_totalorderf128.c: New file.
* sysdeps/ieee754/float128/s_totalordermagf128.c: New file.
* sysdeps/ieee754/float128/s_truncf128.c: New file.
* sysdeps/ieee754/float128/s_ufromfpf128.c: New file.
* sysdeps/ieee754/float128/s_ufromfpxf128.c: New file.
* sysdeps/ieee754/float128/t_sincosf128.c: New file.
* sysdeps/ieee754/float128/x2y2m1f128.c: New file.
* sysdeps/ieee754/ldbl-128ibm/bits/iscanonical.h:
(__iscanonicalf128): Define as a macro.
2017-05-24 Steve Ellcey <sellcey@caviumnetworks.com>
* sysdeps/aarch64/memcpy.S (MEMMOVE, MEMCPY): New macros.

14
math/e_sqrtf128.c Normal file
View File

@ -0,0 +1,14 @@
#include <math.h>
#include <stdio.h>
#include <errno.h>
_Float128
__ieee754_sqrtf128 (_Float128 x)
{
fputs ("__ieee754_sqrtf128 not implemented\n", stderr);
__set_errno (ENOSYS);
return 0.0;
}
strong_alias (__ieee754_sqrtf128, __sqrtf128_finite)
stub_warning (sqrtf128)

3
math/math.h
View File

@ -64,6 +64,9 @@ __BEGIN_DECLS
# define SNANL (__builtin_nansl (""))
# endif
#endif
#if __HAVE_FLOAT128 && __GLIBC_USE (IEC_60559_TYPES_EXT)
# define SNANF128 (__builtin_nansf128 (""))
#endif
/* Get __GLIBC_FLT_EVAL_METHOD. */
#include <bits/flt-eval-method.h>

1
math/s_fmaxmag_template.c
View File

@ -17,6 +17,7 @@
<http://www.gnu.org/licenses/>. */
#include <math.h>
#include <math_private.h>
FLOAT
M_DECL_FUNC (__fmaxmag) (FLOAT x, FLOAT y)

1
math/s_fminmag_template.c
View File

@ -17,6 +17,7 @@
<http://www.gnu.org/licenses/>. */
#include <math.h>
#include <math_private.h>
FLOAT
M_DECL_FUNC (__fminmag) (FLOAT x, FLOAT y)

2
sysdeps/ieee754/float128/e_acosf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_acosl.c"

2
sysdeps/ieee754/float128/e_acoshf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_acoshl.c"

2
sysdeps/ieee754/float128/e_asinf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_asinl.c"

2
sysdeps/ieee754/float128/e_atan2f128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_atan2l.c"

2
sysdeps/ieee754/float128/e_atanhf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_atanhl.c"

2
sysdeps/ieee754/float128/e_coshf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_coshl.c"

2
sysdeps/ieee754/float128/e_exp10f128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_exp10l.c"

2
sysdeps/ieee754/float128/e_expf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_expl.c"

2
sysdeps/ieee754/float128/e_fmodf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_fmodl.c"

2
sysdeps/ieee754/float128/e_gammaf128_r.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_gammal_r.c"

2
sysdeps/ieee754/float128/e_hypotf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_hypotl.c"

2
sysdeps/ieee754/float128/e_ilogbf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_ilogbl.c"

2
sysdeps/ieee754/float128/e_j0f128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_j0l.c"

2
sysdeps/ieee754/float128/e_j1f128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_j1l.c"

2
sysdeps/ieee754/float128/e_jnf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_jnl.c"

2
sysdeps/ieee754/float128/e_lgammaf128_r.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_lgammal_r.c"

2
sysdeps/ieee754/float128/e_log10f128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_log10l.c"

2
sysdeps/ieee754/float128/e_log2f128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_log2l.c"

2
sysdeps/ieee754/float128/e_logf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_logl.c"

2
sysdeps/ieee754/float128/e_powf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_powl.c"

2
sysdeps/ieee754/float128/e_rem_pio2f128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_rem_pio2l.c"

2
sysdeps/ieee754/float128/e_remainderf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_remainderl.c"

1
sysdeps/ieee754/float128/e_scalbf128.c Normal file
View File

@ -0,0 +1 @@
/* Not defined for _FloatN types. */

2
sysdeps/ieee754/float128/e_sinhf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/e_sinhl.c"

324
sysdeps/ieee754/float128/float128_private.h Normal file
View File

@ -0,0 +1,324 @@
/* _Float128 overrides for building ldbl-128 as _Float128.
Copyright (C) 2017 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
The GNU C Library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library; if not, see
<http://www.gnu.org/licenses/>. */
/* This must be included before the function renames below. */
#include <math.h>
#undef HUGE_VALL
#define HUGE_VALL HUGE_VAL_F128
#include <math/mul_splitl.h>
/* Renames derived from math_private.h. */
#include <math_private.h>
#include <ieee754_float128.h>
#define ieee854_long_double_shape_type ieee854_float128_shape_type
#define ieee854_long_double ieee854_float128
#undef GET_LDOUBLE_LSW64
#undef GET_LDOUBLE_MSW64
#undef GET_LDOUBLE_WORDS64
#undef SET_LDOUBLE_LSW64
#undef SET_LDOUBLE_MSW64
#undef SET_LDOUBLE_WORDS64
#define GET_LDOUBLE_LSW64(x,y) GET_FLOAT128_LSW64 (x, y)
#define GET_LDOUBLE_MSW64(x,y) GET_FLOAT128_MSW64 (x, y)
#define GET_LDOUBLE_WORDS64(x,y,z) GET_FLOAT128_WORDS64 (x, y, z)
#define SET_LDOUBLE_LSW64(x,y) SET_FLOAT128_LSW64 (x, y)
#define SET_LDOUBLE_MSW64(x,y) SET_FLOAT128_MSW64 (x, y)
#define SET_LDOUBLE_WORDS64(x,y,z) SET_FLOAT128_WORDS64 (x, y, z)
#undef IEEE854_LONG_DOUBLE_BIAS
#define IEEE854_LONG_DOUBLE_BIAS IEEE854_FLOAT128_BIAS
#ifdef SET_RESTORE_ROUNDF128
# undef SET_RESTORE_ROUNDL
# define SET_RESTORE_ROUNDL() SET_RESTORE_ROUNDF128()
#endif
/* misc macros from the header below. */
#include <fix-fp-int-convert-overflow.h>
#undef FIX_LDBL_LONG_CONVERT_OVERFLOW
#undef FIX_LDBL_LLONG_CONVERT_OVERFLOW
#define FIX_LDBL_LONG_CONVERT_OVERFLOW FIX_FLT128_LONG_CONVERT_OVERFLOW
#define FIX_LDBL_LLONG_CONVERT_OVERFLOW FIX_FLT128_LLONG_CONVERT_OVERFLOW
/* float.h constants. */
#include <float.h>
#undef LDBL_DIG
#undef LDBL_EPSILON
#undef LDBL_MANT_DIG
#undef LDBL_MAX
#undef LDBL_MAX_10_EXP
#undef LDBL_MAX_EXP
#undef LDBL_MIN
#undef LDBL_MIN_10_EXP
#undef LDBL_MIN_EXP
#undef LDBL_TRUE_MIN
#define LDBL_DIG FLT128_DIG
#define LDBL_EPSILON FLT128_EPSILON
#define LDBL_MANT_DIG FLT128_MANT_DIG
#define LDBL_MAX FLT128_MAX
#define LDBL_MAX_10_EXP FLT128_MAX_10_EXP
#define LDBL_MAX_EXP FLT128_MAX_EXP
#define LDBL_MIN FLT128_MIN
#define LDBL_MIN_10_EXP FLT128_MIN_10_EXP
#define LDBL_MIN_EXP FLT128_MIN_EXP
#define LDBL_TRUE_MIN FLT128_TRUE_MIN
/* math.h GNU constants. */
#undef M_El
#undef M_LOG2El
#undef M_LOG10El
#undef M_LN2l
#undef M_LN10l
#undef M_PIl
#undef M_PI_2l
#undef M_PI_4l
#undef M_1_PIl
#undef M_2_PIl
#undef M_2_SQRTPIl
#undef M_SQRT2l
#undef M_SQRT1_2l
#define M_El M_Ef128
#define M_LOG2El M_LOG2Ef128
#define M_LOG10El M_LOG10Ef128
#define M_LN2l M_LN2f128
#define M_LN10l M_LN10f128
#define M_PIl M_PIf128
#define M_PI_2l M_PI_2f128
#define M_PI_4l M_PI_4f128
#define M_1_PIl M_1_PIf128
#define M_2_PIl M_2_PIf128
#define M_2_SQRTPIl M_2_SQRTPIf128
#define M_SQRT2l M_SQRT2f128
#define M_SQRT1_2l M_SQRT1_2f128
/* IEEE function renames. */
#define __ieee754_acoshl __ieee754_acoshf128
#define __ieee754_acosl __ieee754_acosf128
#define __ieee754_asinhl __ieee754_asinhf128
#define __ieee754_asinl __ieee754_asinf128
#define __ieee754_atan2l __ieee754_atan2f128
#define __ieee754_atanhl __ieee754_atanhf128
#define __ieee754_coshl __ieee754_coshf128
#define __ieee754_cosl __ieee754_cosf128
#define __ieee754_exp10l __ieee754_exp10f128
#define __ieee754_exp2l __ieee754_exp2f128
#define __ieee754_expl __ieee754_expf128
#define __ieee754_fmodl __ieee754_fmodf128
#define __ieee754_gammal_r __ieee754_gammaf128_r
#define __ieee754_hypotl __ieee754_hypotf128
#define __ieee754_ilogbl __ieee754_ilogbf128
#define __ieee754_j0l __ieee754_j0f128
#define __ieee754_j1l __ieee754_j1f128
#define __ieee754_jnl __ieee754_jnf128
#define __ieee754_lgammal_r __ieee754_lgammaf128_r
#define __ieee754_log10l __ieee754_log10f128
#define __ieee754_log2l __ieee754_log2f128
#define __ieee754_logl __ieee754_logf128
#define __ieee754_powl __ieee754_powf128
#define __ieee754_rem_pio2l __ieee754_rem_pio2f128
#define __ieee754_remainderl __ieee754_remainderf128
#define __ieee754_sinhl __ieee754_sinhf128
#define __ieee754_sqrtl __ieee754_sqrtf128
#define __ieee754_y0l __ieee754_y0f128
#define __ieee754_y1l __ieee754_y1f128
#define __ieee754_ynl __ieee754_ynf128
/* finite math entry points. */
#define __acoshl_finite __acoshf128_finite
#define __acosl_finite __acosf128_finite
#define __asinl_finite __asinf128_finite
#define __atan2l_finite __atan2f128_finite
#define __atanhl_finite __atanhf128_finite
#define __coshl_finite __coshf128_finite
#define __cosl_finite __cosf128_finite
#define __exp10l_finite __exp10f128_finite
#define __exp2l_finite __exp2f128_finite
#define __expl_finite __expf128_finite
#define __fmodl_finite __fmodf128_finite
#define __hypotl_finite __hypotf128_finite
#define __ilogbl_finite __ilogbf128_finite
#define __j0l_finite __j0f128_finite
#define __j1l_finite __j1f128_finite
#define __jnl_finite __jnf128_finite
#define __lgammal_r_finite __lgammaf128_r_finite
#define __log10l_finite __log10f128_finite
#define __log2l_finite __log2f128_finite
#define __logl_finite __logf128_finite
#define __powl_finite __powf128_finite
#define __remainderl_finite __remainderf128_finite
#define __sinhl_finite __sinhf128_finite
#define __y0l_finite __y0f128_finite
#define __y1l_finite __y1f128_finite
#define __ynl_finite __ynf128_finite
/* internal function names. */
#define __asinhl __asinhf128
#define __atanl __atanf128
#define __cbrtl __cbrtf128
#define __ceill __ceilf128
#define __copysignl __copysignf128
#define __cosl __cosf128
#define __erfcl __erfcf128
#define __erfl __erff128
#define __expl __expf128
#define __expm1l __expm1f128
#define __fabsl __fabsf128
#define __fdiml __fdimf128
#define __finitel __finitef128
#define __floorl __floorf128
#define __fmal __fmaf128
#define __fmaxl __fmaxf128
#define __fminl __fminf128
#define __fpclassifyl __fpclassifyf128
#define __frexpl __frexpf128
#define __gammal_r_finite __gammaf128_r_finite
#define __isinfl __isinff128
#define __isnanl __isnanf128
#define __issignalingl __issignalingf128
#define __ldexpl __ldexpf128
#define __llrintl __llrintf128
#define __llroundl __llroundf128
#define __log1pl __log1pf128
#define __logbl __logbf128
#define __logl __logf128
#define __lrintl __lrintf128
#define __lroundl __lroundf128
#define __modfl __modff128
#define __nearbyintl __nearbyintf128
#define __nextafterl __nextafterf128
#define __nextdownl __nextdownf128
#define __nextupl __nextupf128
#define __remquol __remquof128
#define __rintl __rintf128
#define __roundl __roundf128
#define __scalblnl __scalblnf128
#define __scalbnl __scalbnf128
#define __signbitl __signbitf128
#define __sincosl __sincosf128
#define __sinl __sinf128
#define __sqrtl __sqrtf128
#define __tanhl __tanhf128
#define __tanl __tanf128
#define __truncl __truncf128
#define __x2y2m1l __x2y2m1f128
/* __nexttowardf128 is not _Float128 API. */
#define __nexttowardl __nexttowardf128_do_not_use
#define nexttowardl nexttowardf128_do_not_use
/* public entry points. */
#define asinhl asinhf128
#define atanl atanf128
#define cbrtl cbrtf128
#define ceill ceilf128
#define copysignl copysignf128
#define cosl cosf128
#define erfcl erfcf128
#define erfl erff128
#define expl expf128
#define expm1l expm1f128
#define fabsl fabsf128
#define fdiml fdimf128
#define finitel finitef128_do_not_use
#define floorl floorf128
#define fmal fmaf128
#define fmaxl fmaxf128
#define fminl fminf128
#define frexpl frexpf128
#define getpayloadl getpayloadf128
#define isinfl isinff128_do_not_use
#define isnanl isnanf128_do_not_use
#define ldexpl ldexpf128
#define llrintl llrintf128
#define llroundl llroundf128
#define log1pl log1pf128
#define logbl logbf128
#define logl logf128
#define lrintl lrintf128
#define lroundl lroundf128
#define modfl modff128
#define nanl nanf128
#define nearbyintl nearbyintf128
#define nextafterl nextafterf128
#define nextdownl nextdownf128
#define nextupl nextupf128
#define remquol remquof128
#define rintl rintf128
#define roundevenl roundevenf128
#define roundl roundf128
#define scalbnl scalbnf128
#define sincosl sincosf128
#define sinl sinf128
#define sqrtl sqrtf128
#define tanhl tanhf128
#define tanl tanf128
#define totalorderl totalorderf128
#define totalordermagl totalordermagf128
#define truncl truncf128
/* misc internal renames. */
#define __builtin_fmal __builtin_fmaf128
#define __expl_table __expf128_table
#define __gamma_productl __gamma_productf128
#define __kernel_cosl __kernel_cosf128
#define __kernel_rem_pio2l __kernel_rem_pio2f128
#define __kernel_sincosl __kernel_sincosf128
#define __kernel_sinl __kernel_sinf128
#define __kernel_tanl __kernel_tanf128
#define __lgamma_negl __lgamma_negf128
#define __lgamma_productl __lgamma_productf128
#define __sincosl_table __sincosf128_table
#define mul_splitl mul_splitf128
/* Builtin renames. */
#define __builtin_copysignl __builtin_copysignf128
#define __builtin_signbitl __builtin_signbit
/* Get the constant suffix from bits/floatn-compat.h. */
#define L(x) __f128 (x)
static inline void
mul_splitf128 (_Float128 *hi, _Float128 *lo, _Float128 x, _Float128 y)
{
#ifdef __FP_FAST_FMAF128
/* Fast built-in fused multiply-add. */
*hi = x * y;
*lo = __builtin_fmal (x, y, -*hi);
#else
/* Apply Dekker's algorithm. */
*hi = x * y;
# define C ((1LL << (FLT128_MANT_DIG + 1) / 2) + 1)
_Float128 x1 = x * C;
_Float128 y1 = y * C;
# undef C
x1 = (x - x1) + x1;
y1 = (y - y1) + y1;
_Float128 x2 = x - x1;
_Float128 y2 = y - y1;
*lo = (((x1 * y1 - *hi) + x1 * y2) + x2 * y1) + x2 * y2;
#endif
}

2
sysdeps/ieee754/float128/gamma_productf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/gamma_productl.c"

140
sysdeps/ieee754/float128/ieee754_float128.h Normal file
View File

@ -0,0 +1,140 @@
/* _Float128 IEEE like macros.
Copyright (C) 2017 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
The GNU C Library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library; if not, see
<http://www.gnu.org/licenses/>. */
#ifndef _IEEE754_FLOAT128_H
#define _IEEE754_FLOAT128_H
#include <endian.h>
#include <stdint.h>
# if __FLOAT_WORD_ORDER == BIG_ENDIAN
# define __FLT_EORDER2(t, a, b) t a; t b;
# define __FLT_EORDER4(t, a, b, c, d) \
t a; t b; t c; t d;
# define __FLT_EORDER6(t, a, b, c, d, e, f) \
t a; t b; t c; t d; t e; t f;
# define __FLT_EORDER7(t, a, b, c, d, e, f, g) \
t a; t b; t c; t d; t e; t f; t g;
# else
# define __FLT_EORDER2(t, a, b) \
t b; t a;
# define __FLT_EORDER4(t, a, b, c, d) \
t d; t c; t b; t a;
# define __FLT_EORDER6(t, a, b, c, d, e, f) \
t f; t e; t d; t c; t b; t a;
# define __FLT_EORDER7(t, a, b, c, d, e, f, g) \
t g; t f; t e; t d; t c; t b; t a;
# endif
/* A union which permits us to convert between _Float128 and
four 32 bit ints or two 64 bit ints. */
typedef union
{
_Float128 value;
struct
{
__FLT_EORDER2 (uint64_t, msw, lsw);
} parts64;
struct
{
__FLT_EORDER4 (uint32_t, w0, w1, w2, w3);
} parts32;
} ieee854_float128_shape_type;
/* Get two 64 bit ints from a _Float128. */
# define GET_FLOAT128_WORDS64(ix0,ix1,d) \
do { \
ieee854_float128_shape_type qw_u; \
qw_u.value = (d); \
(ix0) = qw_u.parts64.msw; \
(ix1) = qw_u.parts64.lsw; \
} while (0)
/* Set a _Float128 from two 64 bit ints. */
# define SET_FLOAT128_WORDS64(d,ix0,ix1) \
do { \
ieee854_float128_shape_type qw_u; \
qw_u.parts64.msw = (ix0); \
qw_u.parts64.lsw = (ix1); \
(d) = qw_u.value; \
} while (0)
/* Get the more significant 64 bits of a _Float128 mantissa. */
# define GET_FLOAT128_MSW64(v,d) \
do { \
ieee854_float128_shape_type sh_u; \
sh_u.value = (d); \
(v) = sh_u.parts64.msw; \
} while (0)
/* Set the more significant 64 bits of a _Float128 mantissa from an int. */
# define SET_FLOAT128_MSW64(d,v) \
do { \
ieee854_float128_shape_type sh_u; \
sh_u.value = (d); \
sh_u.parts64.msw = (v); \
(d) = sh_u.value; \
} while (0)
/* Get the least significant 64 bits of a _Float128 mantissa. */
# define GET_FLOAT128_LSW64(v,d) \
do { \
ieee854_float128_shape_type sh_u; \
sh_u.value = (d); \
(v) = sh_u.parts64.lsw; \
} while (0)
/* Likewise, some helper macros which are exposed via ieee754.h for
C99 real types, but not _Float128. */
union ieee854_float128
{
_Float128 d;
/* This is the IEEE 854 quad-precision format. */
struct
{
__FLT_EORDER6 (unsigned int, negative:1,
exponent:15,
mantissa0:16,
mantissa1:32,
mantissa2:32,
mantissa3:32)
} ieee;
/* This format makes it easier to see if a NaN is a signalling NaN. */
struct
{
__FLT_EORDER7 (unsigned int, negative:1,
exponent:15,
quiet_nan:1,
mantissa0:15,
mantissa1:32,
mantissa2:32,
mantissa3:32)
} ieee_nan;
};
#define IEEE854_FLOAT128_BIAS 0x3fff /* Added to exponent. */
#endif

2
sysdeps/ieee754/float128/k_cosf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/k_cosl.c"

2
sysdeps/ieee754/float128/k_sincosf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/k_sincosl.c"

2
sysdeps/ieee754/float128/k_sinf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/k_sinl.c"

2
sysdeps/ieee754/float128/k_tanf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/k_tanl.c"

2
sysdeps/ieee754/float128/lgamma_negf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/lgamma_negl.c"

2
sysdeps/ieee754/float128/lgamma_productf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/lgamma_productl.c"

2
sysdeps/ieee754/float128/s_asinhf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_asinhl.c"

2
sysdeps/ieee754/float128/s_atanf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_atanl.c"

2
sysdeps/ieee754/float128/s_cbrtf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_cbrtl.c"

2
sysdeps/ieee754/float128/s_ceilf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_ceill.c"

2
sysdeps/ieee754/float128/s_copysignf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_copysignl.c"

2
sysdeps/ieee754/float128/s_cosf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_cosl.c"

2
sysdeps/ieee754/float128/s_erff128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_erfl.c"

2
sysdeps/ieee754/float128/s_expm1f128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_expm1l.c"

2
sysdeps/ieee754/float128/s_fabsf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_fabsl.c"

2
sysdeps/ieee754/float128/s_finitef128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_finitel.c"

2
sysdeps/ieee754/float128/s_floorf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_floorl.c"

2
sysdeps/ieee754/float128/s_fmaf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_fmal.c"

2
sysdeps/ieee754/float128/s_fpclassifyf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_fpclassifyl.c"

2
sysdeps/ieee754/float128/s_frexpf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_frexpl.c"

5
sysdeps/ieee754/float128/s_fromfpf128.c Normal file
View File

@ -0,0 +1,5 @@
#define UNSIGNED 0
#define INEXACT 0
#define FUNC fromfpf128
#include <float128_private.h>
#include "../ldbl-128/s_fromfpl_main.c"

5
sysdeps/ieee754/float128/s_fromfpxf128.c Normal file
View File

@ -0,0 +1,5 @@
#define UNSIGNED 0
#define INEXACT 1
#define FUNC fromfpxf128
#include <float128_private.h>
#include "../ldbl-128/s_fromfpl_main.c"

2
sysdeps/ieee754/float128/s_getpayloadf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_getpayloadl.c"

2
sysdeps/ieee754/float128/s_isinff128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_isinfl.c"

2
sysdeps/ieee754/float128/s_isnanf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_isnanl.c"

2
sysdeps/ieee754/float128/s_issignalingf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_issignalingl.c"

2
sysdeps/ieee754/float128/s_llrintf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_llrintl.c"

2
sysdeps/ieee754/float128/s_llroundf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_llroundl.c"

2
sysdeps/ieee754/float128/s_log1pf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_log1pl.c"

2
sysdeps/ieee754/float128/s_logbf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_logbl.c"

2
sysdeps/ieee754/float128/s_lrintf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_lrintl.c"

2
sysdeps/ieee754/float128/s_lroundf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_lroundl.c"

2
sysdeps/ieee754/float128/s_modff128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_modfl.c"

2
sysdeps/ieee754/float128/s_nearbyintf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_nearbyintl.c"

2
sysdeps/ieee754/float128/s_nextafterf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_nextafterl.c"

1
sysdeps/ieee754/float128/s_nexttowardf128.c Normal file
View File

@ -0,0 +1 @@
/* This function does not exist for _FloatN types. */

2
sysdeps/ieee754/float128/s_nextupf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_nextupl.c"

2
sysdeps/ieee754/float128/s_remquof128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_remquol.c"

2
sysdeps/ieee754/float128/s_rintf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_rintl.c"

2
sysdeps/ieee754/float128/s_roundevenf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_roundevenl.c"

2
sysdeps/ieee754/float128/s_roundf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_roundl.c"

2
sysdeps/ieee754/float128/s_scalblnf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_scalblnl.c"

2
sysdeps/ieee754/float128/s_scalbnf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_scalbnl.c"

4
sysdeps/ieee754/float128/s_setpayloadf128.c Normal file
View File

@ -0,0 +1,4 @@
#include <float128_private.h>
#define SIG 0
#define FUNC setpayloadf128
#include "../ldbl-128/s_setpayloadl_main.c"

4
sysdeps/ieee754/float128/s_setpayloadsigf128.c Normal file
View File

@ -0,0 +1,4 @@
#include <float128_private.h>
#define SIG 1
#define FUNC setpayloadsigf128
#include "../ldbl-128/s_setpayloadl_main.c"

2
sysdeps/ieee754/float128/s_signbitf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_signbitl.c"

1
sysdeps/ieee754/float128/s_significandf128.c Normal file
View File

@ -0,0 +1 @@
/* Not defined for _FloatN types. */

2
sysdeps/ieee754/float128/s_sincosf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_sincosl.c"

2
sysdeps/ieee754/float128/s_sinf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_sinl.c"

2
sysdeps/ieee754/float128/s_tanf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_tanl.c"

2
sysdeps/ieee754/float128/s_tanhf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_tanhl.c"

2
sysdeps/ieee754/float128/s_totalorderf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_totalorderl.c"

2
sysdeps/ieee754/float128/s_totalordermagf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_totalordermagl.c"

2
sysdeps/ieee754/float128/s_truncf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/s_truncl.c"

5
sysdeps/ieee754/float128/s_ufromfpf128.c Normal file
View File

@ -0,0 +1,5 @@
#define UNSIGNED 1
#define INEXACT 0
#define FUNC ufromfpf128
#include <float128_private.h>
#include "../ldbl-128/s_fromfpl_main.c"

5
sysdeps/ieee754/float128/s_ufromfpxf128.c Normal file
View File

@ -0,0 +1,5 @@
#define UNSIGNED 1
#define INEXACT 1
#define FUNC ufromfpxf128
#include <float128_private.h>
#include "../ldbl-128/s_fromfpl_main.c"

2
sysdeps/ieee754/float128/t_sincosf128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/t_sincosl.c"

2
sysdeps/ieee754/float128/x2y2m1f128.c Normal file
View File

@ -0,0 +1,2 @@
#include <float128_private.h>
#include "../ldbl-128/x2y2m1l.c"

3
sysdeps/ieee754/ldbl-128ibm/bits/iscanonical.h
View File

@ -27,6 +27,9 @@ extern int __iscanonicall (long double __x)
__THROW __attribute__ ((__const__));
# define __iscanonicalf(x) ((void) (__typeof (x)) (x), 1)
# define __iscanonical(x) ((void) (__typeof (x)) (x), 1)
# if __HAVE_DISTINCT_FLOAT128
# define __iscanonicalf128(x) ((void) (__typeof (x)) (x), 1)
# endif
/* Return nonzero value if X is canonical. In IEEE interchange binary
formats, all values are canonical, but the argument must still be