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");
305 #if @GNULIB_COPYSIGNL@
306 # if !@HAVE_COPYSIGNL@
307 _GL_FUNCDECL_SYS (copysignl, long double, (long double x, long double y));
309 _GL_CXXALIAS_SYS (copysignl, long double, (long double x, long double y));
310 _GL_CXXALIASWARN (copysignl);
311 #elif defined GNULIB_POSIXCHECK
313 # if HAVE_RAW_DECL_COPYSIGNL
314 _GL_WARN_ON_USE (copysign, "copysignl is unportable - "
315 "use gnulib module copysignl for portability");
323 _GL_FUNCDECL_SYS (cosf, float, (float x));
325 _GL_CXXALIAS_SYS (cosf, float, (float x));
326 _GL_CXXALIASWARN (cosf);
327 #elif defined GNULIB_POSIXCHECK
329 # if HAVE_RAW_DECL_COSF
330 _GL_WARN_ON_USE (cosf, "cosf is unportable - "
331 "use gnulib module cosf for portability");
336 # if !@HAVE_COSL@ || !@HAVE_DECL_COSL@
337 _GL_FUNCDECL_SYS (cosl, long double, (long double x));
339 _GL_CXXALIAS_SYS (cosl, long double, (long double x));
340 _GL_CXXALIASWARN (cosl);
341 #elif defined GNULIB_POSIXCHECK
343 # if HAVE_RAW_DECL_COSL
344 _GL_WARN_ON_USE (cosl, "cosl is unportable - "
345 "use gnulib module mathl for portability");
353 _GL_FUNCDECL_SYS (coshf, float, (float x));
355 _GL_CXXALIAS_SYS (coshf, float, (float x));
356 _GL_CXXALIASWARN (coshf);
357 #elif defined GNULIB_POSIXCHECK
359 # if HAVE_RAW_DECL_COSHF
360 _GL_WARN_ON_USE (coshf, "coshf is unportable - "
361 "use gnulib module coshf for portability");
369 _GL_FUNCDECL_SYS (expf, float, (float x));
371 _GL_CXXALIAS_SYS (expf, float, (float x));
372 _GL_CXXALIASWARN (expf);
373 #elif defined GNULIB_POSIXCHECK
375 # if HAVE_RAW_DECL_EXPF
376 _GL_WARN_ON_USE (expf, "expf is unportable - "
377 "use gnulib module expf for portability");
382 # if !@HAVE_EXPL@ || !@HAVE_DECL_EXPL@
383 _GL_FUNCDECL_SYS (expl, long double, (long double x));
385 _GL_CXXALIAS_SYS (expl, long double, (long double x));
386 _GL_CXXALIASWARN (expl);
387 #elif defined GNULIB_POSIXCHECK
389 # if HAVE_RAW_DECL_EXPL
390 _GL_WARN_ON_USE (expl, "expl is unportable - "
391 "use gnulib module mathl for portability");
399 _GL_FUNCDECL_SYS (fabsf, float, (float x));
401 _GL_CXXALIAS_SYS (fabsf, float, (float x));
402 _GL_CXXALIASWARN (fabsf);
403 #elif defined GNULIB_POSIXCHECK
405 # if HAVE_RAW_DECL_FABSF
406 _GL_WARN_ON_USE (fabsf, "fabsf is unportable - "
407 "use gnulib module fabsf for portability");
413 # if @REPLACE_FLOORF@
414 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
416 # define floorf rpl_floorf
418 _GL_FUNCDECL_RPL (floorf, float, (float x));
419 _GL_CXXALIAS_RPL (floorf, float, (float x));
421 # if !@HAVE_DECL_FLOORF@
422 _GL_FUNCDECL_SYS (floorf, float, (float x));
424 _GL_CXXALIAS_SYS (floorf, float, (float x));
426 _GL_CXXALIASWARN (floorf);
427 #elif defined GNULIB_POSIXCHECK
429 # if HAVE_RAW_DECL_FLOORF
430 _GL_WARN_ON_USE (floorf, "floorf is unportable - "
431 "use gnulib module floorf for portability");
437 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
438 # define floor rpl_floor
440 _GL_FUNCDECL_RPL (floor, double, (double x));
441 _GL_CXXALIAS_RPL (floor, double, (double x));
443 _GL_CXXALIAS_SYS (floor, double, (double x));
445 _GL_CXXALIASWARN (floor);
449 # if @REPLACE_FLOORL@
450 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
452 # define floorl rpl_floorl
454 _GL_FUNCDECL_RPL (floorl, long double, (long double x));
455 _GL_CXXALIAS_RPL (floorl, long double, (long double x));
457 # if !@HAVE_DECL_FLOORL@
458 _GL_FUNCDECL_SYS (floorl, long double, (long double x));
460 _GL_CXXALIAS_SYS (floorl, long double, (long double x));
462 _GL_CXXALIASWARN (floorl);
463 #elif defined GNULIB_POSIXCHECK
465 # if HAVE_RAW_DECL_FLOORL
466 _GL_WARN_ON_USE (floorl, "floorl is unportable - "
467 "use gnulib module floorl for portability");
475 _GL_FUNCDECL_SYS (fmodf, float, (float x, float y));
477 _GL_CXXALIAS_SYS (fmodf, float, (float x, float y));
478 _GL_CXXALIASWARN (fmodf);
479 #elif defined GNULIB_POSIXCHECK
481 # if HAVE_RAW_DECL_FMODF
482 _GL_WARN_ON_USE (fmodf, "fmodf is unportable - "
483 "use gnulib module fmodf for portability");
491 If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
492 If x is zero: mantissa = x, exp = 0.
493 If x is infinite or NaN: mantissa = x, exp unspecified.
494 Store exp in *EXPPTR and return mantissa. */
496 # if @REPLACE_FREXPF@
497 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
499 # define frexpf rpl_frexpf
501 _GL_FUNCDECL_RPL (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
502 _GL_CXXALIAS_RPL (frexpf, float, (float x, int *expptr));
506 _GL_FUNCDECL_SYS (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
508 _GL_CXXALIAS_SYS (frexpf, float, (float x, int *expptr));
510 _GL_CXXALIASWARN (frexpf);
511 #elif defined GNULIB_POSIXCHECK
513 # if HAVE_RAW_DECL_FREXPF
514 _GL_WARN_ON_USE (frexpf, "frexpf is unportable - "
515 "use gnulib module frexpf for portability");
522 If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
523 If x is zero: mantissa = x, exp = 0.
524 If x is infinite or NaN: mantissa = x, exp unspecified.
525 Store exp in *EXPPTR and return mantissa. */
528 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
529 # define frexp rpl_frexp
531 _GL_FUNCDECL_RPL (frexp, double, (double x, int *expptr) _GL_ARG_NONNULL ((2)));
532 _GL_CXXALIAS_RPL (frexp, double, (double x, int *expptr));
534 _GL_CXXALIAS_SYS (frexp, double, (double x, int *expptr));
536 _GL_CXXALIASWARN (frexp);
537 #elif defined GNULIB_POSIXCHECK
539 /* Assume frexp is always declared. */
540 _GL_WARN_ON_USE (frexp, "frexp is unportable - "
541 "use gnulib module frexp for portability");
547 If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
548 If x is zero: mantissa = x, exp = 0.
549 If x is infinite or NaN: mantissa = x, exp unspecified.
550 Store exp in *EXPPTR and return mantissa. */
551 #if @GNULIB_FREXPL@ && @REPLACE_FREXPL@
552 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
554 # define frexpl rpl_frexpl
556 _GL_FUNCDECL_RPL (frexpl, long double,
557 (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
558 _GL_CXXALIAS_RPL (frexpl, long double, (long double x, int *expptr));
560 # if !@HAVE_DECL_FREXPL@
561 _GL_FUNCDECL_SYS (frexpl, long double,
562 (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
565 _GL_CXXALIAS_SYS (frexpl, long double, (long double x, int *expptr));
568 #if @GNULIB_FREXPL@ && !(@REPLACE_FREXPL@ && !@HAVE_DECL_FREXPL@)
569 _GL_CXXALIASWARN (frexpl);
571 #if !@GNULIB_FREXPL@ && defined GNULIB_POSIXCHECK
573 # if HAVE_RAW_DECL_FREXPL
574 _GL_WARN_ON_USE (frexpl, "frexpl is unportable - "
575 "use gnulib module frexpl for portability");
580 /* Return x * 2^exp. */
584 _GL_FUNCDECL_SYS (ldexpf, float, (float x, int exp));
586 _GL_CXXALIAS_SYS (ldexpf, float, (float x, int exp));
587 _GL_CXXALIASWARN (ldexpf);
588 #elif defined GNULIB_POSIXCHECK
590 # if HAVE_RAW_DECL_LDEXPF
591 _GL_WARN_ON_USE (ldexpf, "ldexpf is unportable - "
592 "use gnulib module ldexpf for portability");
596 /* Return x * 2^exp. */
597 #if @GNULIB_LDEXPL@ && @REPLACE_LDEXPL@
598 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
600 # define ldexpl rpl_ldexpl
602 _GL_FUNCDECL_RPL (ldexpl, long double, (long double x, int exp));
603 _GL_CXXALIAS_RPL (ldexpl, long double, (long double x, int exp));
605 # if !@HAVE_DECL_LDEXPL@
606 _GL_FUNCDECL_SYS (ldexpl, long double, (long double x, int exp));
609 _GL_CXXALIAS_SYS (ldexpl, long double, (long double x, int exp));
613 _GL_CXXALIASWARN (ldexpl);
615 #if !@GNULIB_LDEXPL@ && defined GNULIB_POSIXCHECK
617 # if HAVE_RAW_DECL_LDEXPL
618 _GL_WARN_ON_USE (ldexpl, "ldexpl is unportable - "
619 "use gnulib module ldexpl for portability");
625 # if !@HAVE_DECL_LOGB@
626 _GL_EXTERN_C double logb (double x);
628 #elif defined GNULIB_POSIXCHECK
630 # if HAVE_RAW_DECL_LOGB
631 _GL_WARN_ON_USE (logb, "logb is unportable - "
632 "use gnulib module logb for portability");
640 _GL_FUNCDECL_SYS (logf, float, (float x));
642 _GL_CXXALIAS_SYS (logf, float, (float x));
643 _GL_CXXALIASWARN (logf);
644 #elif defined GNULIB_POSIXCHECK
646 # if HAVE_RAW_DECL_LOGF
647 _GL_WARN_ON_USE (logf, "logf is unportable - "
648 "use gnulib module logf for portability");
653 # if !@HAVE_LOGL@ || !@HAVE_DECL_LOGL@
654 _GL_FUNCDECL_SYS (logl, long double, (long double x));
656 _GL_CXXALIAS_SYS (logl, long double, (long double x));
657 _GL_CXXALIASWARN (logl);
658 #elif defined GNULIB_POSIXCHECK
660 # if HAVE_RAW_DECL_LOGL
661 _GL_WARN_ON_USE (logl, "logl is unportable - "
662 "use gnulib module mathl for portability");
670 _GL_FUNCDECL_SYS (log10f, float, (float x));
672 _GL_CXXALIAS_SYS (log10f, float, (float x));
673 _GL_CXXALIASWARN (log10f);
674 #elif defined GNULIB_POSIXCHECK
676 # if HAVE_RAW_DECL_LOG10F
677 _GL_WARN_ON_USE (log10f, "log10f is unportable - "
678 "use gnulib module log10f for portability");
686 _GL_FUNCDECL_SYS (modff, float, (float x, float *iptr) _GL_ARG_NONNULL ((2)));
688 _GL_CXXALIAS_SYS (modff, float, (float x, float *iptr));
689 _GL_CXXALIASWARN (modff);
690 #elif defined GNULIB_POSIXCHECK
692 # if HAVE_RAW_DECL_MODFF
693 _GL_WARN_ON_USE (modff, "modff is unportable - "
694 "use gnulib module modff for portability");
702 _GL_FUNCDECL_SYS (powf, float, (float x, float y));
704 _GL_CXXALIAS_SYS (powf, float, (float x, float y));
705 _GL_CXXALIASWARN (powf);
706 #elif defined GNULIB_POSIXCHECK
708 # if HAVE_RAW_DECL_POWF
709 _GL_WARN_ON_USE (powf, "powf is unportable - "
710 "use gnulib module powf for portability");
717 _GL_FUNCDECL_SYS (rint, double, (double x));
719 _GL_CXXALIAS_SYS (rint, double, (double x));
720 _GL_CXXALIASWARN (rint);
721 #elif defined GNULIB_POSIXCHECK
723 # if HAVE_RAW_DECL_RINT
724 _GL_WARN_ON_USE (rint, "rint is unportable - "
725 "use gnulib module rint for portability");
731 # if @REPLACE_ROUNDF@
732 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
734 # define roundf rpl_roundf
736 _GL_FUNCDECL_RPL (roundf, float, (float x));
737 _GL_CXXALIAS_RPL (roundf, float, (float x));
739 # if !@HAVE_DECL_ROUNDF@
740 _GL_FUNCDECL_SYS (roundf, float, (float x));
742 _GL_CXXALIAS_SYS (roundf, float, (float x));
744 _GL_CXXALIASWARN (roundf);
745 #elif defined GNULIB_POSIXCHECK
747 # if HAVE_RAW_DECL_ROUNDF
748 _GL_WARN_ON_USE (roundf, "roundf is unportable - "
749 "use gnulib module roundf for portability");
755 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
757 # define round rpl_round
759 _GL_FUNCDECL_RPL (round, double, (double x));
760 _GL_CXXALIAS_RPL (round, double, (double x));
762 # if !@HAVE_DECL_ROUND@
763 _GL_FUNCDECL_SYS (round, double, (double x));
765 _GL_CXXALIAS_SYS (round, double, (double x));
767 _GL_CXXALIASWARN (round);
768 #elif defined GNULIB_POSIXCHECK
770 # if HAVE_RAW_DECL_ROUND
771 _GL_WARN_ON_USE (round, "round is unportable - "
772 "use gnulib module round for portability");
777 # if @REPLACE_ROUNDL@
778 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
780 # define roundl rpl_roundl
782 _GL_FUNCDECL_RPL (roundl, long double, (long double x));
783 _GL_CXXALIAS_RPL (roundl, long double, (long double x));
785 # if !@HAVE_DECL_ROUNDL@
786 _GL_FUNCDECL_SYS (roundl, long double, (long double x));
788 _GL_CXXALIAS_SYS (roundl, long double, (long double x));
790 _GL_CXXALIASWARN (roundl);
791 #elif defined GNULIB_POSIXCHECK
793 # if HAVE_RAW_DECL_ROUNDL
794 _GL_WARN_ON_USE (roundl, "roundl is unportable - "
795 "use gnulib module roundl for portability");
803 _GL_FUNCDECL_SYS (sinf, float, (float x));
805 _GL_CXXALIAS_SYS (sinf, float, (float x));
806 _GL_CXXALIASWARN (sinf);
807 #elif defined GNULIB_POSIXCHECK
809 # if HAVE_RAW_DECL_SINF
810 _GL_WARN_ON_USE (sinf, "sinf is unportable - "
811 "use gnulib module sinf for portability");
816 # if !@HAVE_SINL@ || !@HAVE_DECL_SINL@
817 _GL_FUNCDECL_SYS (sinl, long double, (long double x));
819 _GL_CXXALIAS_SYS (sinl, long double, (long double x));
820 _GL_CXXALIASWARN (sinl);
821 #elif defined GNULIB_POSIXCHECK
823 # if HAVE_RAW_DECL_SINL
824 _GL_WARN_ON_USE (sinl, "sinl is unportable - "
825 "use gnulib module mathl for portability");
833 _GL_FUNCDECL_SYS (sinhf, float, (float x));
835 _GL_CXXALIAS_SYS (sinhf, float, (float x));
836 _GL_CXXALIASWARN (sinhf);
837 #elif defined GNULIB_POSIXCHECK
839 # if HAVE_RAW_DECL_SINHF
840 _GL_WARN_ON_USE (sinhf, "sinhf is unportable - "
841 "use gnulib module sinhf for portability");
849 _GL_FUNCDECL_SYS (sqrtf, float, (float x));
851 _GL_CXXALIAS_SYS (sqrtf, float, (float x));
852 _GL_CXXALIASWARN (sqrtf);
853 #elif defined GNULIB_POSIXCHECK
855 # if HAVE_RAW_DECL_SQRTF
856 _GL_WARN_ON_USE (sqrtf, "sqrtf is unportable - "
857 "use gnulib module sqrtf for portability");
862 # if !@HAVE_SQRTL@ || !@HAVE_DECL_SQRTL@
863 _GL_FUNCDECL_SYS (sqrtl, long double, (long double x));
865 _GL_CXXALIAS_SYS (sqrtl, long double, (long double x));
866 _GL_CXXALIASWARN (sqrtl);
867 #elif defined GNULIB_POSIXCHECK
869 # if HAVE_RAW_DECL_SQRTL
870 _GL_WARN_ON_USE (sqrtl, "sqrtl is unportable - "
871 "use gnulib module mathl for portability");
879 _GL_FUNCDECL_SYS (tanf, float, (float x));
881 _GL_CXXALIAS_SYS (tanf, float, (float x));
882 _GL_CXXALIASWARN (tanf);
883 #elif defined GNULIB_POSIXCHECK
885 # if HAVE_RAW_DECL_TANF
886 _GL_WARN_ON_USE (tanf, "tanf is unportable - "
887 "use gnulib module tanf for portability");
892 # if !@HAVE_TANL@ || !@HAVE_DECL_TANL@
893 _GL_FUNCDECL_SYS (tanl, long double, (long double x));
895 _GL_CXXALIAS_SYS (tanl, long double, (long double x));
896 _GL_CXXALIASWARN (tanl);
897 #elif defined GNULIB_POSIXCHECK
899 # if HAVE_RAW_DECL_TANL
900 _GL_WARN_ON_USE (tanl, "tanl is unportable - "
901 "use gnulib module mathl for portability");
909 _GL_FUNCDECL_SYS (tanhf, float, (float x));
911 _GL_CXXALIAS_SYS (tanhf, float, (float x));
912 _GL_CXXALIASWARN (tanhf);
913 #elif defined GNULIB_POSIXCHECK
915 # if HAVE_RAW_DECL_TANHF
916 _GL_WARN_ON_USE (tanhf, "tanhf is unportable - "
917 "use gnulib module tanhf for portability");
923 # if @REPLACE_TRUNCF@
924 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
925 # define truncf rpl_truncf
927 _GL_FUNCDECL_RPL (truncf, float, (float x));
928 _GL_CXXALIAS_RPL (truncf, float, (float x));
930 # if !@HAVE_DECL_TRUNCF@
931 _GL_FUNCDECL_SYS (truncf, float, (float x));
933 _GL_CXXALIAS_SYS (truncf, float, (float x));
935 _GL_CXXALIASWARN (truncf);
936 #elif defined GNULIB_POSIXCHECK
938 # if HAVE_RAW_DECL_TRUNCF
939 _GL_WARN_ON_USE (truncf, "truncf is unportable - "
940 "use gnulib module truncf for portability");
946 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
947 # define trunc rpl_trunc
949 _GL_FUNCDECL_RPL (trunc, double, (double x));
950 _GL_CXXALIAS_RPL (trunc, double, (double x));
952 # if !@HAVE_DECL_TRUNC@
953 _GL_FUNCDECL_SYS (trunc, double, (double x));
955 _GL_CXXALIAS_SYS (trunc, double, (double x));
957 _GL_CXXALIASWARN (trunc);
958 #elif defined GNULIB_POSIXCHECK
960 # if HAVE_RAW_DECL_TRUNC
961 _GL_WARN_ON_USE (trunc, "trunc is unportable - "
962 "use gnulib module trunc for portability");
967 # if @REPLACE_TRUNCL@
968 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
970 # define truncl rpl_truncl
972 _GL_FUNCDECL_RPL (truncl, long double, (long double x));
973 _GL_CXXALIAS_RPL (truncl, long double, (long double x));
975 # if !@HAVE_DECL_TRUNCL@
976 _GL_FUNCDECL_SYS (truncl, long double, (long double x));
978 _GL_CXXALIAS_SYS (truncl, long double, (long double x));
980 _GL_CXXALIASWARN (truncl);
981 #elif defined GNULIB_POSIXCHECK
983 # if HAVE_RAW_DECL_TRUNCL
984 _GL_WARN_ON_USE (truncl, "truncl is unportable - "
985 "use gnulib module truncl for portability");
990 /* Definitions of function-like macros come here, after the function
994 #if @GNULIB_ISFINITE@
995 # if @REPLACE_ISFINITE@
996 _GL_EXTERN_C int gl_isfinitef (float x);
997 _GL_EXTERN_C int gl_isfinited (double x);
998 _GL_EXTERN_C int gl_isfinitel (long double x);
1000 # define isfinite(x) \
1001 (sizeof (x) == sizeof (long double) ? gl_isfinitel (x) : \
1002 sizeof (x) == sizeof (double) ? gl_isfinited (x) : \
1005 #elif defined GNULIB_POSIXCHECK
1006 # if defined isfinite
1007 _GL_WARN_REAL_FLOATING_DECL (isfinite);
1009 # define isfinite(x) _GL_WARN_REAL_FLOATING_IMPL (isfinite, x)
1015 # if @REPLACE_ISINF@
1016 _GL_EXTERN_C int gl_isinff (float x);
1017 _GL_EXTERN_C int gl_isinfd (double x);
1018 _GL_EXTERN_C int gl_isinfl (long double x);
1021 (sizeof (x) == sizeof (long double) ? gl_isinfl (x) : \
1022 sizeof (x) == sizeof (double) ? gl_isinfd (x) : \
1025 #elif defined GNULIB_POSIXCHECK
1027 _GL_WARN_REAL_FLOATING_DECL (isinf);
1029 # define isinf(x) _GL_WARN_REAL_FLOATING_IMPL (isinf, x)
1035 /* Test for NaN for 'float' numbers. */
1037 /* The original <math.h> included above provides a declaration of isnan macro
1038 or (older) isnanf function. */
1040 /* GCC 4.0 and newer provides three built-ins for isnan. */
1042 # define isnanf(x) __builtin_isnanf ((float)(x))
1043 # elif defined isnan
1045 # define isnanf(x) isnan ((float)(x))
1048 /* Test whether X is a NaN. */
1050 # define isnanf rpl_isnanf
1051 _GL_EXTERN_C int isnanf (float x);
1056 /* Test for NaN for 'double' numbers.
1057 This function is a gnulib extension, unlike isnan() which applied only
1058 to 'double' numbers earlier but now is a type-generic macro. */
1060 /* The original <math.h> included above provides a declaration of isnan
1063 /* GCC 4.0 and newer provides three built-ins for isnan. */
1065 # define isnand(x) __builtin_isnan ((double)(x))
1068 # define isnand(x) isnan ((double)(x))
1071 /* Test whether X is a NaN. */
1073 # define isnand rpl_isnand
1074 _GL_EXTERN_C int isnand (double x);
1079 /* Test for NaN for 'long double' numbers. */
1081 /* The original <math.h> included above provides a declaration of isnan
1082 macro or (older) isnanl function. */
1084 /* GCC 4.0 and newer provides three built-ins for isnan. */
1086 # define isnanl(x) __builtin_isnanl ((long double)(x))
1087 # elif defined isnan
1089 # define isnanl(x) isnan ((long double)(x))
1092 /* Test whether X is a NaN. */
1094 # define isnanl rpl_isnanl
1095 _GL_EXTERN_C int isnanl (long double x);
1099 /* This must come *after* the snippets for GNULIB_ISNANF and GNULIB_ISNANL! */
1101 # if @REPLACE_ISNAN@
1102 /* We can't just use the isnanf macro (e.g.) as exposed by
1103 isnanf.h (e.g.) here, because those may end up being macros
1104 that recursively expand back to isnan. So use the gnulib
1105 replacements for them directly. */
1106 # if @HAVE_ISNANF@ && __GNUC__ >= 4
1107 # define gl_isnan_f(x) __builtin_isnanf ((float)(x))
1109 _GL_EXTERN_C int rpl_isnanf (float x);
1110 # define gl_isnan_f(x) rpl_isnanf (x)
1112 # if @HAVE_ISNAND@ && __GNUC__ >= 4
1113 # define gl_isnan_d(x) __builtin_isnan ((double)(x))
1115 _GL_EXTERN_C int rpl_isnand (double x);
1116 # define gl_isnan_d(x) rpl_isnand (x)
1118 # if @HAVE_ISNANL@ && __GNUC__ >= 4
1119 # define gl_isnan_l(x) __builtin_isnanl ((long double)(x))
1121 _GL_EXTERN_C int rpl_isnanl (long double x);
1122 # define gl_isnan_l(x) rpl_isnanl (x)
1126 (sizeof (x) == sizeof (long double) ? gl_isnan_l (x) : \
1127 sizeof (x) == sizeof (double) ? gl_isnan_d (x) : \
1129 # elif __GNUC__ >= 4
1132 (sizeof (x) == sizeof (long double) ? __builtin_isnanl ((long double)(x)) : \
1133 sizeof (x) == sizeof (double) ? __builtin_isnan ((double)(x)) : \
1134 __builtin_isnanf ((float)(x)))
1136 /* Ensure isnan is a macro. */
1138 # define isnan isnan
1140 #elif defined GNULIB_POSIXCHECK
1142 _GL_WARN_REAL_FLOATING_DECL (isnan);
1144 # define isnan(x) _GL_WARN_REAL_FLOATING_IMPL (isnan, x)
1149 #if @GNULIB_SIGNBIT@
1150 # if @REPLACE_SIGNBIT_USING_GCC@
1152 /* GCC 4.0 and newer provides three built-ins for signbit. */
1153 # define signbit(x) \
1154 (sizeof (x) == sizeof (long double) ? __builtin_signbitl (x) : \
1155 sizeof (x) == sizeof (double) ? __builtin_signbit (x) : \
1156 __builtin_signbitf (x))
1158 # if @REPLACE_SIGNBIT@
1160 _GL_EXTERN_C int gl_signbitf (float arg);
1161 _GL_EXTERN_C int gl_signbitd (double arg);
1162 _GL_EXTERN_C int gl_signbitl (long double arg);
1163 # if __GNUC__ >= 2 && !__STRICT_ANSI__
1164 # define _GL_NUM_UINT_WORDS(type) \
1165 ((sizeof (type) + sizeof (unsigned int) - 1) / sizeof (unsigned int))
1166 # if defined FLT_SIGNBIT_WORD && defined FLT_SIGNBIT_BIT && !defined gl_signbitf
1167 # define gl_signbitf_OPTIMIZED_MACRO
1168 # define gl_signbitf(arg) \
1169 ({ union { float _value; \
1170 unsigned int _word[_GL_NUM_UINT_WORDS (float)]; \
1172 _m._value = (arg); \
1173 (_m._word[FLT_SIGNBIT_WORD] >> FLT_SIGNBIT_BIT) & 1; \
1176 # if defined DBL_SIGNBIT_WORD && defined DBL_SIGNBIT_BIT && !defined gl_signbitd
1177 # define gl_signbitd_OPTIMIZED_MACRO
1178 # define gl_signbitd(arg) \
1179 ({ union { double _value; \
1180 unsigned int _word[_GL_NUM_UINT_WORDS (double)]; \
1182 _m._value = (arg); \
1183 (_m._word[DBL_SIGNBIT_WORD] >> DBL_SIGNBIT_BIT) & 1; \
1186 # if defined LDBL_SIGNBIT_WORD && defined LDBL_SIGNBIT_BIT && !defined gl_signbitl
1187 # define gl_signbitl_OPTIMIZED_MACRO
1188 # define gl_signbitl(arg) \
1189 ({ union { long double _value; \
1190 unsigned int _word[_GL_NUM_UINT_WORDS (long double)]; \
1192 _m._value = (arg); \
1193 (_m._word[LDBL_SIGNBIT_WORD] >> LDBL_SIGNBIT_BIT) & 1; \
1197 # define signbit(x) \
1198 (sizeof (x) == sizeof (long double) ? gl_signbitl (x) : \
1199 sizeof (x) == sizeof (double) ? gl_signbitd (x) : \
1202 #elif defined GNULIB_POSIXCHECK
1203 # if defined signbit
1204 _GL_WARN_REAL_FLOATING_DECL (signbit);
1206 # define signbit(x) _GL_WARN_REAL_FLOATING_IMPL (signbit, x)
1211 #endif /* _@GUARD_PREFIX@_MATH_H */
1212 #endif /* _@GUARD_PREFIX@_MATH_H */