New module 'atan2f'.
[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_EXPF@
308 # if !@HAVE_EXPF@
309 #  undef expf
310 _GL_FUNCDECL_SYS (expf, float, (float x));
311 # endif
312 _GL_CXXALIAS_SYS (expf, float, (float x));
313 _GL_CXXALIASWARN (expf);
314 #elif defined GNULIB_POSIXCHECK
315 # undef expf
316 # if HAVE_RAW_DECL_EXPF
317 _GL_WARN_ON_USE (expf, "expf is unportable - "
318                  "use gnulib module expf for portability");
319 # endif
320 #endif
321
322 #if @GNULIB_EXPL@
323 # if !@HAVE_EXPL@ || !@HAVE_DECL_EXPL@
324 _GL_FUNCDECL_SYS (expl, long double, (long double x));
325 # endif
326 _GL_CXXALIAS_SYS (expl, long double, (long double x));
327 _GL_CXXALIASWARN (expl);
328 #elif defined GNULIB_POSIXCHECK
329 # undef expl
330 # if HAVE_RAW_DECL_EXPL
331 _GL_WARN_ON_USE (expl, "expl is unportable - "
332                  "use gnulib module mathl for portability");
333 # endif
334 #endif
335
336
337 #if @GNULIB_FABSF@
338 # if !@HAVE_FABSF@
339 #  undef fabsf
340 _GL_FUNCDECL_SYS (fabsf, float, (float x));
341 # endif
342 _GL_CXXALIAS_SYS (fabsf, float, (float x));
343 _GL_CXXALIASWARN (fabsf);
344 #elif defined GNULIB_POSIXCHECK
345 # undef fabsf
346 # if HAVE_RAW_DECL_FABSF
347 _GL_WARN_ON_USE (fabsf, "fabsf is unportable - "
348                  "use gnulib module fabsf for portability");
349 # endif
350 #endif
351
352
353 #if @GNULIB_FLOORF@
354 # if @REPLACE_FLOORF@
355 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
356 #   undef floorf
357 #   define floorf rpl_floorf
358 #  endif
359 _GL_FUNCDECL_RPL (floorf, float, (float x));
360 _GL_CXXALIAS_RPL (floorf, float, (float x));
361 # else
362 #  if !@HAVE_DECL_FLOORF@
363 _GL_FUNCDECL_SYS (floorf, float, (float x));
364 #  endif
365 _GL_CXXALIAS_SYS (floorf, float, (float x));
366 # endif
367 _GL_CXXALIASWARN (floorf);
368 #elif defined GNULIB_POSIXCHECK
369 # undef floorf
370 # if HAVE_RAW_DECL_FLOORF
371 _GL_WARN_ON_USE (floorf, "floorf is unportable - "
372                  "use gnulib module floorf for portability");
373 # endif
374 #endif
375
376 #if @GNULIB_FLOOR@
377 # if @REPLACE_FLOOR@
378 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
379 #   define floor rpl_floor
380 #  endif
381 _GL_FUNCDECL_RPL (floor, double, (double x));
382 _GL_CXXALIAS_RPL (floor, double, (double x));
383 # else
384 _GL_CXXALIAS_SYS (floor, double, (double x));
385 # endif
386 _GL_CXXALIASWARN (floor);
387 #endif
388
389 #if @GNULIB_FLOORL@
390 # if @REPLACE_FLOORL@
391 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
392 #   undef floorl
393 #   define floorl rpl_floorl
394 #  endif
395 _GL_FUNCDECL_RPL (floorl, long double, (long double x));
396 _GL_CXXALIAS_RPL (floorl, long double, (long double x));
397 # else
398 #  if !@HAVE_DECL_FLOORL@
399 _GL_FUNCDECL_SYS (floorl, long double, (long double x));
400 #  endif
401 _GL_CXXALIAS_SYS (floorl, long double, (long double x));
402 # endif
403 _GL_CXXALIASWARN (floorl);
404 #elif defined GNULIB_POSIXCHECK
405 # undef floorl
406 # if HAVE_RAW_DECL_FLOORL
407 _GL_WARN_ON_USE (floorl, "floorl is unportable - "
408                  "use gnulib module floorl for portability");
409 # endif
410 #endif
411
412
413 #if @GNULIB_FMODF@
414 # if !@HAVE_FMODF@
415 #  undef fmodf
416 _GL_FUNCDECL_SYS (fmodf, float, (float x, float y));
417 # endif
418 _GL_CXXALIAS_SYS (fmodf, float, (float x, float y));
419 _GL_CXXALIASWARN (fmodf);
420 #elif defined GNULIB_POSIXCHECK
421 # undef fmodf
422 # if HAVE_RAW_DECL_FMODF
423 _GL_WARN_ON_USE (fmodf, "fmodf is unportable - "
424                  "use gnulib module fmodf for portability");
425 # endif
426 #endif
427
428
429 /* Write x as
430      x = mantissa * 2^exp
431    where
432      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
433      If x is zero: mantissa = x, exp = 0.
434      If x is infinite or NaN: mantissa = x, exp unspecified.
435    Store exp in *EXPPTR and return mantissa.  */
436 #if @GNULIB_FREXPF@
437 # if @REPLACE_FREXPF@
438 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
439 #   undef frexpf
440 #   define frexpf rpl_frexpf
441 #  endif
442 _GL_FUNCDECL_RPL (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
443 _GL_CXXALIAS_RPL (frexpf, float, (float x, int *expptr));
444 # else
445 #  if !@HAVE_FREXPF@
446 #   undef frexpf
447 _GL_FUNCDECL_SYS (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
448 #  endif
449 _GL_CXXALIAS_SYS (frexpf, float, (float x, int *expptr));
450 # endif
451 _GL_CXXALIASWARN (frexpf);
452 #elif defined GNULIB_POSIXCHECK
453 # undef frexpf
454 # if HAVE_RAW_DECL_FREXPF
455 _GL_WARN_ON_USE (frexpf, "frexpf is unportable - "
456                  "use gnulib module frexpf for portability");
457 # endif
458 #endif
459
460 /* Write x as
461      x = mantissa * 2^exp
462    where
463      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
464      If x is zero: mantissa = x, exp = 0.
465      If x is infinite or NaN: mantissa = x, exp unspecified.
466    Store exp in *EXPPTR and return mantissa.  */
467 #if @GNULIB_FREXP@
468 # if @REPLACE_FREXP@
469 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
470 #   define frexp rpl_frexp
471 #  endif
472 _GL_FUNCDECL_RPL (frexp, double, (double x, int *expptr) _GL_ARG_NONNULL ((2)));
473 _GL_CXXALIAS_RPL (frexp, double, (double x, int *expptr));
474 # else
475 _GL_CXXALIAS_SYS (frexp, double, (double x, int *expptr));
476 # endif
477 _GL_CXXALIASWARN (frexp);
478 #elif defined GNULIB_POSIXCHECK
479 # undef frexp
480 /* Assume frexp is always declared.  */
481 _GL_WARN_ON_USE (frexp, "frexp is unportable - "
482                  "use gnulib module frexp for portability");
483 #endif
484
485 /* Write x as
486      x = mantissa * 2^exp
487    where
488      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
489      If x is zero: mantissa = x, exp = 0.
490      If x is infinite or NaN: mantissa = x, exp unspecified.
491    Store exp in *EXPPTR and return mantissa.  */
492 #if @GNULIB_FREXPL@ && @REPLACE_FREXPL@
493 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
494 #  undef frexpl
495 #  define frexpl rpl_frexpl
496 # endif
497 _GL_FUNCDECL_RPL (frexpl, long double,
498                   (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
499 _GL_CXXALIAS_RPL (frexpl, long double, (long double x, int *expptr));
500 #else
501 # if !@HAVE_DECL_FREXPL@
502 _GL_FUNCDECL_SYS (frexpl, long double,
503                   (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
504 # endif
505 # if @GNULIB_FREXPL@
506 _GL_CXXALIAS_SYS (frexpl, long double, (long double x, int *expptr));
507 # endif
508 #endif
509 #if @GNULIB_FREXPL@ && !(@REPLACE_FREXPL@ && !@HAVE_DECL_FREXPL@)
510 _GL_CXXALIASWARN (frexpl);
511 #endif
512 #if !@GNULIB_FREXPL@ && defined GNULIB_POSIXCHECK
513 # undef frexpl
514 # if HAVE_RAW_DECL_FREXPL
515 _GL_WARN_ON_USE (frexpl, "frexpl is unportable - "
516                  "use gnulib module frexpl for portability");
517 # endif
518 #endif
519
520
521 /* Return x * 2^exp.  */
522 #if @GNULIB_LDEXPF@
523 # if !@HAVE_LDEXPF@
524 #  undef ldexpf
525 _GL_FUNCDECL_SYS (ldexpf, float, (float x, int exp));
526 # endif
527 _GL_CXXALIAS_SYS (ldexpf, float, (float x, int exp));
528 _GL_CXXALIASWARN (ldexpf);
529 #elif defined GNULIB_POSIXCHECK
530 # undef ldexpf
531 # if HAVE_RAW_DECL_LDEXPF
532 _GL_WARN_ON_USE (ldexpf, "ldexpf is unportable - "
533                  "use gnulib module ldexpf for portability");
534 # endif
535 #endif
536
537 /* Return x * 2^exp.  */
538 #if @GNULIB_LDEXPL@ && @REPLACE_LDEXPL@
539 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
540 #  undef ldexpl
541 #  define ldexpl rpl_ldexpl
542 # endif
543 _GL_FUNCDECL_RPL (ldexpl, long double, (long double x, int exp));
544 _GL_CXXALIAS_RPL (ldexpl, long double, (long double x, int exp));
545 #else
546 # if !@HAVE_DECL_LDEXPL@
547 _GL_FUNCDECL_SYS (ldexpl, long double, (long double x, int exp));
548 # endif
549 # if @GNULIB_LDEXPL@
550 _GL_CXXALIAS_SYS (ldexpl, long double, (long double x, int exp));
551 # endif
552 #endif
553 #if @GNULIB_LDEXPL@
554 _GL_CXXALIASWARN (ldexpl);
555 #endif
556 #if !@GNULIB_LDEXPL@ && defined GNULIB_POSIXCHECK
557 # undef ldexpl
558 # if HAVE_RAW_DECL_LDEXPL
559 _GL_WARN_ON_USE (ldexpl, "ldexpl is unportable - "
560                  "use gnulib module ldexpl for portability");
561 # endif
562 #endif
563
564
565 #if @GNULIB_LOGB@
566 # if !@HAVE_DECL_LOGB@
567 _GL_EXTERN_C double logb (double x);
568 # endif
569 #elif defined GNULIB_POSIXCHECK
570 # undef logb
571 # if HAVE_RAW_DECL_LOGB
572 _GL_WARN_ON_USE (logb, "logb is unportable - "
573                  "use gnulib module logb for portability");
574 # endif
575 #endif
576
577
578 #if @GNULIB_LOGF@
579 # if !@HAVE_LOGF@
580 #  undef logf
581 _GL_FUNCDECL_SYS (logf, float, (float x));
582 # endif
583 _GL_CXXALIAS_SYS (logf, float, (float x));
584 _GL_CXXALIASWARN (logf);
585 #elif defined GNULIB_POSIXCHECK
586 # undef logf
587 # if HAVE_RAW_DECL_LOGF
588 _GL_WARN_ON_USE (logf, "logf is unportable - "
589                  "use gnulib module logf for portability");
590 # endif
591 #endif
592
593 #if @GNULIB_LOGL@
594 # if !@HAVE_LOGL@ || !@HAVE_DECL_LOGL@
595 _GL_FUNCDECL_SYS (logl, long double, (long double x));
596 # endif
597 _GL_CXXALIAS_SYS (logl, long double, (long double x));
598 _GL_CXXALIASWARN (logl);
599 #elif defined GNULIB_POSIXCHECK
600 # undef logl
601 # if HAVE_RAW_DECL_LOGL
602 _GL_WARN_ON_USE (logl, "logl is unportable - "
603                  "use gnulib module mathl for portability");
604 # endif
605 #endif
606
607
608 #if @GNULIB_LOG10F@
609 # if !@HAVE_LOG10F@
610 #  undef log10f
611 _GL_FUNCDECL_SYS (log10f, float, (float x));
612 # endif
613 _GL_CXXALIAS_SYS (log10f, float, (float x));
614 _GL_CXXALIASWARN (log10f);
615 #elif defined GNULIB_POSIXCHECK
616 # undef log10f
617 # if HAVE_RAW_DECL_LOG10F
618 _GL_WARN_ON_USE (log10f, "log10f is unportable - "
619                  "use gnulib module log10f for portability");
620 # endif
621 #endif
622
623
624 #if @GNULIB_MODFF@
625 # if !@HAVE_MODFF@
626 #  undef modff
627 _GL_FUNCDECL_SYS (modff, float, (float x, float *iptr) _GL_ARG_NONNULL ((2)));
628 # endif
629 _GL_CXXALIAS_SYS (modff, float, (float x, float *iptr));
630 _GL_CXXALIASWARN (modff);
631 #elif defined GNULIB_POSIXCHECK
632 # undef modff
633 # if HAVE_RAW_DECL_MODFF
634 _GL_WARN_ON_USE (modff, "modff is unportable - "
635                  "use gnulib module modff for portability");
636 # endif
637 #endif
638
639
640 #if @GNULIB_POWF@
641 # if !@HAVE_POWF@
642 #  undef powf
643 _GL_FUNCDECL_SYS (powf, float, (float x, float y));
644 # endif
645 _GL_CXXALIAS_SYS (powf, float, (float x, float y));
646 _GL_CXXALIASWARN (powf);
647 #elif defined GNULIB_POSIXCHECK
648 # undef powf
649 # if HAVE_RAW_DECL_POWF
650 _GL_WARN_ON_USE (powf, "powf is unportable - "
651                  "use gnulib module powf for portability");
652 # endif
653 #endif
654
655
656 #if @GNULIB_ROUNDF@
657 # if @REPLACE_ROUNDF@
658 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
659 #   undef roundf
660 #   define roundf rpl_roundf
661 #  endif
662 _GL_FUNCDECL_RPL (roundf, float, (float x));
663 _GL_CXXALIAS_RPL (roundf, float, (float x));
664 # else
665 #  if !@HAVE_DECL_ROUNDF@
666 _GL_FUNCDECL_SYS (roundf, float, (float x));
667 #  endif
668 _GL_CXXALIAS_SYS (roundf, float, (float x));
669 # endif
670 _GL_CXXALIASWARN (roundf);
671 #elif defined GNULIB_POSIXCHECK
672 # undef roundf
673 # if HAVE_RAW_DECL_ROUNDF
674 _GL_WARN_ON_USE (roundf, "roundf is unportable - "
675                  "use gnulib module roundf for portability");
676 # endif
677 #endif
678
679 #if @GNULIB_ROUND@
680 # if @REPLACE_ROUND@
681 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
682 #   undef round
683 #   define round rpl_round
684 #  endif
685 _GL_FUNCDECL_RPL (round, double, (double x));
686 _GL_CXXALIAS_RPL (round, double, (double x));
687 # else
688 #  if !@HAVE_DECL_ROUND@
689 _GL_FUNCDECL_SYS (round, double, (double x));
690 #  endif
691 _GL_CXXALIAS_SYS (round, double, (double x));
692 # endif
693 _GL_CXXALIASWARN (round);
694 #elif defined GNULIB_POSIXCHECK
695 # undef round
696 # if HAVE_RAW_DECL_ROUND
697 _GL_WARN_ON_USE (round, "round is unportable - "
698                  "use gnulib module round for portability");
699 # endif
700 #endif
701
702 #if @GNULIB_ROUNDL@
703 # if @REPLACE_ROUNDL@
704 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
705 #   undef roundl
706 #   define roundl rpl_roundl
707 #  endif
708 _GL_FUNCDECL_RPL (roundl, long double, (long double x));
709 _GL_CXXALIAS_RPL (roundl, long double, (long double x));
710 # else
711 #  if !@HAVE_DECL_ROUNDL@
712 _GL_FUNCDECL_SYS (roundl, long double, (long double x));
713 #  endif
714 _GL_CXXALIAS_SYS (roundl, long double, (long double x));
715 # endif
716 _GL_CXXALIASWARN (roundl);
717 #elif defined GNULIB_POSIXCHECK
718 # undef roundl
719 # if HAVE_RAW_DECL_ROUNDL
720 _GL_WARN_ON_USE (roundl, "roundl is unportable - "
721                  "use gnulib module roundl for portability");
722 # endif
723 #endif
724
725
726 #if @GNULIB_SINF@
727 # if !@HAVE_SINF@
728 #  undef sinf
729 _GL_FUNCDECL_SYS (sinf, float, (float x));
730 # endif
731 _GL_CXXALIAS_SYS (sinf, float, (float x));
732 _GL_CXXALIASWARN (sinf);
733 #elif defined GNULIB_POSIXCHECK
734 # undef sinf
735 # if HAVE_RAW_DECL_SINF
736 _GL_WARN_ON_USE (sinf, "sinf is unportable - "
737                  "use gnulib module sinf for portability");
738 # endif
739 #endif
740
741 #if @GNULIB_SINL@
742 # if !@HAVE_SINL@ || !@HAVE_DECL_SINL@
743 _GL_FUNCDECL_SYS (sinl, long double, (long double x));
744 # endif
745 _GL_CXXALIAS_SYS (sinl, long double, (long double x));
746 _GL_CXXALIASWARN (sinl);
747 #elif defined GNULIB_POSIXCHECK
748 # undef sinl
749 # if HAVE_RAW_DECL_SINL
750 _GL_WARN_ON_USE (sinl, "sinl is unportable - "
751                  "use gnulib module mathl for portability");
752 # endif
753 #endif
754
755
756 #if @GNULIB_SQRTF@
757 # if !@HAVE_SQRTF@
758 #  undef sqrtf
759 _GL_FUNCDECL_SYS (sqrtf, float, (float x));
760 # endif
761 _GL_CXXALIAS_SYS (sqrtf, float, (float x));
762 _GL_CXXALIASWARN (sqrtf);
763 #elif defined GNULIB_POSIXCHECK
764 # undef sqrtf
765 # if HAVE_RAW_DECL_SQRTF
766 _GL_WARN_ON_USE (sqrtf, "sqrtf is unportable - "
767                  "use gnulib module sqrtf for portability");
768 # endif
769 #endif
770
771 #if @GNULIB_SQRTL@
772 # if !@HAVE_SQRTL@ || !@HAVE_DECL_SQRTL@
773 _GL_FUNCDECL_SYS (sqrtl, long double, (long double x));
774 # endif
775 _GL_CXXALIAS_SYS (sqrtl, long double, (long double x));
776 _GL_CXXALIASWARN (sqrtl);
777 #elif defined GNULIB_POSIXCHECK
778 # undef sqrtl
779 # if HAVE_RAW_DECL_SQRTL
780 _GL_WARN_ON_USE (sqrtl, "sqrtl is unportable - "
781                  "use gnulib module mathl for portability");
782 # endif
783 #endif
784
785
786 #if @GNULIB_TANF@
787 # if !@HAVE_TANF@
788 #  undef tanf
789 _GL_FUNCDECL_SYS (tanf, float, (float x));
790 # endif
791 _GL_CXXALIAS_SYS (tanf, float, (float x));
792 _GL_CXXALIASWARN (tanf);
793 #elif defined GNULIB_POSIXCHECK
794 # undef tanf
795 # if HAVE_RAW_DECL_TANF
796 _GL_WARN_ON_USE (tanf, "tanf is unportable - "
797                  "use gnulib module tanf for portability");
798 # endif
799 #endif
800
801 #if @GNULIB_TANL@
802 # if !@HAVE_TANL@ || !@HAVE_DECL_TANL@
803 _GL_FUNCDECL_SYS (tanl, long double, (long double x));
804 # endif
805 _GL_CXXALIAS_SYS (tanl, long double, (long double x));
806 _GL_CXXALIASWARN (tanl);
807 #elif defined GNULIB_POSIXCHECK
808 # undef tanl
809 # if HAVE_RAW_DECL_TANL
810 _GL_WARN_ON_USE (tanl, "tanl is unportable - "
811                  "use gnulib module mathl for portability");
812 # endif
813 #endif
814
815
816 #if @GNULIB_TRUNCF@
817 # if @REPLACE_TRUNCF@
818 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
819 #   define truncf rpl_truncf
820 #  endif
821 _GL_FUNCDECL_RPL (truncf, float, (float x));
822 _GL_CXXALIAS_RPL (truncf, float, (float x));
823 # else
824 #  if !@HAVE_DECL_TRUNCF@
825 _GL_FUNCDECL_SYS (truncf, float, (float x));
826 #  endif
827 _GL_CXXALIAS_SYS (truncf, float, (float x));
828 # endif
829 _GL_CXXALIASWARN (truncf);
830 #elif defined GNULIB_POSIXCHECK
831 # undef truncf
832 # if HAVE_RAW_DECL_TRUNCF
833 _GL_WARN_ON_USE (truncf, "truncf is unportable - "
834                  "use gnulib module truncf for portability");
835 # endif
836 #endif
837
838 #if @GNULIB_TRUNC@
839 # if @REPLACE_TRUNC@
840 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
841 #   define trunc rpl_trunc
842 #  endif
843 _GL_FUNCDECL_RPL (trunc, double, (double x));
844 _GL_CXXALIAS_RPL (trunc, double, (double x));
845 # else
846 #  if !@HAVE_DECL_TRUNC@
847 _GL_FUNCDECL_SYS (trunc, double, (double x));
848 #  endif
849 _GL_CXXALIAS_SYS (trunc, double, (double x));
850 # endif
851 _GL_CXXALIASWARN (trunc);
852 #elif defined GNULIB_POSIXCHECK
853 # undef trunc
854 # if HAVE_RAW_DECL_TRUNC
855 _GL_WARN_ON_USE (trunc, "trunc is unportable - "
856                  "use gnulib module trunc for portability");
857 # endif
858 #endif
859
860 #if @GNULIB_TRUNCL@
861 # if @REPLACE_TRUNCL@
862 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
863 #   undef truncl
864 #   define truncl rpl_truncl
865 #  endif
866 _GL_FUNCDECL_RPL (truncl, long double, (long double x));
867 _GL_CXXALIAS_RPL (truncl, long double, (long double x));
868 # else
869 #  if !@HAVE_DECL_TRUNCL@
870 _GL_FUNCDECL_SYS (truncl, long double, (long double x));
871 #  endif
872 _GL_CXXALIAS_SYS (truncl, long double, (long double x));
873 # endif
874 _GL_CXXALIASWARN (truncl);
875 #elif defined GNULIB_POSIXCHECK
876 # undef truncl
877 # if HAVE_RAW_DECL_TRUNCL
878 _GL_WARN_ON_USE (truncl, "truncl is unportable - "
879                  "use gnulib module truncl for portability");
880 # endif
881 #endif
882
883
884 /* Definitions of function-like macros come here, after the function
885    declarations.  */
886
887
888 #if @GNULIB_ISFINITE@
889 # if @REPLACE_ISFINITE@
890 _GL_EXTERN_C int gl_isfinitef (float x);
891 _GL_EXTERN_C int gl_isfinited (double x);
892 _GL_EXTERN_C int gl_isfinitel (long double x);
893 #  undef isfinite
894 #  define isfinite(x) \
895    (sizeof (x) == sizeof (long double) ? gl_isfinitel (x) : \
896     sizeof (x) == sizeof (double) ? gl_isfinited (x) : \
897     gl_isfinitef (x))
898 # endif
899 #elif defined GNULIB_POSIXCHECK
900 # if defined isfinite
901 _GL_WARN_REAL_FLOATING_DECL (isfinite);
902 #  undef isfinite
903 #  define isfinite(x) _GL_WARN_REAL_FLOATING_IMPL (isfinite, x)
904 # endif
905 #endif
906
907
908 #if @GNULIB_ISINF@
909 # if @REPLACE_ISINF@
910 _GL_EXTERN_C int gl_isinff (float x);
911 _GL_EXTERN_C int gl_isinfd (double x);
912 _GL_EXTERN_C int gl_isinfl (long double x);
913 #  undef isinf
914 #  define isinf(x) \
915    (sizeof (x) == sizeof (long double) ? gl_isinfl (x) : \
916     sizeof (x) == sizeof (double) ? gl_isinfd (x) : \
917     gl_isinff (x))
918 # endif
919 #elif defined GNULIB_POSIXCHECK
920 # if defined isinf
921 _GL_WARN_REAL_FLOATING_DECL (isinf);
922 #  undef isinf
923 #  define isinf(x) _GL_WARN_REAL_FLOATING_IMPL (isinf, x)
924 # endif
925 #endif
926
927
928 #if @GNULIB_ISNANF@
929 /* Test for NaN for 'float' numbers.  */
930 # if @HAVE_ISNANF@
931 /* The original <math.h> included above provides a declaration of isnan macro
932    or (older) isnanf function.  */
933 #  if __GNUC__ >= 4
934     /* GCC 4.0 and newer provides three built-ins for isnan.  */
935 #   undef isnanf
936 #   define isnanf(x) __builtin_isnanf ((float)(x))
937 #  elif defined isnan
938 #   undef isnanf
939 #   define isnanf(x) isnan ((float)(x))
940 #  endif
941 # else
942 /* Test whether X is a NaN.  */
943 #  undef isnanf
944 #  define isnanf rpl_isnanf
945 _GL_EXTERN_C int isnanf (float x);
946 # endif
947 #endif
948
949 #if @GNULIB_ISNAND@
950 /* Test for NaN for 'double' numbers.
951    This function is a gnulib extension, unlike isnan() which applied only
952    to 'double' numbers earlier but now is a type-generic macro.  */
953 # if @HAVE_ISNAND@
954 /* The original <math.h> included above provides a declaration of isnan
955    macro.  */
956 #  if __GNUC__ >= 4
957     /* GCC 4.0 and newer provides three built-ins for isnan.  */
958 #   undef isnand
959 #   define isnand(x) __builtin_isnan ((double)(x))
960 #  else
961 #   undef isnand
962 #   define isnand(x) isnan ((double)(x))
963 #  endif
964 # else
965 /* Test whether X is a NaN.  */
966 #  undef isnand
967 #  define isnand rpl_isnand
968 _GL_EXTERN_C int isnand (double x);
969 # endif
970 #endif
971
972 #if @GNULIB_ISNANL@
973 /* Test for NaN for 'long double' numbers.  */
974 # if @HAVE_ISNANL@
975 /* The original <math.h> included above provides a declaration of isnan
976    macro or (older) isnanl function.  */
977 #  if __GNUC__ >= 4
978     /* GCC 4.0 and newer provides three built-ins for isnan.  */
979 #   undef isnanl
980 #   define isnanl(x) __builtin_isnanl ((long double)(x))
981 #  elif defined isnan
982 #   undef isnanl
983 #   define isnanl(x) isnan ((long double)(x))
984 #  endif
985 # else
986 /* Test whether X is a NaN.  */
987 #  undef isnanl
988 #  define isnanl rpl_isnanl
989 _GL_EXTERN_C int isnanl (long double x);
990 # endif
991 #endif
992
993 /* This must come *after* the snippets for GNULIB_ISNANF and GNULIB_ISNANL!  */
994 #if @GNULIB_ISNAN@
995 # if @REPLACE_ISNAN@
996 /* We can't just use the isnanf macro (e.g.) as exposed by
997    isnanf.h (e.g.) here, because those may end up being macros
998    that recursively expand back to isnan.  So use the gnulib
999    replacements for them directly. */
1000 #  if @HAVE_ISNANF@ && __GNUC__ >= 4
1001 #   define gl_isnan_f(x) __builtin_isnanf ((float)(x))
1002 #  else
1003 _GL_EXTERN_C int rpl_isnanf (float x);
1004 #   define gl_isnan_f(x) rpl_isnanf (x)
1005 #  endif
1006 #  if @HAVE_ISNAND@ && __GNUC__ >= 4
1007 #   define gl_isnan_d(x) __builtin_isnan ((double)(x))
1008 #  else
1009 _GL_EXTERN_C int rpl_isnand (double x);
1010 #   define gl_isnan_d(x) rpl_isnand (x)
1011 #  endif
1012 #  if @HAVE_ISNANL@ && __GNUC__ >= 4
1013 #   define gl_isnan_l(x) __builtin_isnanl ((long double)(x))
1014 #  else
1015 _GL_EXTERN_C int rpl_isnanl (long double x);
1016 #   define gl_isnan_l(x) rpl_isnanl (x)
1017 #  endif
1018 #  undef isnan
1019 #  define isnan(x) \
1020    (sizeof (x) == sizeof (long double) ? gl_isnan_l (x) : \
1021     sizeof (x) == sizeof (double) ? gl_isnan_d (x) : \
1022     gl_isnan_f (x))
1023 # elif __GNUC__ >= 4
1024 #  undef isnan
1025 #  define isnan(x) \
1026    (sizeof (x) == sizeof (long double) ? __builtin_isnanl ((long double)(x)) : \
1027     sizeof (x) == sizeof (double) ? __builtin_isnan ((double)(x)) : \
1028     __builtin_isnanf ((float)(x)))
1029 # endif
1030 /* Ensure isnan is a macro.  */
1031 # ifndef isnan
1032 #  define isnan isnan
1033 # endif
1034 #elif defined GNULIB_POSIXCHECK
1035 # if defined isnan
1036 _GL_WARN_REAL_FLOATING_DECL (isnan);
1037 #  undef isnan
1038 #  define isnan(x) _GL_WARN_REAL_FLOATING_IMPL (isnan, x)
1039 # endif
1040 #endif
1041
1042
1043 #if @GNULIB_SIGNBIT@
1044 # if @REPLACE_SIGNBIT_USING_GCC@
1045 #  undef signbit
1046    /* GCC 4.0 and newer provides three built-ins for signbit.  */
1047 #  define signbit(x) \
1048    (sizeof (x) == sizeof (long double) ? __builtin_signbitl (x) : \
1049     sizeof (x) == sizeof (double) ? __builtin_signbit (x) : \
1050     __builtin_signbitf (x))
1051 # endif
1052 # if @REPLACE_SIGNBIT@
1053 #  undef signbit
1054 _GL_EXTERN_C int gl_signbitf (float arg);
1055 _GL_EXTERN_C int gl_signbitd (double arg);
1056 _GL_EXTERN_C int gl_signbitl (long double arg);
1057 #  if __GNUC__ >= 2 && !__STRICT_ANSI__
1058 #   define _GL_NUM_UINT_WORDS(type) \
1059       ((sizeof (type) + sizeof (unsigned int) - 1) / sizeof (unsigned int))
1060 #   if defined FLT_SIGNBIT_WORD && defined FLT_SIGNBIT_BIT && !defined gl_signbitf
1061 #    define gl_signbitf_OPTIMIZED_MACRO
1062 #    define gl_signbitf(arg) \
1063        ({ union { float _value;                                         \
1064                   unsigned int _word[_GL_NUM_UINT_WORDS (float)];       \
1065                 } _m;                                                   \
1066           _m._value = (arg);                                            \
1067           (_m._word[FLT_SIGNBIT_WORD] >> FLT_SIGNBIT_BIT) & 1;          \
1068         })
1069 #   endif
1070 #   if defined DBL_SIGNBIT_WORD && defined DBL_SIGNBIT_BIT && !defined gl_signbitd
1071 #    define gl_signbitd_OPTIMIZED_MACRO
1072 #    define gl_signbitd(arg) \
1073        ({ union { double _value;                                        \
1074                   unsigned int _word[_GL_NUM_UINT_WORDS (double)];      \
1075                 } _m;                                                   \
1076           _m._value = (arg);                                            \
1077           (_m._word[DBL_SIGNBIT_WORD] >> DBL_SIGNBIT_BIT) & 1;          \
1078         })
1079 #   endif
1080 #   if defined LDBL_SIGNBIT_WORD && defined LDBL_SIGNBIT_BIT && !defined gl_signbitl
1081 #    define gl_signbitl_OPTIMIZED_MACRO
1082 #    define gl_signbitl(arg) \
1083        ({ union { long double _value;                                   \
1084                   unsigned int _word[_GL_NUM_UINT_WORDS (long double)]; \
1085                 } _m;                                                   \
1086           _m._value = (arg);                                            \
1087           (_m._word[LDBL_SIGNBIT_WORD] >> LDBL_SIGNBIT_BIT) & 1;        \
1088         })
1089 #   endif
1090 #  endif
1091 #  define signbit(x) \
1092    (sizeof (x) == sizeof (long double) ? gl_signbitl (x) : \
1093     sizeof (x) == sizeof (double) ? gl_signbitd (x) : \
1094     gl_signbitf (x))
1095 # endif
1096 #elif defined GNULIB_POSIXCHECK
1097 # if defined signbit
1098 _GL_WARN_REAL_FLOATING_DECL (signbit);
1099 #  undef signbit
1100 #  define signbit(x) _GL_WARN_REAL_FLOATING_IMPL (signbit, x)
1101 # endif
1102 #endif
1103
1104
1105 #endif /* _@GUARD_PREFIX@_MATH_H */
1106 #endif /* _@GUARD_PREFIX@_MATH_H */