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 (rintf, float, (float x));
719 _GL_CXXALIAS_SYS (rintf, float, (float x));
720 _GL_CXXALIASWARN (rintf);
721 #elif defined GNULIB_POSIXCHECK
723 # if HAVE_RAW_DECL_RINTF
724 _GL_WARN_ON_USE (rintf, "rintf is unportable - "
725 "use gnulib module rintf for portability");
731 _GL_FUNCDECL_SYS (rint, double, (double x));
733 _GL_CXXALIAS_SYS (rint, double, (double x));
734 _GL_CXXALIASWARN (rint);
735 #elif defined GNULIB_POSIXCHECK
737 # if HAVE_RAW_DECL_RINT
738 _GL_WARN_ON_USE (rint, "rint is unportable - "
739 "use gnulib module rint for portability");
745 _GL_FUNCDECL_SYS (rintl, long double, (long double x));
747 _GL_CXXALIAS_SYS (rintl, long double, (long double x));
748 _GL_CXXALIASWARN (rintl);
749 #elif defined GNULIB_POSIXCHECK
751 # if HAVE_RAW_DECL_RINTL
752 _GL_WARN_ON_USE (rintl, "rintl is unportable - "
753 "use gnulib module rintl for portability");
759 # if @REPLACE_ROUNDF@
760 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
762 # define roundf rpl_roundf
764 _GL_FUNCDECL_RPL (roundf, float, (float x));
765 _GL_CXXALIAS_RPL (roundf, float, (float x));
767 # if !@HAVE_DECL_ROUNDF@
768 _GL_FUNCDECL_SYS (roundf, float, (float x));
770 _GL_CXXALIAS_SYS (roundf, float, (float x));
772 _GL_CXXALIASWARN (roundf);
773 #elif defined GNULIB_POSIXCHECK
775 # if HAVE_RAW_DECL_ROUNDF
776 _GL_WARN_ON_USE (roundf, "roundf is unportable - "
777 "use gnulib module roundf for portability");
783 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
785 # define round rpl_round
787 _GL_FUNCDECL_RPL (round, double, (double x));
788 _GL_CXXALIAS_RPL (round, double, (double x));
790 # if !@HAVE_DECL_ROUND@
791 _GL_FUNCDECL_SYS (round, double, (double x));
793 _GL_CXXALIAS_SYS (round, double, (double x));
795 _GL_CXXALIASWARN (round);
796 #elif defined GNULIB_POSIXCHECK
798 # if HAVE_RAW_DECL_ROUND
799 _GL_WARN_ON_USE (round, "round is unportable - "
800 "use gnulib module round for portability");
805 # if @REPLACE_ROUNDL@
806 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
808 # define roundl rpl_roundl
810 _GL_FUNCDECL_RPL (roundl, long double, (long double x));
811 _GL_CXXALIAS_RPL (roundl, long double, (long double x));
813 # if !@HAVE_DECL_ROUNDL@
814 _GL_FUNCDECL_SYS (roundl, long double, (long double x));
816 _GL_CXXALIAS_SYS (roundl, long double, (long double x));
818 _GL_CXXALIASWARN (roundl);
819 #elif defined GNULIB_POSIXCHECK
821 # if HAVE_RAW_DECL_ROUNDL
822 _GL_WARN_ON_USE (roundl, "roundl is unportable - "
823 "use gnulib module roundl for portability");
831 _GL_FUNCDECL_SYS (sinf, float, (float x));
833 _GL_CXXALIAS_SYS (sinf, float, (float x));
834 _GL_CXXALIASWARN (sinf);
835 #elif defined GNULIB_POSIXCHECK
837 # if HAVE_RAW_DECL_SINF
838 _GL_WARN_ON_USE (sinf, "sinf is unportable - "
839 "use gnulib module sinf for portability");
844 # if !@HAVE_SINL@ || !@HAVE_DECL_SINL@
845 _GL_FUNCDECL_SYS (sinl, long double, (long double x));
847 _GL_CXXALIAS_SYS (sinl, long double, (long double x));
848 _GL_CXXALIASWARN (sinl);
849 #elif defined GNULIB_POSIXCHECK
851 # if HAVE_RAW_DECL_SINL
852 _GL_WARN_ON_USE (sinl, "sinl is unportable - "
853 "use gnulib module mathl for portability");
861 _GL_FUNCDECL_SYS (sinhf, float, (float x));
863 _GL_CXXALIAS_SYS (sinhf, float, (float x));
864 _GL_CXXALIASWARN (sinhf);
865 #elif defined GNULIB_POSIXCHECK
867 # if HAVE_RAW_DECL_SINHF
868 _GL_WARN_ON_USE (sinhf, "sinhf is unportable - "
869 "use gnulib module sinhf for portability");
877 _GL_FUNCDECL_SYS (sqrtf, float, (float x));
879 _GL_CXXALIAS_SYS (sqrtf, float, (float x));
880 _GL_CXXALIASWARN (sqrtf);
881 #elif defined GNULIB_POSIXCHECK
883 # if HAVE_RAW_DECL_SQRTF
884 _GL_WARN_ON_USE (sqrtf, "sqrtf is unportable - "
885 "use gnulib module sqrtf for portability");
890 # if !@HAVE_SQRTL@ || !@HAVE_DECL_SQRTL@
891 _GL_FUNCDECL_SYS (sqrtl, long double, (long double x));
893 _GL_CXXALIAS_SYS (sqrtl, long double, (long double x));
894 _GL_CXXALIASWARN (sqrtl);
895 #elif defined GNULIB_POSIXCHECK
897 # if HAVE_RAW_DECL_SQRTL
898 _GL_WARN_ON_USE (sqrtl, "sqrtl is unportable - "
899 "use gnulib module mathl for portability");
907 _GL_FUNCDECL_SYS (tanf, float, (float x));
909 _GL_CXXALIAS_SYS (tanf, float, (float x));
910 _GL_CXXALIASWARN (tanf);
911 #elif defined GNULIB_POSIXCHECK
913 # if HAVE_RAW_DECL_TANF
914 _GL_WARN_ON_USE (tanf, "tanf is unportable - "
915 "use gnulib module tanf for portability");
920 # if !@HAVE_TANL@ || !@HAVE_DECL_TANL@
921 _GL_FUNCDECL_SYS (tanl, long double, (long double x));
923 _GL_CXXALIAS_SYS (tanl, long double, (long double x));
924 _GL_CXXALIASWARN (tanl);
925 #elif defined GNULIB_POSIXCHECK
927 # if HAVE_RAW_DECL_TANL
928 _GL_WARN_ON_USE (tanl, "tanl is unportable - "
929 "use gnulib module mathl for portability");
937 _GL_FUNCDECL_SYS (tanhf, float, (float x));
939 _GL_CXXALIAS_SYS (tanhf, float, (float x));
940 _GL_CXXALIASWARN (tanhf);
941 #elif defined GNULIB_POSIXCHECK
943 # if HAVE_RAW_DECL_TANHF
944 _GL_WARN_ON_USE (tanhf, "tanhf is unportable - "
945 "use gnulib module tanhf for portability");
951 # if @REPLACE_TRUNCF@
952 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
953 # define truncf rpl_truncf
955 _GL_FUNCDECL_RPL (truncf, float, (float x));
956 _GL_CXXALIAS_RPL (truncf, float, (float x));
958 # if !@HAVE_DECL_TRUNCF@
959 _GL_FUNCDECL_SYS (truncf, float, (float x));
961 _GL_CXXALIAS_SYS (truncf, float, (float x));
963 _GL_CXXALIASWARN (truncf);
964 #elif defined GNULIB_POSIXCHECK
966 # if HAVE_RAW_DECL_TRUNCF
967 _GL_WARN_ON_USE (truncf, "truncf is unportable - "
968 "use gnulib module truncf for portability");
974 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
975 # define trunc rpl_trunc
977 _GL_FUNCDECL_RPL (trunc, double, (double x));
978 _GL_CXXALIAS_RPL (trunc, double, (double x));
980 # if !@HAVE_DECL_TRUNC@
981 _GL_FUNCDECL_SYS (trunc, double, (double x));
983 _GL_CXXALIAS_SYS (trunc, double, (double x));
985 _GL_CXXALIASWARN (trunc);
986 #elif defined GNULIB_POSIXCHECK
988 # if HAVE_RAW_DECL_TRUNC
989 _GL_WARN_ON_USE (trunc, "trunc is unportable - "
990 "use gnulib module trunc for portability");
995 # if @REPLACE_TRUNCL@
996 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
998 # define truncl rpl_truncl
1000 _GL_FUNCDECL_RPL (truncl, long double, (long double x));
1001 _GL_CXXALIAS_RPL (truncl, long double, (long double x));
1003 # if !@HAVE_DECL_TRUNCL@
1004 _GL_FUNCDECL_SYS (truncl, long double, (long double x));
1006 _GL_CXXALIAS_SYS (truncl, long double, (long double x));
1008 _GL_CXXALIASWARN (truncl);
1009 #elif defined GNULIB_POSIXCHECK
1011 # if HAVE_RAW_DECL_TRUNCL
1012 _GL_WARN_ON_USE (truncl, "truncl is unportable - "
1013 "use gnulib module truncl for portability");
1018 /* Definitions of function-like macros come here, after the function
1022 #if @GNULIB_ISFINITE@
1023 # if @REPLACE_ISFINITE@
1024 _GL_EXTERN_C int gl_isfinitef (float x);
1025 _GL_EXTERN_C int gl_isfinited (double x);
1026 _GL_EXTERN_C int gl_isfinitel (long double x);
1028 # define isfinite(x) \
1029 (sizeof (x) == sizeof (long double) ? gl_isfinitel (x) : \
1030 sizeof (x) == sizeof (double) ? gl_isfinited (x) : \
1033 #elif defined GNULIB_POSIXCHECK
1034 # if defined isfinite
1035 _GL_WARN_REAL_FLOATING_DECL (isfinite);
1037 # define isfinite(x) _GL_WARN_REAL_FLOATING_IMPL (isfinite, x)
1043 # if @REPLACE_ISINF@
1044 _GL_EXTERN_C int gl_isinff (float x);
1045 _GL_EXTERN_C int gl_isinfd (double x);
1046 _GL_EXTERN_C int gl_isinfl (long double x);
1049 (sizeof (x) == sizeof (long double) ? gl_isinfl (x) : \
1050 sizeof (x) == sizeof (double) ? gl_isinfd (x) : \
1053 #elif defined GNULIB_POSIXCHECK
1055 _GL_WARN_REAL_FLOATING_DECL (isinf);
1057 # define isinf(x) _GL_WARN_REAL_FLOATING_IMPL (isinf, x)
1063 /* Test for NaN for 'float' numbers. */
1065 /* The original <math.h> included above provides a declaration of isnan macro
1066 or (older) isnanf function. */
1068 /* GCC 4.0 and newer provides three built-ins for isnan. */
1070 # define isnanf(x) __builtin_isnanf ((float)(x))
1071 # elif defined isnan
1073 # define isnanf(x) isnan ((float)(x))
1076 /* Test whether X is a NaN. */
1078 # define isnanf rpl_isnanf
1079 _GL_EXTERN_C int isnanf (float x);
1084 /* Test for NaN for 'double' numbers.
1085 This function is a gnulib extension, unlike isnan() which applied only
1086 to 'double' numbers earlier but now is a type-generic macro. */
1088 /* The original <math.h> included above provides a declaration of isnan
1091 /* GCC 4.0 and newer provides three built-ins for isnan. */
1093 # define isnand(x) __builtin_isnan ((double)(x))
1096 # define isnand(x) isnan ((double)(x))
1099 /* Test whether X is a NaN. */
1101 # define isnand rpl_isnand
1102 _GL_EXTERN_C int isnand (double x);
1107 /* Test for NaN for 'long double' numbers. */
1109 /* The original <math.h> included above provides a declaration of isnan
1110 macro or (older) isnanl function. */
1112 /* GCC 4.0 and newer provides three built-ins for isnan. */
1114 # define isnanl(x) __builtin_isnanl ((long double)(x))
1115 # elif defined isnan
1117 # define isnanl(x) isnan ((long double)(x))
1120 /* Test whether X is a NaN. */
1122 # define isnanl rpl_isnanl
1123 _GL_EXTERN_C int isnanl (long double x);
1127 /* This must come *after* the snippets for GNULIB_ISNANF and GNULIB_ISNANL! */
1129 # if @REPLACE_ISNAN@
1130 /* We can't just use the isnanf macro (e.g.) as exposed by
1131 isnanf.h (e.g.) here, because those may end up being macros
1132 that recursively expand back to isnan. So use the gnulib
1133 replacements for them directly. */
1134 # if @HAVE_ISNANF@ && __GNUC__ >= 4
1135 # define gl_isnan_f(x) __builtin_isnanf ((float)(x))
1137 _GL_EXTERN_C int rpl_isnanf (float x);
1138 # define gl_isnan_f(x) rpl_isnanf (x)
1140 # if @HAVE_ISNAND@ && __GNUC__ >= 4
1141 # define gl_isnan_d(x) __builtin_isnan ((double)(x))
1143 _GL_EXTERN_C int rpl_isnand (double x);
1144 # define gl_isnan_d(x) rpl_isnand (x)
1146 # if @HAVE_ISNANL@ && __GNUC__ >= 4
1147 # define gl_isnan_l(x) __builtin_isnanl ((long double)(x))
1149 _GL_EXTERN_C int rpl_isnanl (long double x);
1150 # define gl_isnan_l(x) rpl_isnanl (x)
1154 (sizeof (x) == sizeof (long double) ? gl_isnan_l (x) : \
1155 sizeof (x) == sizeof (double) ? gl_isnan_d (x) : \
1157 # elif __GNUC__ >= 4
1160 (sizeof (x) == sizeof (long double) ? __builtin_isnanl ((long double)(x)) : \
1161 sizeof (x) == sizeof (double) ? __builtin_isnan ((double)(x)) : \
1162 __builtin_isnanf ((float)(x)))
1164 /* Ensure isnan is a macro. */
1166 # define isnan isnan
1168 #elif defined GNULIB_POSIXCHECK
1170 _GL_WARN_REAL_FLOATING_DECL (isnan);
1172 # define isnan(x) _GL_WARN_REAL_FLOATING_IMPL (isnan, x)
1177 #if @GNULIB_SIGNBIT@
1178 # if @REPLACE_SIGNBIT_USING_GCC@
1180 /* GCC 4.0 and newer provides three built-ins for signbit. */
1181 # define signbit(x) \
1182 (sizeof (x) == sizeof (long double) ? __builtin_signbitl (x) : \
1183 sizeof (x) == sizeof (double) ? __builtin_signbit (x) : \
1184 __builtin_signbitf (x))
1186 # if @REPLACE_SIGNBIT@
1188 _GL_EXTERN_C int gl_signbitf (float arg);
1189 _GL_EXTERN_C int gl_signbitd (double arg);
1190 _GL_EXTERN_C int gl_signbitl (long double arg);
1191 # if __GNUC__ >= 2 && !__STRICT_ANSI__
1192 # define _GL_NUM_UINT_WORDS(type) \
1193 ((sizeof (type) + sizeof (unsigned int) - 1) / sizeof (unsigned int))
1194 # if defined FLT_SIGNBIT_WORD && defined FLT_SIGNBIT_BIT && !defined gl_signbitf
1195 # define gl_signbitf_OPTIMIZED_MACRO
1196 # define gl_signbitf(arg) \
1197 ({ union { float _value; \
1198 unsigned int _word[_GL_NUM_UINT_WORDS (float)]; \
1200 _m._value = (arg); \
1201 (_m._word[FLT_SIGNBIT_WORD] >> FLT_SIGNBIT_BIT) & 1; \
1204 # if defined DBL_SIGNBIT_WORD && defined DBL_SIGNBIT_BIT && !defined gl_signbitd
1205 # define gl_signbitd_OPTIMIZED_MACRO
1206 # define gl_signbitd(arg) \
1207 ({ union { double _value; \
1208 unsigned int _word[_GL_NUM_UINT_WORDS (double)]; \
1210 _m._value = (arg); \
1211 (_m._word[DBL_SIGNBIT_WORD] >> DBL_SIGNBIT_BIT) & 1; \
1214 # if defined LDBL_SIGNBIT_WORD && defined LDBL_SIGNBIT_BIT && !defined gl_signbitl
1215 # define gl_signbitl_OPTIMIZED_MACRO
1216 # define gl_signbitl(arg) \
1217 ({ union { long double _value; \
1218 unsigned int _word[_GL_NUM_UINT_WORDS (long double)]; \
1220 _m._value = (arg); \
1221 (_m._word[LDBL_SIGNBIT_WORD] >> LDBL_SIGNBIT_BIT) & 1; \
1225 # define signbit(x) \
1226 (sizeof (x) == sizeof (long double) ? gl_signbitl (x) : \
1227 sizeof (x) == sizeof (double) ? gl_signbitd (x) : \
1230 #elif defined GNULIB_POSIXCHECK
1231 # if defined signbit
1232 _GL_WARN_REAL_FLOATING_DECL (signbit);
1234 # define signbit(x) _GL_WARN_REAL_FLOATING_IMPL (signbit, x)
1239 #endif /* _@GUARD_PREFIX@_MATH_H */
1240 #endif /* _@GUARD_PREFIX@_MATH_H */