New module 'coshf'.
[gnulib.git] / lib / math.in.h
1 /* A GNU-like <math.h>.
2
3    Copyright (C) 2002-2003, 2007-2011 Free Software Foundation, Inc.
4
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.
9
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.
14
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/>.  */
17
18 #ifndef _@GUARD_PREFIX@_MATH_H
19
20 #if __GNUC__ >= 3
21 @PRAGMA_SYSTEM_HEADER@
22 #endif
23 @PRAGMA_COLUMNS@
24
25 /* The include_next requires a split double-inclusion guard.  */
26 #@INCLUDE_NEXT_AS_FIRST_DIRECTIVE@ @NEXT_AS_FIRST_DIRECTIVE_MATH_H@
27
28 #ifndef _@GUARD_PREFIX@_MATH_H
29 #define _@GUARD_PREFIX@_MATH_H
30
31
32 /* The definitions of _GL_FUNCDECL_RPL etc. are copied here.  */
33
34 /* The definition of _GL_ARG_NONNULL is copied here.  */
35
36 /* The definition of _GL_WARN_ON_USE is copied here.  */
37
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) \
43 static inline int                                                   \
44 rpl_ ## func ## f (float f)                                         \
45 {                                                                   \
46   return func (f);                                                  \
47 }                                                                   \
48 static inline int                                                   \
49 rpl_ ## func ## d (double d)                                        \
50 {                                                                   \
51   return func (d);                                                  \
52 }                                                                   \
53 static inline int                                                   \
54 rpl_ ## func ## l (long double l)                                   \
55 {                                                                   \
56   return func (l);                                                  \
57 }                                                                   \
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))
68
69
70 #if @REPLACE_ITOLD@
71 /* Pull in a function that fixes the 'int' to 'long double' conversion
72    of glibc 2.7.  */
73 _GL_EXTERN_C void _Qp_itoq (long double *, int);
74 static void (*_gl_math_fix_itold) (long double *, int) = _Qp_itoq;
75 #endif
76
77
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
85 #  undef 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
89 static float
90 _NaN ()
91 {
92   static float zero = 0.0f;
93   return zero / zero;
94 }
95 #   define NAN (_NaN())
96 #  else
97 #   define NAN (0.0f / 0.0f)
98 #  endif
99 #  define GNULIB_defined_NAN 1
100 # endif
101 #endif
102
103 /* Solaris 10 defines HUGE_VAL, but as a function pointer rather
104    than a floating point constant.  */
105 #if @REPLACE_HUGE_VAL@
106 # undef HUGE_VAL
107 # define HUGE_VAL (1.0 / 0.0)
108 #endif
109
110
111 #if @GNULIB_ACOSF@
112 # if !@HAVE_ACOSF@
113 #  undef acosf
114 _GL_FUNCDECL_SYS (acosf, float, (float x));
115 # endif
116 _GL_CXXALIAS_SYS (acosf, float, (float x));
117 _GL_CXXALIASWARN (acosf);
118 #elif defined GNULIB_POSIXCHECK
119 # undef acosf
120 # if HAVE_RAW_DECL_ACOSF
121 _GL_WARN_ON_USE (acosf, "acosf is unportable - "
122                  "use gnulib module acosf for portability");
123 # endif
124 #endif
125
126 #if @GNULIB_ACOSL@
127 # if !@HAVE_ACOSL@ || !@HAVE_DECL_ACOSL@
128 _GL_FUNCDECL_SYS (acosl, long double, (long double x));
129 # endif
130 _GL_CXXALIAS_SYS (acosl, long double, (long double x));
131 _GL_CXXALIASWARN (acosl);
132 #elif defined GNULIB_POSIXCHECK
133 # undef acosl
134 # if HAVE_RAW_DECL_ACOSL
135 _GL_WARN_ON_USE (acosl, "acosl is unportable - "
136                  "use gnulib module mathl for portability");
137 # endif
138 #endif
139
140
141 #if @GNULIB_ASINF@
142 # if !@HAVE_ASINF@
143 #  undef asinf
144 _GL_FUNCDECL_SYS (asinf, float, (float x));
145 # endif
146 _GL_CXXALIAS_SYS (asinf, float, (float x));
147 _GL_CXXALIASWARN (asinf);
148 #elif defined GNULIB_POSIXCHECK
149 # undef asinf
150 # if HAVE_RAW_DECL_ASINF
151 _GL_WARN_ON_USE (asinf, "asinf is unportable - "
152                  "use gnulib module asinf for portability");
153 # endif
154 #endif
155
156 #if @GNULIB_ASINL@
157 # if !@HAVE_ASINL@ || !@HAVE_DECL_ASINL@
158 _GL_FUNCDECL_SYS (asinl, long double, (long double x));
159 # endif
160 _GL_CXXALIAS_SYS (asinl, long double, (long double x));
161 _GL_CXXALIASWARN (asinl);
162 #elif defined GNULIB_POSIXCHECK
163 # undef asinl
164 # if HAVE_RAW_DECL_ASINL
165 _GL_WARN_ON_USE (asinl, "asinl is unportable - "
166                  "use gnulib module mathl for portability");
167 # endif
168 #endif
169
170
171 #if @GNULIB_ATANF@
172 # if !@HAVE_ATANF@
173 #  undef atanf
174 _GL_FUNCDECL_SYS (atanf, float, (float x));
175 # endif
176 _GL_CXXALIAS_SYS (atanf, float, (float x));
177 _GL_CXXALIASWARN (atanf);
178 #elif defined GNULIB_POSIXCHECK
179 # undef atanf
180 # if HAVE_RAW_DECL_ATANF
181 _GL_WARN_ON_USE (atanf, "atanf is unportable - "
182                  "use gnulib module atanf for portability");
183 # endif
184 #endif
185
186 #if @GNULIB_ATANL@
187 # if !@HAVE_ATANL@ || !@HAVE_DECL_ATANL@
188 _GL_FUNCDECL_SYS (atanl, long double, (long double x));
189 # endif
190 _GL_CXXALIAS_SYS (atanl, long double, (long double x));
191 _GL_CXXALIASWARN (atanl);
192 #elif defined GNULIB_POSIXCHECK
193 # undef atanl
194 # if HAVE_RAW_DECL_ATANL
195 _GL_WARN_ON_USE (atanl, "atanl is unportable - "
196                  "use gnulib module mathl for portability");
197 # endif
198 #endif
199
200
201 #if @GNULIB_ATAN2F@
202 # if !@HAVE_ATAN2F@
203 #  undef atan2f
204 _GL_FUNCDECL_SYS (atan2f, float, (float y, float x));
205 # endif
206 _GL_CXXALIAS_SYS (atan2f, float, (float y, float x));
207 _GL_CXXALIASWARN (atan2f);
208 #elif defined GNULIB_POSIXCHECK
209 # undef atan2f
210 # if HAVE_RAW_DECL_ATAN2F
211 _GL_WARN_ON_USE (atan2f, "atan2f is unportable - "
212                  "use gnulib module atan2f for portability");
213 # endif
214 #endif
215
216
217 #if @GNULIB_CEILF@
218 # if @REPLACE_CEILF@
219 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
220 #   undef ceilf
221 #   define ceilf rpl_ceilf
222 #  endif
223 _GL_FUNCDECL_RPL (ceilf, float, (float x));
224 _GL_CXXALIAS_RPL (ceilf, float, (float x));
225 # else
226 #  if !@HAVE_DECL_CEILF@
227 _GL_FUNCDECL_SYS (ceilf, float, (float x));
228 #  endif
229 _GL_CXXALIAS_SYS (ceilf, float, (float x));
230 # endif
231 _GL_CXXALIASWARN (ceilf);
232 #elif defined GNULIB_POSIXCHECK
233 # undef ceilf
234 # if HAVE_RAW_DECL_CEILF
235 _GL_WARN_ON_USE (ceilf, "ceilf is unportable - "
236                  "use gnulib module ceilf for portability");
237 # endif
238 #endif
239
240 #if @GNULIB_CEIL@
241 # if @REPLACE_CEIL@
242 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
243 #   define ceil rpl_ceil
244 #  endif
245 _GL_FUNCDECL_RPL (ceil, double, (double x));
246 _GL_CXXALIAS_RPL (ceil, double, (double x));
247 # else
248 _GL_CXXALIAS_SYS (ceil, double, (double x));
249 # endif
250 _GL_CXXALIASWARN (ceil);
251 #endif
252
253 #if @GNULIB_CEILL@
254 # if @REPLACE_CEILL@
255 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
256 #   undef ceill
257 #   define ceill rpl_ceill
258 #  endif
259 _GL_FUNCDECL_RPL (ceill, long double, (long double x));
260 _GL_CXXALIAS_RPL (ceill, long double, (long double x));
261 # else
262 #  if !@HAVE_DECL_CEILL@
263 _GL_FUNCDECL_SYS (ceill, long double, (long double x));
264 #  endif
265 _GL_CXXALIAS_SYS (ceill, long double, (long double x));
266 # endif
267 _GL_CXXALIASWARN (ceill);
268 #elif defined GNULIB_POSIXCHECK
269 # undef ceill
270 # if HAVE_RAW_DECL_CEILL
271 _GL_WARN_ON_USE (ceill, "ceill is unportable - "
272                  "use gnulib module ceill for portability");
273 # endif
274 #endif
275
276
277 #if @GNULIB_COSF@
278 # if !@HAVE_COSF@
279 #  undef cosf
280 _GL_FUNCDECL_SYS (cosf, float, (float x));
281 # endif
282 _GL_CXXALIAS_SYS (cosf, float, (float x));
283 _GL_CXXALIASWARN (cosf);
284 #elif defined GNULIB_POSIXCHECK
285 # undef cosf
286 # if HAVE_RAW_DECL_COSF
287 _GL_WARN_ON_USE (cosf, "cosf is unportable - "
288                  "use gnulib module cosf for portability");
289 # endif
290 #endif
291
292 #if @GNULIB_COSL@
293 # if !@HAVE_COSL@ || !@HAVE_DECL_COSL@
294 _GL_FUNCDECL_SYS (cosl, long double, (long double x));
295 # endif
296 _GL_CXXALIAS_SYS (cosl, long double, (long double x));
297 _GL_CXXALIASWARN (cosl);
298 #elif defined GNULIB_POSIXCHECK
299 # undef cosl
300 # if HAVE_RAW_DECL_COSL
301 _GL_WARN_ON_USE (cosl, "cosl is unportable - "
302                  "use gnulib module mathl for portability");
303 # endif
304 #endif
305
306
307 #if @GNULIB_COSHF@
308 # if !@HAVE_COSHF@
309 #  undef coshf
310 _GL_FUNCDECL_SYS (coshf, float, (float x));
311 # endif
312 _GL_CXXALIAS_SYS (coshf, float, (float x));
313 _GL_CXXALIASWARN (coshf);
314 #elif defined GNULIB_POSIXCHECK
315 # undef coshf
316 # if HAVE_RAW_DECL_COSHF
317 _GL_WARN_ON_USE (coshf, "coshf is unportable - "
318                  "use gnulib module coshf for portability");
319 # endif
320 #endif
321
322
323 #if @GNULIB_EXPF@
324 # if !@HAVE_EXPF@
325 #  undef expf
326 _GL_FUNCDECL_SYS (expf, float, (float x));
327 # endif
328 _GL_CXXALIAS_SYS (expf, float, (float x));
329 _GL_CXXALIASWARN (expf);
330 #elif defined GNULIB_POSIXCHECK
331 # undef expf
332 # if HAVE_RAW_DECL_EXPF
333 _GL_WARN_ON_USE (expf, "expf is unportable - "
334                  "use gnulib module expf for portability");
335 # endif
336 #endif
337
338 #if @GNULIB_EXPL@
339 # if !@HAVE_EXPL@ || !@HAVE_DECL_EXPL@
340 _GL_FUNCDECL_SYS (expl, long double, (long double x));
341 # endif
342 _GL_CXXALIAS_SYS (expl, long double, (long double x));
343 _GL_CXXALIASWARN (expl);
344 #elif defined GNULIB_POSIXCHECK
345 # undef expl
346 # if HAVE_RAW_DECL_EXPL
347 _GL_WARN_ON_USE (expl, "expl is unportable - "
348                  "use gnulib module mathl for portability");
349 # endif
350 #endif
351
352
353 #if @GNULIB_FABSF@
354 # if !@HAVE_FABSF@
355 #  undef fabsf
356 _GL_FUNCDECL_SYS (fabsf, float, (float x));
357 # endif
358 _GL_CXXALIAS_SYS (fabsf, float, (float x));
359 _GL_CXXALIASWARN (fabsf);
360 #elif defined GNULIB_POSIXCHECK
361 # undef fabsf
362 # if HAVE_RAW_DECL_FABSF
363 _GL_WARN_ON_USE (fabsf, "fabsf is unportable - "
364                  "use gnulib module fabsf for portability");
365 # endif
366 #endif
367
368
369 #if @GNULIB_FLOORF@
370 # if @REPLACE_FLOORF@
371 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
372 #   undef floorf
373 #   define floorf rpl_floorf
374 #  endif
375 _GL_FUNCDECL_RPL (floorf, float, (float x));
376 _GL_CXXALIAS_RPL (floorf, float, (float x));
377 # else
378 #  if !@HAVE_DECL_FLOORF@
379 _GL_FUNCDECL_SYS (floorf, float, (float x));
380 #  endif
381 _GL_CXXALIAS_SYS (floorf, float, (float x));
382 # endif
383 _GL_CXXALIASWARN (floorf);
384 #elif defined GNULIB_POSIXCHECK
385 # undef floorf
386 # if HAVE_RAW_DECL_FLOORF
387 _GL_WARN_ON_USE (floorf, "floorf is unportable - "
388                  "use gnulib module floorf for portability");
389 # endif
390 #endif
391
392 #if @GNULIB_FLOOR@
393 # if @REPLACE_FLOOR@
394 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
395 #   define floor rpl_floor
396 #  endif
397 _GL_FUNCDECL_RPL (floor, double, (double x));
398 _GL_CXXALIAS_RPL (floor, double, (double x));
399 # else
400 _GL_CXXALIAS_SYS (floor, double, (double x));
401 # endif
402 _GL_CXXALIASWARN (floor);
403 #endif
404
405 #if @GNULIB_FLOORL@
406 # if @REPLACE_FLOORL@
407 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
408 #   undef floorl
409 #   define floorl rpl_floorl
410 #  endif
411 _GL_FUNCDECL_RPL (floorl, long double, (long double x));
412 _GL_CXXALIAS_RPL (floorl, long double, (long double x));
413 # else
414 #  if !@HAVE_DECL_FLOORL@
415 _GL_FUNCDECL_SYS (floorl, long double, (long double x));
416 #  endif
417 _GL_CXXALIAS_SYS (floorl, long double, (long double x));
418 # endif
419 _GL_CXXALIASWARN (floorl);
420 #elif defined GNULIB_POSIXCHECK
421 # undef floorl
422 # if HAVE_RAW_DECL_FLOORL
423 _GL_WARN_ON_USE (floorl, "floorl is unportable - "
424                  "use gnulib module floorl for portability");
425 # endif
426 #endif
427
428
429 #if @GNULIB_FMODF@
430 # if !@HAVE_FMODF@
431 #  undef fmodf
432 _GL_FUNCDECL_SYS (fmodf, float, (float x, float y));
433 # endif
434 _GL_CXXALIAS_SYS (fmodf, float, (float x, float y));
435 _GL_CXXALIASWARN (fmodf);
436 #elif defined GNULIB_POSIXCHECK
437 # undef fmodf
438 # if HAVE_RAW_DECL_FMODF
439 _GL_WARN_ON_USE (fmodf, "fmodf is unportable - "
440                  "use gnulib module fmodf for portability");
441 # endif
442 #endif
443
444
445 /* Write x as
446      x = mantissa * 2^exp
447    where
448      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
449      If x is zero: mantissa = x, exp = 0.
450      If x is infinite or NaN: mantissa = x, exp unspecified.
451    Store exp in *EXPPTR and return mantissa.  */
452 #if @GNULIB_FREXPF@
453 # if @REPLACE_FREXPF@
454 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
455 #   undef frexpf
456 #   define frexpf rpl_frexpf
457 #  endif
458 _GL_FUNCDECL_RPL (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
459 _GL_CXXALIAS_RPL (frexpf, float, (float x, int *expptr));
460 # else
461 #  if !@HAVE_FREXPF@
462 #   undef frexpf
463 _GL_FUNCDECL_SYS (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
464 #  endif
465 _GL_CXXALIAS_SYS (frexpf, float, (float x, int *expptr));
466 # endif
467 _GL_CXXALIASWARN (frexpf);
468 #elif defined GNULIB_POSIXCHECK
469 # undef frexpf
470 # if HAVE_RAW_DECL_FREXPF
471 _GL_WARN_ON_USE (frexpf, "frexpf is unportable - "
472                  "use gnulib module frexpf for portability");
473 # endif
474 #endif
475
476 /* Write x as
477      x = mantissa * 2^exp
478    where
479      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
480      If x is zero: mantissa = x, exp = 0.
481      If x is infinite or NaN: mantissa = x, exp unspecified.
482    Store exp in *EXPPTR and return mantissa.  */
483 #if @GNULIB_FREXP@
484 # if @REPLACE_FREXP@
485 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
486 #   define frexp rpl_frexp
487 #  endif
488 _GL_FUNCDECL_RPL (frexp, double, (double x, int *expptr) _GL_ARG_NONNULL ((2)));
489 _GL_CXXALIAS_RPL (frexp, double, (double x, int *expptr));
490 # else
491 _GL_CXXALIAS_SYS (frexp, double, (double x, int *expptr));
492 # endif
493 _GL_CXXALIASWARN (frexp);
494 #elif defined GNULIB_POSIXCHECK
495 # undef frexp
496 /* Assume frexp is always declared.  */
497 _GL_WARN_ON_USE (frexp, "frexp is unportable - "
498                  "use gnulib module frexp for portability");
499 #endif
500
501 /* Write x as
502      x = mantissa * 2^exp
503    where
504      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
505      If x is zero: mantissa = x, exp = 0.
506      If x is infinite or NaN: mantissa = x, exp unspecified.
507    Store exp in *EXPPTR and return mantissa.  */
508 #if @GNULIB_FREXPL@ && @REPLACE_FREXPL@
509 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
510 #  undef frexpl
511 #  define frexpl rpl_frexpl
512 # endif
513 _GL_FUNCDECL_RPL (frexpl, long double,
514                   (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
515 _GL_CXXALIAS_RPL (frexpl, long double, (long double x, int *expptr));
516 #else
517 # if !@HAVE_DECL_FREXPL@
518 _GL_FUNCDECL_SYS (frexpl, long double,
519                   (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
520 # endif
521 # if @GNULIB_FREXPL@
522 _GL_CXXALIAS_SYS (frexpl, long double, (long double x, int *expptr));
523 # endif
524 #endif
525 #if @GNULIB_FREXPL@ && !(@REPLACE_FREXPL@ && !@HAVE_DECL_FREXPL@)
526 _GL_CXXALIASWARN (frexpl);
527 #endif
528 #if !@GNULIB_FREXPL@ && defined GNULIB_POSIXCHECK
529 # undef frexpl
530 # if HAVE_RAW_DECL_FREXPL
531 _GL_WARN_ON_USE (frexpl, "frexpl is unportable - "
532                  "use gnulib module frexpl for portability");
533 # endif
534 #endif
535
536
537 /* Return x * 2^exp.  */
538 #if @GNULIB_LDEXPF@
539 # if !@HAVE_LDEXPF@
540 #  undef ldexpf
541 _GL_FUNCDECL_SYS (ldexpf, float, (float x, int exp));
542 # endif
543 _GL_CXXALIAS_SYS (ldexpf, float, (float x, int exp));
544 _GL_CXXALIASWARN (ldexpf);
545 #elif defined GNULIB_POSIXCHECK
546 # undef ldexpf
547 # if HAVE_RAW_DECL_LDEXPF
548 _GL_WARN_ON_USE (ldexpf, "ldexpf is unportable - "
549                  "use gnulib module ldexpf for portability");
550 # endif
551 #endif
552
553 /* Return x * 2^exp.  */
554 #if @GNULIB_LDEXPL@ && @REPLACE_LDEXPL@
555 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
556 #  undef ldexpl
557 #  define ldexpl rpl_ldexpl
558 # endif
559 _GL_FUNCDECL_RPL (ldexpl, long double, (long double x, int exp));
560 _GL_CXXALIAS_RPL (ldexpl, long double, (long double x, int exp));
561 #else
562 # if !@HAVE_DECL_LDEXPL@
563 _GL_FUNCDECL_SYS (ldexpl, long double, (long double x, int exp));
564 # endif
565 # if @GNULIB_LDEXPL@
566 _GL_CXXALIAS_SYS (ldexpl, long double, (long double x, int exp));
567 # endif
568 #endif
569 #if @GNULIB_LDEXPL@
570 _GL_CXXALIASWARN (ldexpl);
571 #endif
572 #if !@GNULIB_LDEXPL@ && defined GNULIB_POSIXCHECK
573 # undef ldexpl
574 # if HAVE_RAW_DECL_LDEXPL
575 _GL_WARN_ON_USE (ldexpl, "ldexpl is unportable - "
576                  "use gnulib module ldexpl for portability");
577 # endif
578 #endif
579
580
581 #if @GNULIB_LOGB@
582 # if !@HAVE_DECL_LOGB@
583 _GL_EXTERN_C double logb (double x);
584 # endif
585 #elif defined GNULIB_POSIXCHECK
586 # undef logb
587 # if HAVE_RAW_DECL_LOGB
588 _GL_WARN_ON_USE (logb, "logb is unportable - "
589                  "use gnulib module logb for portability");
590 # endif
591 #endif
592
593
594 #if @GNULIB_LOGF@
595 # if !@HAVE_LOGF@
596 #  undef logf
597 _GL_FUNCDECL_SYS (logf, float, (float x));
598 # endif
599 _GL_CXXALIAS_SYS (logf, float, (float x));
600 _GL_CXXALIASWARN (logf);
601 #elif defined GNULIB_POSIXCHECK
602 # undef logf
603 # if HAVE_RAW_DECL_LOGF
604 _GL_WARN_ON_USE (logf, "logf is unportable - "
605                  "use gnulib module logf for portability");
606 # endif
607 #endif
608
609 #if @GNULIB_LOGL@
610 # if !@HAVE_LOGL@ || !@HAVE_DECL_LOGL@
611 _GL_FUNCDECL_SYS (logl, long double, (long double x));
612 # endif
613 _GL_CXXALIAS_SYS (logl, long double, (long double x));
614 _GL_CXXALIASWARN (logl);
615 #elif defined GNULIB_POSIXCHECK
616 # undef logl
617 # if HAVE_RAW_DECL_LOGL
618 _GL_WARN_ON_USE (logl, "logl is unportable - "
619                  "use gnulib module mathl for portability");
620 # endif
621 #endif
622
623
624 #if @GNULIB_LOG10F@
625 # if !@HAVE_LOG10F@
626 #  undef log10f
627 _GL_FUNCDECL_SYS (log10f, float, (float x));
628 # endif
629 _GL_CXXALIAS_SYS (log10f, float, (float x));
630 _GL_CXXALIASWARN (log10f);
631 #elif defined GNULIB_POSIXCHECK
632 # undef log10f
633 # if HAVE_RAW_DECL_LOG10F
634 _GL_WARN_ON_USE (log10f, "log10f is unportable - "
635                  "use gnulib module log10f for portability");
636 # endif
637 #endif
638
639
640 #if @GNULIB_MODFF@
641 # if !@HAVE_MODFF@
642 #  undef modff
643 _GL_FUNCDECL_SYS (modff, float, (float x, float *iptr) _GL_ARG_NONNULL ((2)));
644 # endif
645 _GL_CXXALIAS_SYS (modff, float, (float x, float *iptr));
646 _GL_CXXALIASWARN (modff);
647 #elif defined GNULIB_POSIXCHECK
648 # undef modff
649 # if HAVE_RAW_DECL_MODFF
650 _GL_WARN_ON_USE (modff, "modff is unportable - "
651                  "use gnulib module modff for portability");
652 # endif
653 #endif
654
655
656 #if @GNULIB_POWF@
657 # if !@HAVE_POWF@
658 #  undef powf
659 _GL_FUNCDECL_SYS (powf, float, (float x, float y));
660 # endif
661 _GL_CXXALIAS_SYS (powf, float, (float x, float y));
662 _GL_CXXALIASWARN (powf);
663 #elif defined GNULIB_POSIXCHECK
664 # undef powf
665 # if HAVE_RAW_DECL_POWF
666 _GL_WARN_ON_USE (powf, "powf is unportable - "
667                  "use gnulib module powf for portability");
668 # endif
669 #endif
670
671
672 #if @GNULIB_ROUNDF@
673 # if @REPLACE_ROUNDF@
674 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
675 #   undef roundf
676 #   define roundf rpl_roundf
677 #  endif
678 _GL_FUNCDECL_RPL (roundf, float, (float x));
679 _GL_CXXALIAS_RPL (roundf, float, (float x));
680 # else
681 #  if !@HAVE_DECL_ROUNDF@
682 _GL_FUNCDECL_SYS (roundf, float, (float x));
683 #  endif
684 _GL_CXXALIAS_SYS (roundf, float, (float x));
685 # endif
686 _GL_CXXALIASWARN (roundf);
687 #elif defined GNULIB_POSIXCHECK
688 # undef roundf
689 # if HAVE_RAW_DECL_ROUNDF
690 _GL_WARN_ON_USE (roundf, "roundf is unportable - "
691                  "use gnulib module roundf for portability");
692 # endif
693 #endif
694
695 #if @GNULIB_ROUND@
696 # if @REPLACE_ROUND@
697 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
698 #   undef round
699 #   define round rpl_round
700 #  endif
701 _GL_FUNCDECL_RPL (round, double, (double x));
702 _GL_CXXALIAS_RPL (round, double, (double x));
703 # else
704 #  if !@HAVE_DECL_ROUND@
705 _GL_FUNCDECL_SYS (round, double, (double x));
706 #  endif
707 _GL_CXXALIAS_SYS (round, double, (double x));
708 # endif
709 _GL_CXXALIASWARN (round);
710 #elif defined GNULIB_POSIXCHECK
711 # undef round
712 # if HAVE_RAW_DECL_ROUND
713 _GL_WARN_ON_USE (round, "round is unportable - "
714                  "use gnulib module round for portability");
715 # endif
716 #endif
717
718 #if @GNULIB_ROUNDL@
719 # if @REPLACE_ROUNDL@
720 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
721 #   undef roundl
722 #   define roundl rpl_roundl
723 #  endif
724 _GL_FUNCDECL_RPL (roundl, long double, (long double x));
725 _GL_CXXALIAS_RPL (roundl, long double, (long double x));
726 # else
727 #  if !@HAVE_DECL_ROUNDL@
728 _GL_FUNCDECL_SYS (roundl, long double, (long double x));
729 #  endif
730 _GL_CXXALIAS_SYS (roundl, long double, (long double x));
731 # endif
732 _GL_CXXALIASWARN (roundl);
733 #elif defined GNULIB_POSIXCHECK
734 # undef roundl
735 # if HAVE_RAW_DECL_ROUNDL
736 _GL_WARN_ON_USE (roundl, "roundl is unportable - "
737                  "use gnulib module roundl for portability");
738 # endif
739 #endif
740
741
742 #if @GNULIB_SINF@
743 # if !@HAVE_SINF@
744 #  undef sinf
745 _GL_FUNCDECL_SYS (sinf, float, (float x));
746 # endif
747 _GL_CXXALIAS_SYS (sinf, float, (float x));
748 _GL_CXXALIASWARN (sinf);
749 #elif defined GNULIB_POSIXCHECK
750 # undef sinf
751 # if HAVE_RAW_DECL_SINF
752 _GL_WARN_ON_USE (sinf, "sinf is unportable - "
753                  "use gnulib module sinf for portability");
754 # endif
755 #endif
756
757 #if @GNULIB_SINL@
758 # if !@HAVE_SINL@ || !@HAVE_DECL_SINL@
759 _GL_FUNCDECL_SYS (sinl, long double, (long double x));
760 # endif
761 _GL_CXXALIAS_SYS (sinl, long double, (long double x));
762 _GL_CXXALIASWARN (sinl);
763 #elif defined GNULIB_POSIXCHECK
764 # undef sinl
765 # if HAVE_RAW_DECL_SINL
766 _GL_WARN_ON_USE (sinl, "sinl is unportable - "
767                  "use gnulib module mathl for portability");
768 # endif
769 #endif
770
771
772 #if @GNULIB_SINHF@
773 # if !@HAVE_SINHF@
774 #  undef sinhf
775 _GL_FUNCDECL_SYS (sinhf, float, (float x));
776 # endif
777 _GL_CXXALIAS_SYS (sinhf, float, (float x));
778 _GL_CXXALIASWARN (sinhf);
779 #elif defined GNULIB_POSIXCHECK
780 # undef sinhf
781 # if HAVE_RAW_DECL_SINHF
782 _GL_WARN_ON_USE (sinhf, "sinhf is unportable - "
783                  "use gnulib module sinhf for portability");
784 # endif
785 #endif
786
787
788 #if @GNULIB_SQRTF@
789 # if !@HAVE_SQRTF@
790 #  undef sqrtf
791 _GL_FUNCDECL_SYS (sqrtf, float, (float x));
792 # endif
793 _GL_CXXALIAS_SYS (sqrtf, float, (float x));
794 _GL_CXXALIASWARN (sqrtf);
795 #elif defined GNULIB_POSIXCHECK
796 # undef sqrtf
797 # if HAVE_RAW_DECL_SQRTF
798 _GL_WARN_ON_USE (sqrtf, "sqrtf is unportable - "
799                  "use gnulib module sqrtf for portability");
800 # endif
801 #endif
802
803 #if @GNULIB_SQRTL@
804 # if !@HAVE_SQRTL@ || !@HAVE_DECL_SQRTL@
805 _GL_FUNCDECL_SYS (sqrtl, long double, (long double x));
806 # endif
807 _GL_CXXALIAS_SYS (sqrtl, long double, (long double x));
808 _GL_CXXALIASWARN (sqrtl);
809 #elif defined GNULIB_POSIXCHECK
810 # undef sqrtl
811 # if HAVE_RAW_DECL_SQRTL
812 _GL_WARN_ON_USE (sqrtl, "sqrtl is unportable - "
813                  "use gnulib module mathl for portability");
814 # endif
815 #endif
816
817
818 #if @GNULIB_TANF@
819 # if !@HAVE_TANF@
820 #  undef tanf
821 _GL_FUNCDECL_SYS (tanf, float, (float x));
822 # endif
823 _GL_CXXALIAS_SYS (tanf, float, (float x));
824 _GL_CXXALIASWARN (tanf);
825 #elif defined GNULIB_POSIXCHECK
826 # undef tanf
827 # if HAVE_RAW_DECL_TANF
828 _GL_WARN_ON_USE (tanf, "tanf is unportable - "
829                  "use gnulib module tanf for portability");
830 # endif
831 #endif
832
833 #if @GNULIB_TANL@
834 # if !@HAVE_TANL@ || !@HAVE_DECL_TANL@
835 _GL_FUNCDECL_SYS (tanl, long double, (long double x));
836 # endif
837 _GL_CXXALIAS_SYS (tanl, long double, (long double x));
838 _GL_CXXALIASWARN (tanl);
839 #elif defined GNULIB_POSIXCHECK
840 # undef tanl
841 # if HAVE_RAW_DECL_TANL
842 _GL_WARN_ON_USE (tanl, "tanl is unportable - "
843                  "use gnulib module mathl for portability");
844 # endif
845 #endif
846
847
848 #if @GNULIB_TRUNCF@
849 # if @REPLACE_TRUNCF@
850 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
851 #   define truncf rpl_truncf
852 #  endif
853 _GL_FUNCDECL_RPL (truncf, float, (float x));
854 _GL_CXXALIAS_RPL (truncf, float, (float x));
855 # else
856 #  if !@HAVE_DECL_TRUNCF@
857 _GL_FUNCDECL_SYS (truncf, float, (float x));
858 #  endif
859 _GL_CXXALIAS_SYS (truncf, float, (float x));
860 # endif
861 _GL_CXXALIASWARN (truncf);
862 #elif defined GNULIB_POSIXCHECK
863 # undef truncf
864 # if HAVE_RAW_DECL_TRUNCF
865 _GL_WARN_ON_USE (truncf, "truncf is unportable - "
866                  "use gnulib module truncf for portability");
867 # endif
868 #endif
869
870 #if @GNULIB_TRUNC@
871 # if @REPLACE_TRUNC@
872 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
873 #   define trunc rpl_trunc
874 #  endif
875 _GL_FUNCDECL_RPL (trunc, double, (double x));
876 _GL_CXXALIAS_RPL (trunc, double, (double x));
877 # else
878 #  if !@HAVE_DECL_TRUNC@
879 _GL_FUNCDECL_SYS (trunc, double, (double x));
880 #  endif
881 _GL_CXXALIAS_SYS (trunc, double, (double x));
882 # endif
883 _GL_CXXALIASWARN (trunc);
884 #elif defined GNULIB_POSIXCHECK
885 # undef trunc
886 # if HAVE_RAW_DECL_TRUNC
887 _GL_WARN_ON_USE (trunc, "trunc is unportable - "
888                  "use gnulib module trunc for portability");
889 # endif
890 #endif
891
892 #if @GNULIB_TRUNCL@
893 # if @REPLACE_TRUNCL@
894 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
895 #   undef truncl
896 #   define truncl rpl_truncl
897 #  endif
898 _GL_FUNCDECL_RPL (truncl, long double, (long double x));
899 _GL_CXXALIAS_RPL (truncl, long double, (long double x));
900 # else
901 #  if !@HAVE_DECL_TRUNCL@
902 _GL_FUNCDECL_SYS (truncl, long double, (long double x));
903 #  endif
904 _GL_CXXALIAS_SYS (truncl, long double, (long double x));
905 # endif
906 _GL_CXXALIASWARN (truncl);
907 #elif defined GNULIB_POSIXCHECK
908 # undef truncl
909 # if HAVE_RAW_DECL_TRUNCL
910 _GL_WARN_ON_USE (truncl, "truncl is unportable - "
911                  "use gnulib module truncl for portability");
912 # endif
913 #endif
914
915
916 /* Definitions of function-like macros come here, after the function
917    declarations.  */
918
919
920 #if @GNULIB_ISFINITE@
921 # if @REPLACE_ISFINITE@
922 _GL_EXTERN_C int gl_isfinitef (float x);
923 _GL_EXTERN_C int gl_isfinited (double x);
924 _GL_EXTERN_C int gl_isfinitel (long double x);
925 #  undef isfinite
926 #  define isfinite(x) \
927    (sizeof (x) == sizeof (long double) ? gl_isfinitel (x) : \
928     sizeof (x) == sizeof (double) ? gl_isfinited (x) : \
929     gl_isfinitef (x))
930 # endif
931 #elif defined GNULIB_POSIXCHECK
932 # if defined isfinite
933 _GL_WARN_REAL_FLOATING_DECL (isfinite);
934 #  undef isfinite
935 #  define isfinite(x) _GL_WARN_REAL_FLOATING_IMPL (isfinite, x)
936 # endif
937 #endif
938
939
940 #if @GNULIB_ISINF@
941 # if @REPLACE_ISINF@
942 _GL_EXTERN_C int gl_isinff (float x);
943 _GL_EXTERN_C int gl_isinfd (double x);
944 _GL_EXTERN_C int gl_isinfl (long double x);
945 #  undef isinf
946 #  define isinf(x) \
947    (sizeof (x) == sizeof (long double) ? gl_isinfl (x) : \
948     sizeof (x) == sizeof (double) ? gl_isinfd (x) : \
949     gl_isinff (x))
950 # endif
951 #elif defined GNULIB_POSIXCHECK
952 # if defined isinf
953 _GL_WARN_REAL_FLOATING_DECL (isinf);
954 #  undef isinf
955 #  define isinf(x) _GL_WARN_REAL_FLOATING_IMPL (isinf, x)
956 # endif
957 #endif
958
959
960 #if @GNULIB_ISNANF@
961 /* Test for NaN for 'float' numbers.  */
962 # if @HAVE_ISNANF@
963 /* The original <math.h> included above provides a declaration of isnan macro
964    or (older) isnanf function.  */
965 #  if __GNUC__ >= 4
966     /* GCC 4.0 and newer provides three built-ins for isnan.  */
967 #   undef isnanf
968 #   define isnanf(x) __builtin_isnanf ((float)(x))
969 #  elif defined isnan
970 #   undef isnanf
971 #   define isnanf(x) isnan ((float)(x))
972 #  endif
973 # else
974 /* Test whether X is a NaN.  */
975 #  undef isnanf
976 #  define isnanf rpl_isnanf
977 _GL_EXTERN_C int isnanf (float x);
978 # endif
979 #endif
980
981 #if @GNULIB_ISNAND@
982 /* Test for NaN for 'double' numbers.
983    This function is a gnulib extension, unlike isnan() which applied only
984    to 'double' numbers earlier but now is a type-generic macro.  */
985 # if @HAVE_ISNAND@
986 /* The original <math.h> included above provides a declaration of isnan
987    macro.  */
988 #  if __GNUC__ >= 4
989     /* GCC 4.0 and newer provides three built-ins for isnan.  */
990 #   undef isnand
991 #   define isnand(x) __builtin_isnan ((double)(x))
992 #  else
993 #   undef isnand
994 #   define isnand(x) isnan ((double)(x))
995 #  endif
996 # else
997 /* Test whether X is a NaN.  */
998 #  undef isnand
999 #  define isnand rpl_isnand
1000 _GL_EXTERN_C int isnand (double x);
1001 # endif
1002 #endif
1003
1004 #if @GNULIB_ISNANL@
1005 /* Test for NaN for 'long double' numbers.  */
1006 # if @HAVE_ISNANL@
1007 /* The original <math.h> included above provides a declaration of isnan
1008    macro or (older) isnanl function.  */
1009 #  if __GNUC__ >= 4
1010     /* GCC 4.0 and newer provides three built-ins for isnan.  */
1011 #   undef isnanl
1012 #   define isnanl(x) __builtin_isnanl ((long double)(x))
1013 #  elif defined isnan
1014 #   undef isnanl
1015 #   define isnanl(x) isnan ((long double)(x))
1016 #  endif
1017 # else
1018 /* Test whether X is a NaN.  */
1019 #  undef isnanl
1020 #  define isnanl rpl_isnanl
1021 _GL_EXTERN_C int isnanl (long double x);
1022 # endif
1023 #endif
1024
1025 /* This must come *after* the snippets for GNULIB_ISNANF and GNULIB_ISNANL!  */
1026 #if @GNULIB_ISNAN@
1027 # if @REPLACE_ISNAN@
1028 /* We can't just use the isnanf macro (e.g.) as exposed by
1029    isnanf.h (e.g.) here, because those may end up being macros
1030    that recursively expand back to isnan.  So use the gnulib
1031    replacements for them directly. */
1032 #  if @HAVE_ISNANF@ && __GNUC__ >= 4
1033 #   define gl_isnan_f(x) __builtin_isnanf ((float)(x))
1034 #  else
1035 _GL_EXTERN_C int rpl_isnanf (float x);
1036 #   define gl_isnan_f(x) rpl_isnanf (x)
1037 #  endif
1038 #  if @HAVE_ISNAND@ && __GNUC__ >= 4
1039 #   define gl_isnan_d(x) __builtin_isnan ((double)(x))
1040 #  else
1041 _GL_EXTERN_C int rpl_isnand (double x);
1042 #   define gl_isnan_d(x) rpl_isnand (x)
1043 #  endif
1044 #  if @HAVE_ISNANL@ && __GNUC__ >= 4
1045 #   define gl_isnan_l(x) __builtin_isnanl ((long double)(x))
1046 #  else
1047 _GL_EXTERN_C int rpl_isnanl (long double x);
1048 #   define gl_isnan_l(x) rpl_isnanl (x)
1049 #  endif
1050 #  undef isnan
1051 #  define isnan(x) \
1052    (sizeof (x) == sizeof (long double) ? gl_isnan_l (x) : \
1053     sizeof (x) == sizeof (double) ? gl_isnan_d (x) : \
1054     gl_isnan_f (x))
1055 # elif __GNUC__ >= 4
1056 #  undef isnan
1057 #  define isnan(x) \
1058    (sizeof (x) == sizeof (long double) ? __builtin_isnanl ((long double)(x)) : \
1059     sizeof (x) == sizeof (double) ? __builtin_isnan ((double)(x)) : \
1060     __builtin_isnanf ((float)(x)))
1061 # endif
1062 /* Ensure isnan is a macro.  */
1063 # ifndef isnan
1064 #  define isnan isnan
1065 # endif
1066 #elif defined GNULIB_POSIXCHECK
1067 # if defined isnan
1068 _GL_WARN_REAL_FLOATING_DECL (isnan);
1069 #  undef isnan
1070 #  define isnan(x) _GL_WARN_REAL_FLOATING_IMPL (isnan, x)
1071 # endif
1072 #endif
1073
1074
1075 #if @GNULIB_SIGNBIT@
1076 # if @REPLACE_SIGNBIT_USING_GCC@
1077 #  undef signbit
1078    /* GCC 4.0 and newer provides three built-ins for signbit.  */
1079 #  define signbit(x) \
1080    (sizeof (x) == sizeof (long double) ? __builtin_signbitl (x) : \
1081     sizeof (x) == sizeof (double) ? __builtin_signbit (x) : \
1082     __builtin_signbitf (x))
1083 # endif
1084 # if @REPLACE_SIGNBIT@
1085 #  undef signbit
1086 _GL_EXTERN_C int gl_signbitf (float arg);
1087 _GL_EXTERN_C int gl_signbitd (double arg);
1088 _GL_EXTERN_C int gl_signbitl (long double arg);
1089 #  if __GNUC__ >= 2 && !__STRICT_ANSI__
1090 #   define _GL_NUM_UINT_WORDS(type) \
1091       ((sizeof (type) + sizeof (unsigned int) - 1) / sizeof (unsigned int))
1092 #   if defined FLT_SIGNBIT_WORD && defined FLT_SIGNBIT_BIT && !defined gl_signbitf
1093 #    define gl_signbitf_OPTIMIZED_MACRO
1094 #    define gl_signbitf(arg) \
1095        ({ union { float _value;                                         \
1096                   unsigned int _word[_GL_NUM_UINT_WORDS (float)];       \
1097                 } _m;                                                   \
1098           _m._value = (arg);                                            \
1099           (_m._word[FLT_SIGNBIT_WORD] >> FLT_SIGNBIT_BIT) & 1;          \
1100         })
1101 #   endif
1102 #   if defined DBL_SIGNBIT_WORD && defined DBL_SIGNBIT_BIT && !defined gl_signbitd
1103 #    define gl_signbitd_OPTIMIZED_MACRO
1104 #    define gl_signbitd(arg) \
1105        ({ union { double _value;                                        \
1106                   unsigned int _word[_GL_NUM_UINT_WORDS (double)];      \
1107                 } _m;                                                   \
1108           _m._value = (arg);                                            \
1109           (_m._word[DBL_SIGNBIT_WORD] >> DBL_SIGNBIT_BIT) & 1;          \
1110         })
1111 #   endif
1112 #   if defined LDBL_SIGNBIT_WORD && defined LDBL_SIGNBIT_BIT && !defined gl_signbitl
1113 #    define gl_signbitl_OPTIMIZED_MACRO
1114 #    define gl_signbitl(arg) \
1115        ({ union { long double _value;                                   \
1116                   unsigned int _word[_GL_NUM_UINT_WORDS (long double)]; \
1117                 } _m;                                                   \
1118           _m._value = (arg);                                            \
1119           (_m._word[LDBL_SIGNBIT_WORD] >> LDBL_SIGNBIT_BIT) & 1;        \
1120         })
1121 #   endif
1122 #  endif
1123 #  define signbit(x) \
1124    (sizeof (x) == sizeof (long double) ? gl_signbitl (x) : \
1125     sizeof (x) == sizeof (double) ? gl_signbitd (x) : \
1126     gl_signbitf (x))
1127 # endif
1128 #elif defined GNULIB_POSIXCHECK
1129 # if defined signbit
1130 _GL_WARN_REAL_FLOATING_DECL (signbit);
1131 #  undef signbit
1132 #  define signbit(x) _GL_WARN_REAL_FLOATING_IMPL (signbit, x)
1133 # endif
1134 #endif
1135
1136
1137 #endif /* _@GUARD_PREFIX@_MATH_H */
1138 #endif /* _@GUARD_PREFIX@_MATH_H */