1 /* A GNU-like <math.h>.
3 Copyright (C) 2002-2003, 2007-2011 Free Software Foundation, Inc.
5 This program is free software: you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program. If not, see <http://www.gnu.org/licenses/>. */
18 #ifndef _@GUARD_PREFIX@_MATH_H
21 @PRAGMA_SYSTEM_HEADER@
25 /* The include_next requires a split double-inclusion guard. */
26 #@INCLUDE_NEXT_AS_FIRST_DIRECTIVE@ @NEXT_AS_FIRST_DIRECTIVE_MATH_H@
28 #ifndef _@GUARD_PREFIX@_MATH_H
29 #define _@GUARD_PREFIX@_MATH_H
32 /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */
34 /* The definition of _GL_ARG_NONNULL is copied here. */
36 /* The definition of _GL_WARN_ON_USE is copied here. */
38 /* Helper macros to define a portability warning for the
39 classification macro FUNC called with VALUE. POSIX declares the
40 classification macros with an argument of real-floating (that is,
41 one of float, double, or long double). */
42 #define _GL_WARN_REAL_FLOATING_DECL(func) \
44 rpl_ ## func ## f (float f) \
49 rpl_ ## func ## d (double d) \
54 rpl_ ## func ## l (long double l) \
58 _GL_WARN_ON_USE (rpl_ ## func ## f, #func " is unportable - " \
59 "use gnulib module " #func " for portability"); \
60 _GL_WARN_ON_USE (rpl_ ## func ## d, #func " is unportable - " \
61 "use gnulib module " #func " for portability"); \
62 _GL_WARN_ON_USE (rpl_ ## func ## l, #func " is unportable - " \
63 "use gnulib module " #func " for portability")
64 #define _GL_WARN_REAL_FLOATING_IMPL(func, value) \
65 (sizeof (value) == sizeof (float) ? rpl_ ## func ## f (value) \
66 : sizeof (value) == sizeof (double) ? rpl_ ## func ## d (value) \
67 : rpl_ ## func ## l (value))
71 /* Pull in a function that fixes the 'int' to 'long double' conversion
73 _GL_EXTERN_C void _Qp_itoq (long double *, int);
74 static void (*_gl_math_fix_itold) (long double *, int) = _Qp_itoq;
78 /* POSIX allows platforms that don't support NAN. But all major
79 machines in the past 15 years have supported something close to
80 IEEE NaN, so we define this unconditionally. We also must define
81 it on platforms like Solaris 10, where NAN is present but defined
82 as a function pointer rather than a floating point constant. */
83 #if !defined NAN || @REPLACE_NAN@
84 # if !GNULIB_defined_NAN
86 /* The Compaq (ex-DEC) C 6.4 compiler and the Microsoft MSVC 9 compiler
87 choke on the expression 0.0 / 0.0. */
88 # if defined __DECC || defined _MSC_VER
92 static float zero = 0.0f;
97 # define NAN (0.0f / 0.0f)
99 # define GNULIB_defined_NAN 1
103 /* Solaris 10 defines HUGE_VAL, but as a function pointer rather
104 than a floating point constant. */
105 #if @REPLACE_HUGE_VAL@
107 # define HUGE_VAL (1.0 / 0.0)
114 _GL_FUNCDECL_SYS (acosf, float, (float x));
116 _GL_CXXALIAS_SYS (acosf, float, (float x));
117 _GL_CXXALIASWARN (acosf);
118 #elif defined GNULIB_POSIXCHECK
120 # if HAVE_RAW_DECL_ACOSF
121 _GL_WARN_ON_USE (acosf, "acosf is unportable - "
122 "use gnulib module acosf for portability");
127 # if !@HAVE_ACOSL@ || !@HAVE_DECL_ACOSL@
128 _GL_FUNCDECL_SYS (acosl, long double, (long double x));
130 _GL_CXXALIAS_SYS (acosl, long double, (long double x));
131 _GL_CXXALIASWARN (acosl);
132 #elif defined GNULIB_POSIXCHECK
134 # if HAVE_RAW_DECL_ACOSL
135 _GL_WARN_ON_USE (acosl, "acosl is unportable - "
136 "use gnulib module mathl for portability");
144 _GL_FUNCDECL_SYS (asinf, float, (float x));
146 _GL_CXXALIAS_SYS (asinf, float, (float x));
147 _GL_CXXALIASWARN (asinf);
148 #elif defined GNULIB_POSIXCHECK
150 # if HAVE_RAW_DECL_ASINF
151 _GL_WARN_ON_USE (asinf, "asinf is unportable - "
152 "use gnulib module asinf for portability");
157 # if !@HAVE_ASINL@ || !@HAVE_DECL_ASINL@
158 _GL_FUNCDECL_SYS (asinl, long double, (long double x));
160 _GL_CXXALIAS_SYS (asinl, long double, (long double x));
161 _GL_CXXALIASWARN (asinl);
162 #elif defined GNULIB_POSIXCHECK
164 # if HAVE_RAW_DECL_ASINL
165 _GL_WARN_ON_USE (asinl, "asinl is unportable - "
166 "use gnulib module mathl for portability");
174 _GL_FUNCDECL_SYS (atanf, float, (float x));
176 _GL_CXXALIAS_SYS (atanf, float, (float x));
177 _GL_CXXALIASWARN (atanf);
178 #elif defined GNULIB_POSIXCHECK
180 # if HAVE_RAW_DECL_ATANF
181 _GL_WARN_ON_USE (atanf, "atanf is unportable - "
182 "use gnulib module atanf for portability");
187 # if !@HAVE_ATANL@ || !@HAVE_DECL_ATANL@
188 _GL_FUNCDECL_SYS (atanl, long double, (long double x));
190 _GL_CXXALIAS_SYS (atanl, long double, (long double x));
191 _GL_CXXALIASWARN (atanl);
192 #elif defined GNULIB_POSIXCHECK
194 # if HAVE_RAW_DECL_ATANL
195 _GL_WARN_ON_USE (atanl, "atanl is unportable - "
196 "use gnulib module mathl for portability");
204 _GL_FUNCDECL_SYS (atan2f, float, (float y, float x));
206 _GL_CXXALIAS_SYS (atan2f, float, (float y, float x));
207 _GL_CXXALIASWARN (atan2f);
208 #elif defined GNULIB_POSIXCHECK
210 # if HAVE_RAW_DECL_ATAN2F
211 _GL_WARN_ON_USE (atan2f, "atan2f is unportable - "
212 "use gnulib module atan2f for portability");
219 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
221 # define ceilf rpl_ceilf
223 _GL_FUNCDECL_RPL (ceilf, float, (float x));
224 _GL_CXXALIAS_RPL (ceilf, float, (float x));
226 # if !@HAVE_DECL_CEILF@
227 _GL_FUNCDECL_SYS (ceilf, float, (float x));
229 _GL_CXXALIAS_SYS (ceilf, float, (float x));
231 _GL_CXXALIASWARN (ceilf);
232 #elif defined GNULIB_POSIXCHECK
234 # if HAVE_RAW_DECL_CEILF
235 _GL_WARN_ON_USE (ceilf, "ceilf is unportable - "
236 "use gnulib module ceilf for portability");
242 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
243 # define ceil rpl_ceil
245 _GL_FUNCDECL_RPL (ceil, double, (double x));
246 _GL_CXXALIAS_RPL (ceil, double, (double x));
248 _GL_CXXALIAS_SYS (ceil, double, (double x));
250 _GL_CXXALIASWARN (ceil);
255 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
257 # define ceill rpl_ceill
259 _GL_FUNCDECL_RPL (ceill, long double, (long double x));
260 _GL_CXXALIAS_RPL (ceill, long double, (long double x));
262 # if !@HAVE_DECL_CEILL@
263 _GL_FUNCDECL_SYS (ceill, long double, (long double x));
265 _GL_CXXALIAS_SYS (ceill, long double, (long double x));
267 _GL_CXXALIASWARN (ceill);
268 #elif defined GNULIB_POSIXCHECK
270 # if HAVE_RAW_DECL_CEILL
271 _GL_WARN_ON_USE (ceill, "ceill is unportable - "
272 "use gnulib module ceill for portability");
277 #if @GNULIB_COPYSIGNF@
278 # if !@HAVE_COPYSIGNF@
279 _GL_FUNCDECL_SYS (copysignf, float, (float x, float y));
281 _GL_CXXALIAS_SYS (copysignf, float, (float x, float y));
282 _GL_CXXALIASWARN (copysignf);
283 #elif defined GNULIB_POSIXCHECK
285 # if HAVE_RAW_DECL_COPYSIGNF
286 _GL_WARN_ON_USE (copysignf, "copysignf is unportable - "
287 "use gnulib module copysignf for portability");
291 #if @GNULIB_COPYSIGN@
292 # if !@HAVE_COPYSIGN@
293 _GL_FUNCDECL_SYS (copysign, double, (double x, double y));
295 _GL_CXXALIAS_SYS (copysign, double, (double x, double y));
296 _GL_CXXALIASWARN (copysign);
297 #elif defined GNULIB_POSIXCHECK
299 # if HAVE_RAW_DECL_COPYSIGN
300 _GL_WARN_ON_USE (copysign, "copysign is unportable - "
301 "use gnulib module copysign for portability");
309 _GL_FUNCDECL_SYS (cosf, float, (float x));
311 _GL_CXXALIAS_SYS (cosf, float, (float x));
312 _GL_CXXALIASWARN (cosf);
313 #elif defined GNULIB_POSIXCHECK
315 # if HAVE_RAW_DECL_COSF
316 _GL_WARN_ON_USE (cosf, "cosf is unportable - "
317 "use gnulib module cosf for portability");
322 # if !@HAVE_COSL@ || !@HAVE_DECL_COSL@
323 _GL_FUNCDECL_SYS (cosl, long double, (long double x));
325 _GL_CXXALIAS_SYS (cosl, long double, (long double x));
326 _GL_CXXALIASWARN (cosl);
327 #elif defined GNULIB_POSIXCHECK
329 # if HAVE_RAW_DECL_COSL
330 _GL_WARN_ON_USE (cosl, "cosl is unportable - "
331 "use gnulib module mathl for portability");
339 _GL_FUNCDECL_SYS (coshf, float, (float x));
341 _GL_CXXALIAS_SYS (coshf, float, (float x));
342 _GL_CXXALIASWARN (coshf);
343 #elif defined GNULIB_POSIXCHECK
345 # if HAVE_RAW_DECL_COSHF
346 _GL_WARN_ON_USE (coshf, "coshf is unportable - "
347 "use gnulib module coshf for portability");
355 _GL_FUNCDECL_SYS (expf, float, (float x));
357 _GL_CXXALIAS_SYS (expf, float, (float x));
358 _GL_CXXALIASWARN (expf);
359 #elif defined GNULIB_POSIXCHECK
361 # if HAVE_RAW_DECL_EXPF
362 _GL_WARN_ON_USE (expf, "expf is unportable - "
363 "use gnulib module expf for portability");
368 # if !@HAVE_EXPL@ || !@HAVE_DECL_EXPL@
369 _GL_FUNCDECL_SYS (expl, long double, (long double x));
371 _GL_CXXALIAS_SYS (expl, long double, (long double x));
372 _GL_CXXALIASWARN (expl);
373 #elif defined GNULIB_POSIXCHECK
375 # if HAVE_RAW_DECL_EXPL
376 _GL_WARN_ON_USE (expl, "expl is unportable - "
377 "use gnulib module mathl for portability");
385 _GL_FUNCDECL_SYS (fabsf, float, (float x));
387 _GL_CXXALIAS_SYS (fabsf, float, (float x));
388 _GL_CXXALIASWARN (fabsf);
389 #elif defined GNULIB_POSIXCHECK
391 # if HAVE_RAW_DECL_FABSF
392 _GL_WARN_ON_USE (fabsf, "fabsf is unportable - "
393 "use gnulib module fabsf for portability");
399 # if @REPLACE_FLOORF@
400 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
402 # define floorf rpl_floorf
404 _GL_FUNCDECL_RPL (floorf, float, (float x));
405 _GL_CXXALIAS_RPL (floorf, float, (float x));
407 # if !@HAVE_DECL_FLOORF@
408 _GL_FUNCDECL_SYS (floorf, float, (float x));
410 _GL_CXXALIAS_SYS (floorf, float, (float x));
412 _GL_CXXALIASWARN (floorf);
413 #elif defined GNULIB_POSIXCHECK
415 # if HAVE_RAW_DECL_FLOORF
416 _GL_WARN_ON_USE (floorf, "floorf is unportable - "
417 "use gnulib module floorf for portability");
423 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
424 # define floor rpl_floor
426 _GL_FUNCDECL_RPL (floor, double, (double x));
427 _GL_CXXALIAS_RPL (floor, double, (double x));
429 _GL_CXXALIAS_SYS (floor, double, (double x));
431 _GL_CXXALIASWARN (floor);
435 # if @REPLACE_FLOORL@
436 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
438 # define floorl rpl_floorl
440 _GL_FUNCDECL_RPL (floorl, long double, (long double x));
441 _GL_CXXALIAS_RPL (floorl, long double, (long double x));
443 # if !@HAVE_DECL_FLOORL@
444 _GL_FUNCDECL_SYS (floorl, long double, (long double x));
446 _GL_CXXALIAS_SYS (floorl, long double, (long double x));
448 _GL_CXXALIASWARN (floorl);
449 #elif defined GNULIB_POSIXCHECK
451 # if HAVE_RAW_DECL_FLOORL
452 _GL_WARN_ON_USE (floorl, "floorl is unportable - "
453 "use gnulib module floorl for portability");
461 _GL_FUNCDECL_SYS (fmodf, float, (float x, float y));
463 _GL_CXXALIAS_SYS (fmodf, float, (float x, float y));
464 _GL_CXXALIASWARN (fmodf);
465 #elif defined GNULIB_POSIXCHECK
467 # if HAVE_RAW_DECL_FMODF
468 _GL_WARN_ON_USE (fmodf, "fmodf is unportable - "
469 "use gnulib module fmodf for portability");
477 If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
478 If x is zero: mantissa = x, exp = 0.
479 If x is infinite or NaN: mantissa = x, exp unspecified.
480 Store exp in *EXPPTR and return mantissa. */
482 # if @REPLACE_FREXPF@
483 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
485 # define frexpf rpl_frexpf
487 _GL_FUNCDECL_RPL (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
488 _GL_CXXALIAS_RPL (frexpf, float, (float x, int *expptr));
492 _GL_FUNCDECL_SYS (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
494 _GL_CXXALIAS_SYS (frexpf, float, (float x, int *expptr));
496 _GL_CXXALIASWARN (frexpf);
497 #elif defined GNULIB_POSIXCHECK
499 # if HAVE_RAW_DECL_FREXPF
500 _GL_WARN_ON_USE (frexpf, "frexpf is unportable - "
501 "use gnulib module frexpf for portability");
508 If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
509 If x is zero: mantissa = x, exp = 0.
510 If x is infinite or NaN: mantissa = x, exp unspecified.
511 Store exp in *EXPPTR and return mantissa. */
514 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
515 # define frexp rpl_frexp
517 _GL_FUNCDECL_RPL (frexp, double, (double x, int *expptr) _GL_ARG_NONNULL ((2)));
518 _GL_CXXALIAS_RPL (frexp, double, (double x, int *expptr));
520 _GL_CXXALIAS_SYS (frexp, double, (double x, int *expptr));
522 _GL_CXXALIASWARN (frexp);
523 #elif defined GNULIB_POSIXCHECK
525 /* Assume frexp is always declared. */
526 _GL_WARN_ON_USE (frexp, "frexp is unportable - "
527 "use gnulib module frexp for portability");
533 If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
534 If x is zero: mantissa = x, exp = 0.
535 If x is infinite or NaN: mantissa = x, exp unspecified.
536 Store exp in *EXPPTR and return mantissa. */
537 #if @GNULIB_FREXPL@ && @REPLACE_FREXPL@
538 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
540 # define frexpl rpl_frexpl
542 _GL_FUNCDECL_RPL (frexpl, long double,
543 (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
544 _GL_CXXALIAS_RPL (frexpl, long double, (long double x, int *expptr));
546 # if !@HAVE_DECL_FREXPL@
547 _GL_FUNCDECL_SYS (frexpl, long double,
548 (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
551 _GL_CXXALIAS_SYS (frexpl, long double, (long double x, int *expptr));
554 #if @GNULIB_FREXPL@ && !(@REPLACE_FREXPL@ && !@HAVE_DECL_FREXPL@)
555 _GL_CXXALIASWARN (frexpl);
557 #if !@GNULIB_FREXPL@ && defined GNULIB_POSIXCHECK
559 # if HAVE_RAW_DECL_FREXPL
560 _GL_WARN_ON_USE (frexpl, "frexpl is unportable - "
561 "use gnulib module frexpl for portability");
566 /* Return x * 2^exp. */
570 _GL_FUNCDECL_SYS (ldexpf, float, (float x, int exp));
572 _GL_CXXALIAS_SYS (ldexpf, float, (float x, int exp));
573 _GL_CXXALIASWARN (ldexpf);
574 #elif defined GNULIB_POSIXCHECK
576 # if HAVE_RAW_DECL_LDEXPF
577 _GL_WARN_ON_USE (ldexpf, "ldexpf is unportable - "
578 "use gnulib module ldexpf for portability");
582 /* Return x * 2^exp. */
583 #if @GNULIB_LDEXPL@ && @REPLACE_LDEXPL@
584 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
586 # define ldexpl rpl_ldexpl
588 _GL_FUNCDECL_RPL (ldexpl, long double, (long double x, int exp));
589 _GL_CXXALIAS_RPL (ldexpl, long double, (long double x, int exp));
591 # if !@HAVE_DECL_LDEXPL@
592 _GL_FUNCDECL_SYS (ldexpl, long double, (long double x, int exp));
595 _GL_CXXALIAS_SYS (ldexpl, long double, (long double x, int exp));
599 _GL_CXXALIASWARN (ldexpl);
601 #if !@GNULIB_LDEXPL@ && defined GNULIB_POSIXCHECK
603 # if HAVE_RAW_DECL_LDEXPL
604 _GL_WARN_ON_USE (ldexpl, "ldexpl is unportable - "
605 "use gnulib module ldexpl for portability");
611 # if !@HAVE_DECL_LOGB@
612 _GL_EXTERN_C double logb (double x);
614 #elif defined GNULIB_POSIXCHECK
616 # if HAVE_RAW_DECL_LOGB
617 _GL_WARN_ON_USE (logb, "logb is unportable - "
618 "use gnulib module logb for portability");
626 _GL_FUNCDECL_SYS (logf, float, (float x));
628 _GL_CXXALIAS_SYS (logf, float, (float x));
629 _GL_CXXALIASWARN (logf);
630 #elif defined GNULIB_POSIXCHECK
632 # if HAVE_RAW_DECL_LOGF
633 _GL_WARN_ON_USE (logf, "logf is unportable - "
634 "use gnulib module logf for portability");
639 # if !@HAVE_LOGL@ || !@HAVE_DECL_LOGL@
640 _GL_FUNCDECL_SYS (logl, long double, (long double x));
642 _GL_CXXALIAS_SYS (logl, long double, (long double x));
643 _GL_CXXALIASWARN (logl);
644 #elif defined GNULIB_POSIXCHECK
646 # if HAVE_RAW_DECL_LOGL
647 _GL_WARN_ON_USE (logl, "logl is unportable - "
648 "use gnulib module mathl for portability");
656 _GL_FUNCDECL_SYS (log10f, float, (float x));
658 _GL_CXXALIAS_SYS (log10f, float, (float x));
659 _GL_CXXALIASWARN (log10f);
660 #elif defined GNULIB_POSIXCHECK
662 # if HAVE_RAW_DECL_LOG10F
663 _GL_WARN_ON_USE (log10f, "log10f is unportable - "
664 "use gnulib module log10f for portability");
672 _GL_FUNCDECL_SYS (modff, float, (float x, float *iptr) _GL_ARG_NONNULL ((2)));
674 _GL_CXXALIAS_SYS (modff, float, (float x, float *iptr));
675 _GL_CXXALIASWARN (modff);
676 #elif defined GNULIB_POSIXCHECK
678 # if HAVE_RAW_DECL_MODFF
679 _GL_WARN_ON_USE (modff, "modff is unportable - "
680 "use gnulib module modff for portability");
688 _GL_FUNCDECL_SYS (powf, float, (float x, float y));
690 _GL_CXXALIAS_SYS (powf, float, (float x, float y));
691 _GL_CXXALIASWARN (powf);
692 #elif defined GNULIB_POSIXCHECK
694 # if HAVE_RAW_DECL_POWF
695 _GL_WARN_ON_USE (powf, "powf is unportable - "
696 "use gnulib module powf for portability");
702 # if @REPLACE_ROUNDF@
703 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
705 # define roundf rpl_roundf
707 _GL_FUNCDECL_RPL (roundf, float, (float x));
708 _GL_CXXALIAS_RPL (roundf, float, (float x));
710 # if !@HAVE_DECL_ROUNDF@
711 _GL_FUNCDECL_SYS (roundf, float, (float x));
713 _GL_CXXALIAS_SYS (roundf, float, (float x));
715 _GL_CXXALIASWARN (roundf);
716 #elif defined GNULIB_POSIXCHECK
718 # if HAVE_RAW_DECL_ROUNDF
719 _GL_WARN_ON_USE (roundf, "roundf is unportable - "
720 "use gnulib module roundf for portability");
726 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
728 # define round rpl_round
730 _GL_FUNCDECL_RPL (round, double, (double x));
731 _GL_CXXALIAS_RPL (round, double, (double x));
733 # if !@HAVE_DECL_ROUND@
734 _GL_FUNCDECL_SYS (round, double, (double x));
736 _GL_CXXALIAS_SYS (round, double, (double x));
738 _GL_CXXALIASWARN (round);
739 #elif defined GNULIB_POSIXCHECK
741 # if HAVE_RAW_DECL_ROUND
742 _GL_WARN_ON_USE (round, "round is unportable - "
743 "use gnulib module round for portability");
748 # if @REPLACE_ROUNDL@
749 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
751 # define roundl rpl_roundl
753 _GL_FUNCDECL_RPL (roundl, long double, (long double x));
754 _GL_CXXALIAS_RPL (roundl, long double, (long double x));
756 # if !@HAVE_DECL_ROUNDL@
757 _GL_FUNCDECL_SYS (roundl, long double, (long double x));
759 _GL_CXXALIAS_SYS (roundl, long double, (long double x));
761 _GL_CXXALIASWARN (roundl);
762 #elif defined GNULIB_POSIXCHECK
764 # if HAVE_RAW_DECL_ROUNDL
765 _GL_WARN_ON_USE (roundl, "roundl is unportable - "
766 "use gnulib module roundl for portability");
774 _GL_FUNCDECL_SYS (sinf, float, (float x));
776 _GL_CXXALIAS_SYS (sinf, float, (float x));
777 _GL_CXXALIASWARN (sinf);
778 #elif defined GNULIB_POSIXCHECK
780 # if HAVE_RAW_DECL_SINF
781 _GL_WARN_ON_USE (sinf, "sinf is unportable - "
782 "use gnulib module sinf for portability");
787 # if !@HAVE_SINL@ || !@HAVE_DECL_SINL@
788 _GL_FUNCDECL_SYS (sinl, long double, (long double x));
790 _GL_CXXALIAS_SYS (sinl, long double, (long double x));
791 _GL_CXXALIASWARN (sinl);
792 #elif defined GNULIB_POSIXCHECK
794 # if HAVE_RAW_DECL_SINL
795 _GL_WARN_ON_USE (sinl, "sinl is unportable - "
796 "use gnulib module mathl for portability");
804 _GL_FUNCDECL_SYS (sinhf, float, (float x));
806 _GL_CXXALIAS_SYS (sinhf, float, (float x));
807 _GL_CXXALIASWARN (sinhf);
808 #elif defined GNULIB_POSIXCHECK
810 # if HAVE_RAW_DECL_SINHF
811 _GL_WARN_ON_USE (sinhf, "sinhf is unportable - "
812 "use gnulib module sinhf for portability");
820 _GL_FUNCDECL_SYS (sqrtf, float, (float x));
822 _GL_CXXALIAS_SYS (sqrtf, float, (float x));
823 _GL_CXXALIASWARN (sqrtf);
824 #elif defined GNULIB_POSIXCHECK
826 # if HAVE_RAW_DECL_SQRTF
827 _GL_WARN_ON_USE (sqrtf, "sqrtf is unportable - "
828 "use gnulib module sqrtf for portability");
833 # if !@HAVE_SQRTL@ || !@HAVE_DECL_SQRTL@
834 _GL_FUNCDECL_SYS (sqrtl, long double, (long double x));
836 _GL_CXXALIAS_SYS (sqrtl, long double, (long double x));
837 _GL_CXXALIASWARN (sqrtl);
838 #elif defined GNULIB_POSIXCHECK
840 # if HAVE_RAW_DECL_SQRTL
841 _GL_WARN_ON_USE (sqrtl, "sqrtl is unportable - "
842 "use gnulib module mathl for portability");
850 _GL_FUNCDECL_SYS (tanf, float, (float x));
852 _GL_CXXALIAS_SYS (tanf, float, (float x));
853 _GL_CXXALIASWARN (tanf);
854 #elif defined GNULIB_POSIXCHECK
856 # if HAVE_RAW_DECL_TANF
857 _GL_WARN_ON_USE (tanf, "tanf is unportable - "
858 "use gnulib module tanf for portability");
863 # if !@HAVE_TANL@ || !@HAVE_DECL_TANL@
864 _GL_FUNCDECL_SYS (tanl, long double, (long double x));
866 _GL_CXXALIAS_SYS (tanl, long double, (long double x));
867 _GL_CXXALIASWARN (tanl);
868 #elif defined GNULIB_POSIXCHECK
870 # if HAVE_RAW_DECL_TANL
871 _GL_WARN_ON_USE (tanl, "tanl is unportable - "
872 "use gnulib module mathl for portability");
880 _GL_FUNCDECL_SYS (tanhf, float, (float x));
882 _GL_CXXALIAS_SYS (tanhf, float, (float x));
883 _GL_CXXALIASWARN (tanhf);
884 #elif defined GNULIB_POSIXCHECK
886 # if HAVE_RAW_DECL_TANHF
887 _GL_WARN_ON_USE (tanhf, "tanhf is unportable - "
888 "use gnulib module tanhf for portability");
894 # if @REPLACE_TRUNCF@
895 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
896 # define truncf rpl_truncf
898 _GL_FUNCDECL_RPL (truncf, float, (float x));
899 _GL_CXXALIAS_RPL (truncf, float, (float x));
901 # if !@HAVE_DECL_TRUNCF@
902 _GL_FUNCDECL_SYS (truncf, float, (float x));
904 _GL_CXXALIAS_SYS (truncf, float, (float x));
906 _GL_CXXALIASWARN (truncf);
907 #elif defined GNULIB_POSIXCHECK
909 # if HAVE_RAW_DECL_TRUNCF
910 _GL_WARN_ON_USE (truncf, "truncf is unportable - "
911 "use gnulib module truncf for portability");
917 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
918 # define trunc rpl_trunc
920 _GL_FUNCDECL_RPL (trunc, double, (double x));
921 _GL_CXXALIAS_RPL (trunc, double, (double x));
923 # if !@HAVE_DECL_TRUNC@
924 _GL_FUNCDECL_SYS (trunc, double, (double x));
926 _GL_CXXALIAS_SYS (trunc, double, (double x));
928 _GL_CXXALIASWARN (trunc);
929 #elif defined GNULIB_POSIXCHECK
931 # if HAVE_RAW_DECL_TRUNC
932 _GL_WARN_ON_USE (trunc, "trunc is unportable - "
933 "use gnulib module trunc for portability");
938 # if @REPLACE_TRUNCL@
939 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
941 # define truncl rpl_truncl
943 _GL_FUNCDECL_RPL (truncl, long double, (long double x));
944 _GL_CXXALIAS_RPL (truncl, long double, (long double x));
946 # if !@HAVE_DECL_TRUNCL@
947 _GL_FUNCDECL_SYS (truncl, long double, (long double x));
949 _GL_CXXALIAS_SYS (truncl, long double, (long double x));
951 _GL_CXXALIASWARN (truncl);
952 #elif defined GNULIB_POSIXCHECK
954 # if HAVE_RAW_DECL_TRUNCL
955 _GL_WARN_ON_USE (truncl, "truncl is unportable - "
956 "use gnulib module truncl for portability");
961 /* Definitions of function-like macros come here, after the function
965 #if @GNULIB_ISFINITE@
966 # if @REPLACE_ISFINITE@
967 _GL_EXTERN_C int gl_isfinitef (float x);
968 _GL_EXTERN_C int gl_isfinited (double x);
969 _GL_EXTERN_C int gl_isfinitel (long double x);
971 # define isfinite(x) \
972 (sizeof (x) == sizeof (long double) ? gl_isfinitel (x) : \
973 sizeof (x) == sizeof (double) ? gl_isfinited (x) : \
976 #elif defined GNULIB_POSIXCHECK
977 # if defined isfinite
978 _GL_WARN_REAL_FLOATING_DECL (isfinite);
980 # define isfinite(x) _GL_WARN_REAL_FLOATING_IMPL (isfinite, x)
987 _GL_EXTERN_C int gl_isinff (float x);
988 _GL_EXTERN_C int gl_isinfd (double x);
989 _GL_EXTERN_C int gl_isinfl (long double x);
992 (sizeof (x) == sizeof (long double) ? gl_isinfl (x) : \
993 sizeof (x) == sizeof (double) ? gl_isinfd (x) : \
996 #elif defined GNULIB_POSIXCHECK
998 _GL_WARN_REAL_FLOATING_DECL (isinf);
1000 # define isinf(x) _GL_WARN_REAL_FLOATING_IMPL (isinf, x)
1006 /* Test for NaN for 'float' numbers. */
1008 /* The original <math.h> included above provides a declaration of isnan macro
1009 or (older) isnanf function. */
1011 /* GCC 4.0 and newer provides three built-ins for isnan. */
1013 # define isnanf(x) __builtin_isnanf ((float)(x))
1014 # elif defined isnan
1016 # define isnanf(x) isnan ((float)(x))
1019 /* Test whether X is a NaN. */
1021 # define isnanf rpl_isnanf
1022 _GL_EXTERN_C int isnanf (float x);
1027 /* Test for NaN for 'double' numbers.
1028 This function is a gnulib extension, unlike isnan() which applied only
1029 to 'double' numbers earlier but now is a type-generic macro. */
1031 /* The original <math.h> included above provides a declaration of isnan
1034 /* GCC 4.0 and newer provides three built-ins for isnan. */
1036 # define isnand(x) __builtin_isnan ((double)(x))
1039 # define isnand(x) isnan ((double)(x))
1042 /* Test whether X is a NaN. */
1044 # define isnand rpl_isnand
1045 _GL_EXTERN_C int isnand (double x);
1050 /* Test for NaN for 'long double' numbers. */
1052 /* The original <math.h> included above provides a declaration of isnan
1053 macro or (older) isnanl function. */
1055 /* GCC 4.0 and newer provides three built-ins for isnan. */
1057 # define isnanl(x) __builtin_isnanl ((long double)(x))
1058 # elif defined isnan
1060 # define isnanl(x) isnan ((long double)(x))
1063 /* Test whether X is a NaN. */
1065 # define isnanl rpl_isnanl
1066 _GL_EXTERN_C int isnanl (long double x);
1070 /* This must come *after* the snippets for GNULIB_ISNANF and GNULIB_ISNANL! */
1072 # if @REPLACE_ISNAN@
1073 /* We can't just use the isnanf macro (e.g.) as exposed by
1074 isnanf.h (e.g.) here, because those may end up being macros
1075 that recursively expand back to isnan. So use the gnulib
1076 replacements for them directly. */
1077 # if @HAVE_ISNANF@ && __GNUC__ >= 4
1078 # define gl_isnan_f(x) __builtin_isnanf ((float)(x))
1080 _GL_EXTERN_C int rpl_isnanf (float x);
1081 # define gl_isnan_f(x) rpl_isnanf (x)
1083 # if @HAVE_ISNAND@ && __GNUC__ >= 4
1084 # define gl_isnan_d(x) __builtin_isnan ((double)(x))
1086 _GL_EXTERN_C int rpl_isnand (double x);
1087 # define gl_isnan_d(x) rpl_isnand (x)
1089 # if @HAVE_ISNANL@ && __GNUC__ >= 4
1090 # define gl_isnan_l(x) __builtin_isnanl ((long double)(x))
1092 _GL_EXTERN_C int rpl_isnanl (long double x);
1093 # define gl_isnan_l(x) rpl_isnanl (x)
1097 (sizeof (x) == sizeof (long double) ? gl_isnan_l (x) : \
1098 sizeof (x) == sizeof (double) ? gl_isnan_d (x) : \
1100 # elif __GNUC__ >= 4
1103 (sizeof (x) == sizeof (long double) ? __builtin_isnanl ((long double)(x)) : \
1104 sizeof (x) == sizeof (double) ? __builtin_isnan ((double)(x)) : \
1105 __builtin_isnanf ((float)(x)))
1107 /* Ensure isnan is a macro. */
1109 # define isnan isnan
1111 #elif defined GNULIB_POSIXCHECK
1113 _GL_WARN_REAL_FLOATING_DECL (isnan);
1115 # define isnan(x) _GL_WARN_REAL_FLOATING_IMPL (isnan, x)
1120 #if @GNULIB_SIGNBIT@
1121 # if @REPLACE_SIGNBIT_USING_GCC@
1123 /* GCC 4.0 and newer provides three built-ins for signbit. */
1124 # define signbit(x) \
1125 (sizeof (x) == sizeof (long double) ? __builtin_signbitl (x) : \
1126 sizeof (x) == sizeof (double) ? __builtin_signbit (x) : \
1127 __builtin_signbitf (x))
1129 # if @REPLACE_SIGNBIT@
1131 _GL_EXTERN_C int gl_signbitf (float arg);
1132 _GL_EXTERN_C int gl_signbitd (double arg);
1133 _GL_EXTERN_C int gl_signbitl (long double arg);
1134 # if __GNUC__ >= 2 && !__STRICT_ANSI__
1135 # define _GL_NUM_UINT_WORDS(type) \
1136 ((sizeof (type) + sizeof (unsigned int) - 1) / sizeof (unsigned int))
1137 # if defined FLT_SIGNBIT_WORD && defined FLT_SIGNBIT_BIT && !defined gl_signbitf
1138 # define gl_signbitf_OPTIMIZED_MACRO
1139 # define gl_signbitf(arg) \
1140 ({ union { float _value; \
1141 unsigned int _word[_GL_NUM_UINT_WORDS (float)]; \
1143 _m._value = (arg); \
1144 (_m._word[FLT_SIGNBIT_WORD] >> FLT_SIGNBIT_BIT) & 1; \
1147 # if defined DBL_SIGNBIT_WORD && defined DBL_SIGNBIT_BIT && !defined gl_signbitd
1148 # define gl_signbitd_OPTIMIZED_MACRO
1149 # define gl_signbitd(arg) \
1150 ({ union { double _value; \
1151 unsigned int _word[_GL_NUM_UINT_WORDS (double)]; \
1153 _m._value = (arg); \
1154 (_m._word[DBL_SIGNBIT_WORD] >> DBL_SIGNBIT_BIT) & 1; \
1157 # if defined LDBL_SIGNBIT_WORD && defined LDBL_SIGNBIT_BIT && !defined gl_signbitl
1158 # define gl_signbitl_OPTIMIZED_MACRO
1159 # define gl_signbitl(arg) \
1160 ({ union { long double _value; \
1161 unsigned int _word[_GL_NUM_UINT_WORDS (long double)]; \
1163 _m._value = (arg); \
1164 (_m._word[LDBL_SIGNBIT_WORD] >> LDBL_SIGNBIT_BIT) & 1; \
1168 # define signbit(x) \
1169 (sizeof (x) == sizeof (long double) ? gl_signbitl (x) : \
1170 sizeof (x) == sizeof (double) ? gl_signbitd (x) : \
1173 #elif defined GNULIB_POSIXCHECK
1174 # if defined signbit
1175 _GL_WARN_REAL_FLOATING_DECL (signbit);
1177 # define signbit(x) _GL_WARN_REAL_FLOATING_IMPL (signbit, x)
1182 #endif /* _@GUARD_PREFIX@_MATH_H */
1183 #endif /* _@GUARD_PREFIX@_MATH_H */