d9db7c37f70ec8dcc42bba771a734de6b353ae67
[gnulib.git] / lib / math.in.h
1 /* A GNU-like <math.h>.
2
3    Copyright (C) 2002-2003, 2007-2012 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 #ifdef __cplusplus
39 /* Helper macros to define type-generic function FUNC as overloaded functions,
40    rather than as macros like in C.  POSIX declares these with an argument of
41    real-floating (that is, one of float, double, or long double).  */
42 # define _GL_MATH_CXX_REAL_FLOATING_DECL_1(func) \
43 static inline int                                                   \
44 _gl_cxx_ ## func ## f (float f)                                     \
45 {                                                                   \
46   return func (f);                                                  \
47 }                                                                   \
48 static inline int                                                   \
49 _gl_cxx_ ## func ## d (double d)                                    \
50 {                                                                   \
51   return func (d);                                                  \
52 }                                                                   \
53 static inline int                                                   \
54 _gl_cxx_ ## func ## l (long double l)                               \
55 {                                                                   \
56   return func (l);                                                  \
57 }
58 # define _GL_MATH_CXX_REAL_FLOATING_DECL_2(func) \
59 inline int                                                          \
60 func (float f)                                                      \
61 {                                                                   \
62   return _gl_cxx_ ## func ## f (f);                                 \
63 }                                                                   \
64 inline int                                                          \
65 func (double d)                                                     \
66 {                                                                   \
67   return _gl_cxx_ ## func ## d (d);                                 \
68 }                                                                   \
69 inline int                                                          \
70 func (long double l)                                                \
71 {                                                                   \
72   return _gl_cxx_ ## func ## l (l);                                 \
73 }
74 #endif
75
76 /* Helper macros to define a portability warning for the
77    classification macro FUNC called with VALUE.  POSIX declares the
78    classification macros with an argument of real-floating (that is,
79    one of float, double, or long double).  */
80 #define _GL_WARN_REAL_FLOATING_DECL(func) \
81 static inline int                                                   \
82 rpl_ ## func ## f (float f)                                         \
83 {                                                                   \
84   return func (f);                                                  \
85 }                                                                   \
86 static inline int                                                   \
87 rpl_ ## func ## d (double d)                                        \
88 {                                                                   \
89   return func (d);                                                  \
90 }                                                                   \
91 static inline int                                                   \
92 rpl_ ## func ## l (long double l)                                   \
93 {                                                                   \
94   return func (l);                                                  \
95 }                                                                   \
96 _GL_WARN_ON_USE (rpl_ ## func ## f, #func " is unportable - "       \
97                  "use gnulib module " #func " for portability");    \
98 _GL_WARN_ON_USE (rpl_ ## func ## d, #func " is unportable - "       \
99                  "use gnulib module " #func " for portability");    \
100 _GL_WARN_ON_USE (rpl_ ## func ## l, #func " is unportable - "       \
101                  "use gnulib module " #func " for portability")
102 #define _GL_WARN_REAL_FLOATING_IMPL(func, value) \
103   (sizeof (value) == sizeof (float) ? rpl_ ## func ## f (value)     \
104    : sizeof (value) == sizeof (double) ? rpl_ ## func ## d (value)  \
105    : rpl_ ## func ## l (value))
106
107
108 #if @REPLACE_ITOLD@
109 /* Pull in a function that fixes the 'int' to 'long double' conversion
110    of glibc 2.7.  */
111 _GL_EXTERN_C void _Qp_itoq (long double *, int);
112 static void (*_gl_math_fix_itold) (long double *, int) = _Qp_itoq;
113 #endif
114
115
116 /* POSIX allows platforms that don't support NAN.  But all major
117    machines in the past 15 years have supported something close to
118    IEEE NaN, so we define this unconditionally.  We also must define
119    it on platforms like Solaris 10, where NAN is present but defined
120    as a function pointer rather than a floating point constant.  */
121 #if !defined NAN || @REPLACE_NAN@
122 # if !GNULIB_defined_NAN
123 #  undef NAN
124   /* The Compaq (ex-DEC) C 6.4 compiler and the Microsoft MSVC 9 compiler
125      choke on the expression 0.0 / 0.0.  */
126 #  if defined __DECC || defined _MSC_VER
127 static float
128 _NaN ()
129 {
130   static float zero = 0.0f;
131   return zero / zero;
132 }
133 #   define NAN (_NaN())
134 #  else
135 #   define NAN (0.0f / 0.0f)
136 #  endif
137 #  define GNULIB_defined_NAN 1
138 # endif
139 #endif
140
141 /* Solaris 10 defines HUGE_VAL, but as a function pointer rather
142    than a floating point constant.  */
143 #if @REPLACE_HUGE_VAL@
144 # undef HUGE_VAL
145 # define HUGE_VAL (1.0 / 0.0)
146 #endif
147
148
149 #if @GNULIB_ACOSF@
150 # if !@HAVE_ACOSF@
151 #  undef acosf
152 _GL_FUNCDECL_SYS (acosf, float, (float x));
153 # endif
154 _GL_CXXALIAS_SYS (acosf, float, (float x));
155 _GL_CXXALIASWARN (acosf);
156 #elif defined GNULIB_POSIXCHECK
157 # undef acosf
158 # if HAVE_RAW_DECL_ACOSF
159 _GL_WARN_ON_USE (acosf, "acosf is unportable - "
160                  "use gnulib module acosf for portability");
161 # endif
162 #endif
163
164 #if @GNULIB_ACOSL@
165 # if !@HAVE_ACOSL@ || !@HAVE_DECL_ACOSL@
166 _GL_FUNCDECL_SYS (acosl, long double, (long double x));
167 # endif
168 _GL_CXXALIAS_SYS (acosl, long double, (long double x));
169 _GL_CXXALIASWARN (acosl);
170 #elif defined GNULIB_POSIXCHECK
171 # undef acosl
172 # if HAVE_RAW_DECL_ACOSL
173 _GL_WARN_ON_USE (acosl, "acosl is unportable - "
174                  "use gnulib module mathl for portability");
175 # endif
176 #endif
177
178
179 #if @GNULIB_ASINF@
180 # if !@HAVE_ASINF@
181 #  undef asinf
182 _GL_FUNCDECL_SYS (asinf, float, (float x));
183 # endif
184 _GL_CXXALIAS_SYS (asinf, float, (float x));
185 _GL_CXXALIASWARN (asinf);
186 #elif defined GNULIB_POSIXCHECK
187 # undef asinf
188 # if HAVE_RAW_DECL_ASINF
189 _GL_WARN_ON_USE (asinf, "asinf is unportable - "
190                  "use gnulib module asinf for portability");
191 # endif
192 #endif
193
194 #if @GNULIB_ASINL@
195 # if !@HAVE_ASINL@ || !@HAVE_DECL_ASINL@
196 _GL_FUNCDECL_SYS (asinl, long double, (long double x));
197 # endif
198 _GL_CXXALIAS_SYS (asinl, long double, (long double x));
199 _GL_CXXALIASWARN (asinl);
200 #elif defined GNULIB_POSIXCHECK
201 # undef asinl
202 # if HAVE_RAW_DECL_ASINL
203 _GL_WARN_ON_USE (asinl, "asinl is unportable - "
204                  "use gnulib module mathl for portability");
205 # endif
206 #endif
207
208
209 #if @GNULIB_ATANF@
210 # if !@HAVE_ATANF@
211 #  undef atanf
212 _GL_FUNCDECL_SYS (atanf, float, (float x));
213 # endif
214 _GL_CXXALIAS_SYS (atanf, float, (float x));
215 _GL_CXXALIASWARN (atanf);
216 #elif defined GNULIB_POSIXCHECK
217 # undef atanf
218 # if HAVE_RAW_DECL_ATANF
219 _GL_WARN_ON_USE (atanf, "atanf is unportable - "
220                  "use gnulib module atanf for portability");
221 # endif
222 #endif
223
224 #if @GNULIB_ATANL@
225 # if !@HAVE_ATANL@ || !@HAVE_DECL_ATANL@
226 _GL_FUNCDECL_SYS (atanl, long double, (long double x));
227 # endif
228 _GL_CXXALIAS_SYS (atanl, long double, (long double x));
229 _GL_CXXALIASWARN (atanl);
230 #elif defined GNULIB_POSIXCHECK
231 # undef atanl
232 # if HAVE_RAW_DECL_ATANL
233 _GL_WARN_ON_USE (atanl, "atanl is unportable - "
234                  "use gnulib module mathl for portability");
235 # endif
236 #endif
237
238
239 #if @GNULIB_ATAN2F@
240 # if !@HAVE_ATAN2F@
241 #  undef atan2f
242 _GL_FUNCDECL_SYS (atan2f, float, (float y, float x));
243 # endif
244 _GL_CXXALIAS_SYS (atan2f, float, (float y, float x));
245 _GL_CXXALIASWARN (atan2f);
246 #elif defined GNULIB_POSIXCHECK
247 # undef atan2f
248 # if HAVE_RAW_DECL_ATAN2F
249 _GL_WARN_ON_USE (atan2f, "atan2f is unportable - "
250                  "use gnulib module atan2f for portability");
251 # endif
252 #endif
253
254
255 #if @GNULIB_CEILF@
256 # if @REPLACE_CEILF@
257 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
258 #   undef ceilf
259 #   define ceilf rpl_ceilf
260 #  endif
261 _GL_FUNCDECL_RPL (ceilf, float, (float x));
262 _GL_CXXALIAS_RPL (ceilf, float, (float x));
263 # else
264 #  if !@HAVE_DECL_CEILF@
265 #   undef ceilf
266 _GL_FUNCDECL_SYS (ceilf, float, (float x));
267 #  endif
268 _GL_CXXALIAS_SYS (ceilf, float, (float x));
269 # endif
270 _GL_CXXALIASWARN (ceilf);
271 #elif defined GNULIB_POSIXCHECK
272 # undef ceilf
273 # if HAVE_RAW_DECL_CEILF
274 _GL_WARN_ON_USE (ceilf, "ceilf is unportable - "
275                  "use gnulib module ceilf for portability");
276 # endif
277 #endif
278
279 #if @GNULIB_CEIL@
280 # if @REPLACE_CEIL@
281 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
282 #   define ceil rpl_ceil
283 #  endif
284 _GL_FUNCDECL_RPL (ceil, double, (double x));
285 _GL_CXXALIAS_RPL (ceil, double, (double x));
286 # else
287 _GL_CXXALIAS_SYS (ceil, double, (double x));
288 # endif
289 _GL_CXXALIASWARN (ceil);
290 #endif
291
292 #if @GNULIB_CEILL@
293 # if @REPLACE_CEILL@
294 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
295 #   undef ceill
296 #   define ceill rpl_ceill
297 #  endif
298 _GL_FUNCDECL_RPL (ceill, long double, (long double x));
299 _GL_CXXALIAS_RPL (ceill, long double, (long double x));
300 # else
301 #  if !@HAVE_DECL_CEILL@
302 _GL_FUNCDECL_SYS (ceill, long double, (long double x));
303 #  endif
304 _GL_CXXALIAS_SYS (ceill, long double, (long double x));
305 # endif
306 _GL_CXXALIASWARN (ceill);
307 #elif defined GNULIB_POSIXCHECK
308 # undef ceill
309 # if HAVE_RAW_DECL_CEILL
310 _GL_WARN_ON_USE (ceill, "ceill is unportable - "
311                  "use gnulib module ceill for portability");
312 # endif
313 #endif
314
315
316 #if @GNULIB_COPYSIGNF@
317 # if !@HAVE_COPYSIGNF@
318 _GL_FUNCDECL_SYS (copysignf, float, (float x, float y));
319 # endif
320 _GL_CXXALIAS_SYS (copysignf, float, (float x, float y));
321 _GL_CXXALIASWARN (copysignf);
322 #elif defined GNULIB_POSIXCHECK
323 # undef copysignf
324 # if HAVE_RAW_DECL_COPYSIGNF
325 _GL_WARN_ON_USE (copysignf, "copysignf is unportable - "
326                  "use gnulib module copysignf for portability");
327 # endif
328 #endif
329
330 #if @GNULIB_COPYSIGN@
331 # if !@HAVE_COPYSIGN@
332 _GL_FUNCDECL_SYS (copysign, double, (double x, double y));
333 # endif
334 _GL_CXXALIAS_SYS (copysign, double, (double x, double y));
335 _GL_CXXALIASWARN (copysign);
336 #elif defined GNULIB_POSIXCHECK
337 # undef copysign
338 # if HAVE_RAW_DECL_COPYSIGN
339 _GL_WARN_ON_USE (copysign, "copysign is unportable - "
340                  "use gnulib module copysign for portability");
341 # endif
342 #endif
343
344 #if @GNULIB_COPYSIGNL@
345 # if !@HAVE_COPYSIGNL@
346 _GL_FUNCDECL_SYS (copysignl, long double, (long double x, long double y));
347 # endif
348 _GL_CXXALIAS_SYS (copysignl, long double, (long double x, long double y));
349 _GL_CXXALIASWARN (copysignl);
350 #elif defined GNULIB_POSIXCHECK
351 # undef copysignl
352 # if HAVE_RAW_DECL_COPYSIGNL
353 _GL_WARN_ON_USE (copysign, "copysignl is unportable - "
354                  "use gnulib module copysignl for portability");
355 # endif
356 #endif
357
358
359 #if @GNULIB_COSF@
360 # if !@HAVE_COSF@
361 #  undef cosf
362 _GL_FUNCDECL_SYS (cosf, float, (float x));
363 # endif
364 _GL_CXXALIAS_SYS (cosf, float, (float x));
365 _GL_CXXALIASWARN (cosf);
366 #elif defined GNULIB_POSIXCHECK
367 # undef cosf
368 # if HAVE_RAW_DECL_COSF
369 _GL_WARN_ON_USE (cosf, "cosf is unportable - "
370                  "use gnulib module cosf for portability");
371 # endif
372 #endif
373
374 #if @GNULIB_COSL@
375 # if !@HAVE_COSL@ || !@HAVE_DECL_COSL@
376 _GL_FUNCDECL_SYS (cosl, long double, (long double x));
377 # endif
378 _GL_CXXALIAS_SYS (cosl, long double, (long double x));
379 _GL_CXXALIASWARN (cosl);
380 #elif defined GNULIB_POSIXCHECK
381 # undef cosl
382 # if HAVE_RAW_DECL_COSL
383 _GL_WARN_ON_USE (cosl, "cosl is unportable - "
384                  "use gnulib module mathl for portability");
385 # endif
386 #endif
387
388
389 #if @GNULIB_COSHF@
390 # if !@HAVE_COSHF@
391 #  undef coshf
392 _GL_FUNCDECL_SYS (coshf, float, (float x));
393 # endif
394 _GL_CXXALIAS_SYS (coshf, float, (float x));
395 _GL_CXXALIASWARN (coshf);
396 #elif defined GNULIB_POSIXCHECK
397 # undef coshf
398 # if HAVE_RAW_DECL_COSHF
399 _GL_WARN_ON_USE (coshf, "coshf is unportable - "
400                  "use gnulib module coshf for portability");
401 # endif
402 #endif
403
404
405 #if @GNULIB_EXPF@
406 # if !@HAVE_EXPF@
407 #  undef expf
408 _GL_FUNCDECL_SYS (expf, float, (float x));
409 # endif
410 _GL_CXXALIAS_SYS (expf, float, (float x));
411 _GL_CXXALIASWARN (expf);
412 #elif defined GNULIB_POSIXCHECK
413 # undef expf
414 # if HAVE_RAW_DECL_EXPF
415 _GL_WARN_ON_USE (expf, "expf is unportable - "
416                  "use gnulib module expf for portability");
417 # endif
418 #endif
419
420 #if @GNULIB_EXPL@
421 # if !@HAVE_EXPL@ || !@HAVE_DECL_EXPL@
422 _GL_FUNCDECL_SYS (expl, long double, (long double x));
423 # endif
424 _GL_CXXALIAS_SYS (expl, long double, (long double x));
425 _GL_CXXALIASWARN (expl);
426 #elif defined GNULIB_POSIXCHECK
427 # undef expl
428 # if HAVE_RAW_DECL_EXPL
429 _GL_WARN_ON_USE (expl, "expl is unportable - "
430                  "use gnulib module mathl for portability");
431 # endif
432 #endif
433
434
435 #if @GNULIB_FABSF@
436 # if !@HAVE_FABSF@
437 #  undef fabsf
438 _GL_FUNCDECL_SYS (fabsf, float, (float x));
439 # endif
440 _GL_CXXALIAS_SYS (fabsf, float, (float x));
441 _GL_CXXALIASWARN (fabsf);
442 #elif defined GNULIB_POSIXCHECK
443 # undef fabsf
444 # if HAVE_RAW_DECL_FABSF
445 _GL_WARN_ON_USE (fabsf, "fabsf is unportable - "
446                  "use gnulib module fabsf for portability");
447 # endif
448 #endif
449
450
451 #if @GNULIB_FLOORF@
452 # if @REPLACE_FLOORF@
453 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
454 #   undef floorf
455 #   define floorf rpl_floorf
456 #  endif
457 _GL_FUNCDECL_RPL (floorf, float, (float x));
458 _GL_CXXALIAS_RPL (floorf, float, (float x));
459 # else
460 #  if !@HAVE_DECL_FLOORF@
461 #   undef floorf
462 _GL_FUNCDECL_SYS (floorf, float, (float x));
463 #  endif
464 _GL_CXXALIAS_SYS (floorf, float, (float x));
465 # endif
466 _GL_CXXALIASWARN (floorf);
467 #elif defined GNULIB_POSIXCHECK
468 # undef floorf
469 # if HAVE_RAW_DECL_FLOORF
470 _GL_WARN_ON_USE (floorf, "floorf is unportable - "
471                  "use gnulib module floorf for portability");
472 # endif
473 #endif
474
475 #if @GNULIB_FLOOR@
476 # if @REPLACE_FLOOR@
477 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
478 #   define floor rpl_floor
479 #  endif
480 _GL_FUNCDECL_RPL (floor, double, (double x));
481 _GL_CXXALIAS_RPL (floor, double, (double x));
482 # else
483 _GL_CXXALIAS_SYS (floor, double, (double x));
484 # endif
485 _GL_CXXALIASWARN (floor);
486 #endif
487
488 #if @GNULIB_FLOORL@
489 # if @REPLACE_FLOORL@
490 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
491 #   undef floorl
492 #   define floorl rpl_floorl
493 #  endif
494 _GL_FUNCDECL_RPL (floorl, long double, (long double x));
495 _GL_CXXALIAS_RPL (floorl, long double, (long double x));
496 # else
497 #  if !@HAVE_DECL_FLOORL@
498 #   undef floorl
499 _GL_FUNCDECL_SYS (floorl, long double, (long double x));
500 #  endif
501 _GL_CXXALIAS_SYS (floorl, long double, (long double x));
502 # endif
503 _GL_CXXALIASWARN (floorl);
504 #elif defined GNULIB_POSIXCHECK
505 # undef floorl
506 # if HAVE_RAW_DECL_FLOORL
507 _GL_WARN_ON_USE (floorl, "floorl is unportable - "
508                  "use gnulib module floorl for portability");
509 # endif
510 #endif
511
512
513 #if @GNULIB_FMAF@
514 # if @REPLACE_FMAF@
515 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
516 #   undef fmaf
517 #   define fmaf rpl_fmaf
518 #  endif
519 _GL_FUNCDECL_RPL (fmaf, float, (float x, float y, float z));
520 _GL_CXXALIAS_RPL (fmaf, float, (float x, float y, float z));
521 # else
522 #  if !@HAVE_FMAF@
523 _GL_FUNCDECL_SYS (fmaf, float, (float x, float y, float z));
524 #  endif
525 _GL_CXXALIAS_SYS (fmaf, float, (float x, float y, float z));
526 # endif
527 _GL_CXXALIASWARN (fmaf);
528 #elif defined GNULIB_POSIXCHECK
529 # undef fmaf
530 # if HAVE_RAW_DECL_FMAF
531 _GL_WARN_ON_USE (fmaf, "fmaf is unportable - "
532                  "use gnulib module fmaf for portability");
533 # endif
534 #endif
535
536 #if @GNULIB_FMA@
537 # if @REPLACE_FMA@
538 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
539 #   undef fma
540 #   define fma rpl_fma
541 #  endif
542 _GL_FUNCDECL_RPL (fma, double, (double x, double y, double z));
543 _GL_CXXALIAS_RPL (fma, double, (double x, double y, double z));
544 # else
545 #  if !@HAVE_FMA@
546 _GL_FUNCDECL_SYS (fma, double, (double x, double y, double z));
547 #  endif
548 _GL_CXXALIAS_SYS (fma, double, (double x, double y, double z));
549 # endif
550 _GL_CXXALIASWARN (fma);
551 #elif defined GNULIB_POSIXCHECK
552 # undef fma
553 # if HAVE_RAW_DECL_FMA
554 _GL_WARN_ON_USE (fma, "fma is unportable - "
555                  "use gnulib module fma for portability");
556 # endif
557 #endif
558
559 #if @GNULIB_FMAL@
560 # if @REPLACE_FMAL@
561 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
562 #   undef fmal
563 #   define fmal rpl_fmal
564 #  endif
565 _GL_FUNCDECL_RPL (fmal, long double,
566                   (long double x, long double y, long double z));
567 _GL_CXXALIAS_RPL (fmal, long double,
568                   (long double x, long double y, long double z));
569 # else
570 #  if !@HAVE_FMAL@
571 _GL_FUNCDECL_SYS (fmal, long double,
572                   (long double x, long double y, long double z));
573 #  endif
574 _GL_CXXALIAS_SYS (fmal, long double,
575                   (long double x, long double y, long double z));
576 # endif
577 _GL_CXXALIASWARN (fmal);
578 #elif defined GNULIB_POSIXCHECK
579 # undef fmal
580 # if HAVE_RAW_DECL_FMAL
581 _GL_WARN_ON_USE (fmal, "fmal is unportable - "
582                  "use gnulib module fmal for portability");
583 # endif
584 #endif
585
586
587 #if @GNULIB_FMODF@
588 # if !@HAVE_FMODF@
589 #  undef fmodf
590 _GL_FUNCDECL_SYS (fmodf, float, (float x, float y));
591 # endif
592 _GL_CXXALIAS_SYS (fmodf, float, (float x, float y));
593 _GL_CXXALIASWARN (fmodf);
594 #elif defined GNULIB_POSIXCHECK
595 # undef fmodf
596 # if HAVE_RAW_DECL_FMODF
597 _GL_WARN_ON_USE (fmodf, "fmodf is unportable - "
598                  "use gnulib module fmodf for portability");
599 # endif
600 #endif
601
602
603 /* Write x as
604      x = mantissa * 2^exp
605    where
606      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
607      If x is zero: mantissa = x, exp = 0.
608      If x is infinite or NaN: mantissa = x, exp unspecified.
609    Store exp in *EXPPTR and return mantissa.  */
610 #if @GNULIB_FREXPF@
611 # if @REPLACE_FREXPF@
612 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
613 #   undef frexpf
614 #   define frexpf rpl_frexpf
615 #  endif
616 _GL_FUNCDECL_RPL (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
617 _GL_CXXALIAS_RPL (frexpf, float, (float x, int *expptr));
618 # else
619 #  if !@HAVE_FREXPF@
620 #   undef frexpf
621 _GL_FUNCDECL_SYS (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
622 #  endif
623 _GL_CXXALIAS_SYS (frexpf, float, (float x, int *expptr));
624 # endif
625 _GL_CXXALIASWARN (frexpf);
626 #elif defined GNULIB_POSIXCHECK
627 # undef frexpf
628 # if HAVE_RAW_DECL_FREXPF
629 _GL_WARN_ON_USE (frexpf, "frexpf is unportable - "
630                  "use gnulib module frexpf for portability");
631 # endif
632 #endif
633
634 /* Write x as
635      x = mantissa * 2^exp
636    where
637      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
638      If x is zero: mantissa = x, exp = 0.
639      If x is infinite or NaN: mantissa = x, exp unspecified.
640    Store exp in *EXPPTR and return mantissa.  */
641 #if @GNULIB_FREXP@
642 # if @REPLACE_FREXP@
643 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
644 #   define frexp rpl_frexp
645 #  endif
646 _GL_FUNCDECL_RPL (frexp, double, (double x, int *expptr) _GL_ARG_NONNULL ((2)));
647 _GL_CXXALIAS_RPL (frexp, double, (double x, int *expptr));
648 # else
649 _GL_CXXALIAS_SYS (frexp, double, (double x, int *expptr));
650 # endif
651 _GL_CXXALIASWARN (frexp);
652 #elif defined GNULIB_POSIXCHECK
653 # undef frexp
654 /* Assume frexp is always declared.  */
655 _GL_WARN_ON_USE (frexp, "frexp is unportable - "
656                  "use gnulib module frexp for portability");
657 #endif
658
659 /* Write x as
660      x = mantissa * 2^exp
661    where
662      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
663      If x is zero: mantissa = x, exp = 0.
664      If x is infinite or NaN: mantissa = x, exp unspecified.
665    Store exp in *EXPPTR and return mantissa.  */
666 #if @GNULIB_FREXPL@ && @REPLACE_FREXPL@
667 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
668 #  undef frexpl
669 #  define frexpl rpl_frexpl
670 # endif
671 _GL_FUNCDECL_RPL (frexpl, long double,
672                   (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
673 _GL_CXXALIAS_RPL (frexpl, long double, (long double x, int *expptr));
674 #else
675 # if !@HAVE_DECL_FREXPL@
676 _GL_FUNCDECL_SYS (frexpl, long double,
677                   (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
678 # endif
679 # if @GNULIB_FREXPL@
680 _GL_CXXALIAS_SYS (frexpl, long double, (long double x, int *expptr));
681 # endif
682 #endif
683 #if @GNULIB_FREXPL@ && !(@REPLACE_FREXPL@ && !@HAVE_DECL_FREXPL@)
684 _GL_CXXALIASWARN (frexpl);
685 #endif
686 #if !@GNULIB_FREXPL@ && defined GNULIB_POSIXCHECK
687 # undef frexpl
688 # if HAVE_RAW_DECL_FREXPL
689 _GL_WARN_ON_USE (frexpl, "frexpl is unportable - "
690                  "use gnulib module frexpl for portability");
691 # endif
692 #endif
693
694
695 /* Return x * 2^exp.  */
696 #if @GNULIB_LDEXPF@
697 # if !@HAVE_LDEXPF@
698 #  undef ldexpf
699 _GL_FUNCDECL_SYS (ldexpf, float, (float x, int exp));
700 # endif
701 _GL_CXXALIAS_SYS (ldexpf, float, (float x, int exp));
702 _GL_CXXALIASWARN (ldexpf);
703 #elif defined GNULIB_POSIXCHECK
704 # undef ldexpf
705 # if HAVE_RAW_DECL_LDEXPF
706 _GL_WARN_ON_USE (ldexpf, "ldexpf is unportable - "
707                  "use gnulib module ldexpf for portability");
708 # endif
709 #endif
710
711 /* Return x * 2^exp.  */
712 #if @GNULIB_LDEXPL@ && @REPLACE_LDEXPL@
713 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
714 #  undef ldexpl
715 #  define ldexpl rpl_ldexpl
716 # endif
717 _GL_FUNCDECL_RPL (ldexpl, long double, (long double x, int exp));
718 _GL_CXXALIAS_RPL (ldexpl, long double, (long double x, int exp));
719 #else
720 # if !@HAVE_DECL_LDEXPL@
721 _GL_FUNCDECL_SYS (ldexpl, long double, (long double x, int exp));
722 # endif
723 # if @GNULIB_LDEXPL@
724 _GL_CXXALIAS_SYS (ldexpl, long double, (long double x, int exp));
725 # endif
726 #endif
727 #if @GNULIB_LDEXPL@
728 _GL_CXXALIASWARN (ldexpl);
729 #endif
730 #if !@GNULIB_LDEXPL@ && defined GNULIB_POSIXCHECK
731 # undef ldexpl
732 # if HAVE_RAW_DECL_LDEXPL
733 _GL_WARN_ON_USE (ldexpl, "ldexpl is unportable - "
734                  "use gnulib module ldexpl for portability");
735 # endif
736 #endif
737
738
739 #if @GNULIB_LOGB@
740 # if !@HAVE_DECL_LOGB@
741 _GL_EXTERN_C double logb (double x);
742 # endif
743 #elif defined GNULIB_POSIXCHECK
744 # undef logb
745 # if HAVE_RAW_DECL_LOGB
746 _GL_WARN_ON_USE (logb, "logb is unportable - "
747                  "use gnulib module logb for portability");
748 # endif
749 #endif
750
751
752 #if @GNULIB_LOGF@
753 # if !@HAVE_LOGF@
754 #  undef logf
755 _GL_FUNCDECL_SYS (logf, float, (float x));
756 # endif
757 _GL_CXXALIAS_SYS (logf, float, (float x));
758 _GL_CXXALIASWARN (logf);
759 #elif defined GNULIB_POSIXCHECK
760 # undef logf
761 # if HAVE_RAW_DECL_LOGF
762 _GL_WARN_ON_USE (logf, "logf is unportable - "
763                  "use gnulib module logf for portability");
764 # endif
765 #endif
766
767 #if @GNULIB_LOGL@
768 # if !@HAVE_LOGL@ || !@HAVE_DECL_LOGL@
769 _GL_FUNCDECL_SYS (logl, long double, (long double x));
770 # endif
771 _GL_CXXALIAS_SYS (logl, long double, (long double x));
772 _GL_CXXALIASWARN (logl);
773 #elif defined GNULIB_POSIXCHECK
774 # undef logl
775 # if HAVE_RAW_DECL_LOGL
776 _GL_WARN_ON_USE (logl, "logl is unportable - "
777                  "use gnulib module mathl for portability");
778 # endif
779 #endif
780
781
782 #if @GNULIB_LOG10F@
783 # if !@HAVE_LOG10F@
784 #  undef log10f
785 _GL_FUNCDECL_SYS (log10f, float, (float x));
786 # endif
787 _GL_CXXALIAS_SYS (log10f, float, (float x));
788 _GL_CXXALIASWARN (log10f);
789 #elif defined GNULIB_POSIXCHECK
790 # undef log10f
791 # if HAVE_RAW_DECL_LOG10F
792 _GL_WARN_ON_USE (log10f, "log10f is unportable - "
793                  "use gnulib module log10f for portability");
794 # endif
795 #endif
796
797
798 #if @GNULIB_MODFF@
799 # if !@HAVE_MODFF@
800 #  undef modff
801 _GL_FUNCDECL_SYS (modff, float, (float x, float *iptr) _GL_ARG_NONNULL ((2)));
802 # endif
803 _GL_CXXALIAS_SYS (modff, float, (float x, float *iptr));
804 _GL_CXXALIASWARN (modff);
805 #elif defined GNULIB_POSIXCHECK
806 # undef modff
807 # if HAVE_RAW_DECL_MODFF
808 _GL_WARN_ON_USE (modff, "modff is unportable - "
809                  "use gnulib module modff for portability");
810 # endif
811 #endif
812
813
814 #if @GNULIB_POWF@
815 # if !@HAVE_POWF@
816 #  undef powf
817 _GL_FUNCDECL_SYS (powf, float, (float x, float y));
818 # endif
819 _GL_CXXALIAS_SYS (powf, float, (float x, float y));
820 _GL_CXXALIASWARN (powf);
821 #elif defined GNULIB_POSIXCHECK
822 # undef powf
823 # if HAVE_RAW_DECL_POWF
824 _GL_WARN_ON_USE (powf, "powf is unportable - "
825                  "use gnulib module powf for portability");
826 # endif
827 #endif
828
829
830 #if @GNULIB_RINTF@
831 # if !@HAVE_RINTF@
832 _GL_FUNCDECL_SYS (rintf, float, (float x));
833 # endif
834 _GL_CXXALIAS_SYS (rintf, float, (float x));
835 _GL_CXXALIASWARN (rintf);
836 #elif defined GNULIB_POSIXCHECK
837 # undef rintf
838 # if HAVE_RAW_DECL_RINTF
839 _GL_WARN_ON_USE (rintf, "rintf is unportable - "
840                  "use gnulib module rintf for portability");
841 # endif
842 #endif
843
844 #if @GNULIB_RINT@
845 # if !@HAVE_RINT@
846 _GL_FUNCDECL_SYS (rint, double, (double x));
847 # endif
848 _GL_CXXALIAS_SYS (rint, double, (double x));
849 _GL_CXXALIASWARN (rint);
850 #elif defined GNULIB_POSIXCHECK
851 # undef rint
852 # if HAVE_RAW_DECL_RINT
853 _GL_WARN_ON_USE (rint, "rint is unportable - "
854                  "use gnulib module rint for portability");
855 # endif
856 #endif
857
858 #if @GNULIB_RINTL@
859 # if !@HAVE_RINTL@
860 _GL_FUNCDECL_SYS (rintl, long double, (long double x));
861 # endif
862 _GL_CXXALIAS_SYS (rintl, long double, (long double x));
863 _GL_CXXALIASWARN (rintl);
864 #elif defined GNULIB_POSIXCHECK
865 # undef rintl
866 # if HAVE_RAW_DECL_RINTL
867 _GL_WARN_ON_USE (rintl, "rintl is unportable - "
868                  "use gnulib module rintl for portability");
869 # endif
870 #endif
871
872
873 #if @GNULIB_ROUNDF@
874 # if @REPLACE_ROUNDF@
875 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
876 #   undef roundf
877 #   define roundf rpl_roundf
878 #  endif
879 _GL_FUNCDECL_RPL (roundf, float, (float x));
880 _GL_CXXALIAS_RPL (roundf, float, (float x));
881 # else
882 #  if !@HAVE_DECL_ROUNDF@
883 _GL_FUNCDECL_SYS (roundf, float, (float x));
884 #  endif
885 _GL_CXXALIAS_SYS (roundf, float, (float x));
886 # endif
887 _GL_CXXALIASWARN (roundf);
888 #elif defined GNULIB_POSIXCHECK
889 # undef roundf
890 # if HAVE_RAW_DECL_ROUNDF
891 _GL_WARN_ON_USE (roundf, "roundf is unportable - "
892                  "use gnulib module roundf for portability");
893 # endif
894 #endif
895
896 #if @GNULIB_ROUND@
897 # if @REPLACE_ROUND@
898 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
899 #   undef round
900 #   define round rpl_round
901 #  endif
902 _GL_FUNCDECL_RPL (round, double, (double x));
903 _GL_CXXALIAS_RPL (round, double, (double x));
904 # else
905 #  if !@HAVE_DECL_ROUND@
906 _GL_FUNCDECL_SYS (round, double, (double x));
907 #  endif
908 _GL_CXXALIAS_SYS (round, double, (double x));
909 # endif
910 _GL_CXXALIASWARN (round);
911 #elif defined GNULIB_POSIXCHECK
912 # undef round
913 # if HAVE_RAW_DECL_ROUND
914 _GL_WARN_ON_USE (round, "round is unportable - "
915                  "use gnulib module round for portability");
916 # endif
917 #endif
918
919 #if @GNULIB_ROUNDL@
920 # if @REPLACE_ROUNDL@
921 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
922 #   undef roundl
923 #   define roundl rpl_roundl
924 #  endif
925 _GL_FUNCDECL_RPL (roundl, long double, (long double x));
926 _GL_CXXALIAS_RPL (roundl, long double, (long double x));
927 # else
928 #  if !@HAVE_DECL_ROUNDL@
929 _GL_FUNCDECL_SYS (roundl, long double, (long double x));
930 #  endif
931 _GL_CXXALIAS_SYS (roundl, long double, (long double x));
932 # endif
933 _GL_CXXALIASWARN (roundl);
934 #elif defined GNULIB_POSIXCHECK
935 # undef roundl
936 # if HAVE_RAW_DECL_ROUNDL
937 _GL_WARN_ON_USE (roundl, "roundl is unportable - "
938                  "use gnulib module roundl for portability");
939 # endif
940 #endif
941
942
943 #if @GNULIB_SINF@
944 # if !@HAVE_SINF@
945 #  undef sinf
946 _GL_FUNCDECL_SYS (sinf, float, (float x));
947 # endif
948 _GL_CXXALIAS_SYS (sinf, float, (float x));
949 _GL_CXXALIASWARN (sinf);
950 #elif defined GNULIB_POSIXCHECK
951 # undef sinf
952 # if HAVE_RAW_DECL_SINF
953 _GL_WARN_ON_USE (sinf, "sinf is unportable - "
954                  "use gnulib module sinf for portability");
955 # endif
956 #endif
957
958 #if @GNULIB_SINL@
959 # if !@HAVE_SINL@ || !@HAVE_DECL_SINL@
960 _GL_FUNCDECL_SYS (sinl, long double, (long double x));
961 # endif
962 _GL_CXXALIAS_SYS (sinl, long double, (long double x));
963 _GL_CXXALIASWARN (sinl);
964 #elif defined GNULIB_POSIXCHECK
965 # undef sinl
966 # if HAVE_RAW_DECL_SINL
967 _GL_WARN_ON_USE (sinl, "sinl is unportable - "
968                  "use gnulib module mathl for portability");
969 # endif
970 #endif
971
972
973 #if @GNULIB_SINHF@
974 # if !@HAVE_SINHF@
975 #  undef sinhf
976 _GL_FUNCDECL_SYS (sinhf, float, (float x));
977 # endif
978 _GL_CXXALIAS_SYS (sinhf, float, (float x));
979 _GL_CXXALIASWARN (sinhf);
980 #elif defined GNULIB_POSIXCHECK
981 # undef sinhf
982 # if HAVE_RAW_DECL_SINHF
983 _GL_WARN_ON_USE (sinhf, "sinhf is unportable - "
984                  "use gnulib module sinhf for portability");
985 # endif
986 #endif
987
988
989 #if @GNULIB_SQRTF@
990 # if !@HAVE_SQRTF@
991 #  undef sqrtf
992 _GL_FUNCDECL_SYS (sqrtf, float, (float x));
993 # endif
994 _GL_CXXALIAS_SYS (sqrtf, float, (float x));
995 _GL_CXXALIASWARN (sqrtf);
996 #elif defined GNULIB_POSIXCHECK
997 # undef sqrtf
998 # if HAVE_RAW_DECL_SQRTF
999 _GL_WARN_ON_USE (sqrtf, "sqrtf is unportable - "
1000                  "use gnulib module sqrtf for portability");
1001 # endif
1002 #endif
1003
1004 #if @GNULIB_SQRTL@
1005 # if !@HAVE_SQRTL@ || !@HAVE_DECL_SQRTL@
1006 _GL_FUNCDECL_SYS (sqrtl, long double, (long double x));
1007 # endif
1008 _GL_CXXALIAS_SYS (sqrtl, long double, (long double x));
1009 _GL_CXXALIASWARN (sqrtl);
1010 #elif defined GNULIB_POSIXCHECK
1011 # undef sqrtl
1012 # if HAVE_RAW_DECL_SQRTL
1013 _GL_WARN_ON_USE (sqrtl, "sqrtl is unportable - "
1014                  "use gnulib module mathl for portability");
1015 # endif
1016 #endif
1017
1018
1019 #if @GNULIB_TANF@
1020 # if !@HAVE_TANF@
1021 #  undef tanf
1022 _GL_FUNCDECL_SYS (tanf, float, (float x));
1023 # endif
1024 _GL_CXXALIAS_SYS (tanf, float, (float x));
1025 _GL_CXXALIASWARN (tanf);
1026 #elif defined GNULIB_POSIXCHECK
1027 # undef tanf
1028 # if HAVE_RAW_DECL_TANF
1029 _GL_WARN_ON_USE (tanf, "tanf is unportable - "
1030                  "use gnulib module tanf for portability");
1031 # endif
1032 #endif
1033
1034 #if @GNULIB_TANL@
1035 # if !@HAVE_TANL@ || !@HAVE_DECL_TANL@
1036 _GL_FUNCDECL_SYS (tanl, long double, (long double x));
1037 # endif
1038 _GL_CXXALIAS_SYS (tanl, long double, (long double x));
1039 _GL_CXXALIASWARN (tanl);
1040 #elif defined GNULIB_POSIXCHECK
1041 # undef tanl
1042 # if HAVE_RAW_DECL_TANL
1043 _GL_WARN_ON_USE (tanl, "tanl is unportable - "
1044                  "use gnulib module mathl for portability");
1045 # endif
1046 #endif
1047
1048
1049 #if @GNULIB_TANHF@
1050 # if !@HAVE_TANHF@
1051 #  undef tanhf
1052 _GL_FUNCDECL_SYS (tanhf, float, (float x));
1053 # endif
1054 _GL_CXXALIAS_SYS (tanhf, float, (float x));
1055 _GL_CXXALIASWARN (tanhf);
1056 #elif defined GNULIB_POSIXCHECK
1057 # undef tanhf
1058 # if HAVE_RAW_DECL_TANHF
1059 _GL_WARN_ON_USE (tanhf, "tanhf is unportable - "
1060                  "use gnulib module tanhf for portability");
1061 # endif
1062 #endif
1063
1064
1065 #if @GNULIB_TRUNCF@
1066 # if @REPLACE_TRUNCF@
1067 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
1068 #   define truncf rpl_truncf
1069 #  endif
1070 _GL_FUNCDECL_RPL (truncf, float, (float x));
1071 _GL_CXXALIAS_RPL (truncf, float, (float x));
1072 # else
1073 #  if !@HAVE_DECL_TRUNCF@
1074 _GL_FUNCDECL_SYS (truncf, float, (float x));
1075 #  endif
1076 _GL_CXXALIAS_SYS (truncf, float, (float x));
1077 # endif
1078 _GL_CXXALIASWARN (truncf);
1079 #elif defined GNULIB_POSIXCHECK
1080 # undef truncf
1081 # if HAVE_RAW_DECL_TRUNCF
1082 _GL_WARN_ON_USE (truncf, "truncf is unportable - "
1083                  "use gnulib module truncf for portability");
1084 # endif
1085 #endif
1086
1087 #if @GNULIB_TRUNC@
1088 # if @REPLACE_TRUNC@
1089 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
1090 #   define trunc rpl_trunc
1091 #  endif
1092 _GL_FUNCDECL_RPL (trunc, double, (double x));
1093 _GL_CXXALIAS_RPL (trunc, double, (double x));
1094 # else
1095 #  if !@HAVE_DECL_TRUNC@
1096 _GL_FUNCDECL_SYS (trunc, double, (double x));
1097 #  endif
1098 _GL_CXXALIAS_SYS (trunc, double, (double x));
1099 # endif
1100 _GL_CXXALIASWARN (trunc);
1101 #elif defined GNULIB_POSIXCHECK
1102 # undef trunc
1103 # if HAVE_RAW_DECL_TRUNC
1104 _GL_WARN_ON_USE (trunc, "trunc is unportable - "
1105                  "use gnulib module trunc for portability");
1106 # endif
1107 #endif
1108
1109 #if @GNULIB_TRUNCL@
1110 # if @REPLACE_TRUNCL@
1111 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
1112 #   undef truncl
1113 #   define truncl rpl_truncl
1114 #  endif
1115 _GL_FUNCDECL_RPL (truncl, long double, (long double x));
1116 _GL_CXXALIAS_RPL (truncl, long double, (long double x));
1117 # else
1118 #  if !@HAVE_DECL_TRUNCL@
1119 _GL_FUNCDECL_SYS (truncl, long double, (long double x));
1120 #  endif
1121 _GL_CXXALIAS_SYS (truncl, long double, (long double x));
1122 # endif
1123 _GL_CXXALIASWARN (truncl);
1124 #elif defined GNULIB_POSIXCHECK
1125 # undef truncl
1126 # if HAVE_RAW_DECL_TRUNCL
1127 _GL_WARN_ON_USE (truncl, "truncl is unportable - "
1128                  "use gnulib module truncl for portability");
1129 # endif
1130 #endif
1131
1132
1133 /* Definitions of function-like macros come here, after the function
1134    declarations.  */
1135
1136
1137 #if @GNULIB_ISFINITE@
1138 # if @REPLACE_ISFINITE@
1139 _GL_EXTERN_C int gl_isfinitef (float x);
1140 _GL_EXTERN_C int gl_isfinited (double x);
1141 _GL_EXTERN_C int gl_isfinitel (long double x);
1142 #  undef isfinite
1143 #  define isfinite(x) \
1144    (sizeof (x) == sizeof (long double) ? gl_isfinitel (x) : \
1145     sizeof (x) == sizeof (double) ? gl_isfinited (x) : \
1146     gl_isfinitef (x))
1147 # endif
1148 # ifdef __cplusplus
1149 #  ifdef isfinite
1150 _GL_MATH_CXX_REAL_FLOATING_DECL_1 (isfinite)
1151 #   undef isfinite
1152 _GL_MATH_CXX_REAL_FLOATING_DECL_2 (isfinite)
1153 #  endif
1154 # endif
1155 #elif defined GNULIB_POSIXCHECK
1156 # if defined isfinite
1157 _GL_WARN_REAL_FLOATING_DECL (isfinite);
1158 #  undef isfinite
1159 #  define isfinite(x) _GL_WARN_REAL_FLOATING_IMPL (isfinite, x)
1160 # endif
1161 #endif
1162
1163
1164 #if @GNULIB_ISINF@
1165 # if @REPLACE_ISINF@
1166 _GL_EXTERN_C int gl_isinff (float x);
1167 _GL_EXTERN_C int gl_isinfd (double x);
1168 _GL_EXTERN_C int gl_isinfl (long double x);
1169 #  undef isinf
1170 #  define isinf(x) \
1171    (sizeof (x) == sizeof (long double) ? gl_isinfl (x) : \
1172     sizeof (x) == sizeof (double) ? gl_isinfd (x) : \
1173     gl_isinff (x))
1174 # endif
1175 # ifdef __cplusplus
1176 #  ifdef isinf
1177 _GL_MATH_CXX_REAL_FLOATING_DECL_1 (isinf)
1178 #   undef isinf
1179 _GL_MATH_CXX_REAL_FLOATING_DECL_2 (isinf)
1180 #  endif
1181 # endif
1182 #elif defined GNULIB_POSIXCHECK
1183 # if defined isinf
1184 _GL_WARN_REAL_FLOATING_DECL (isinf);
1185 #  undef isinf
1186 #  define isinf(x) _GL_WARN_REAL_FLOATING_IMPL (isinf, x)
1187 # endif
1188 #endif
1189
1190
1191 #if @GNULIB_ISNANF@
1192 /* Test for NaN for 'float' numbers.  */
1193 # if @HAVE_ISNANF@
1194 /* The original <math.h> included above provides a declaration of isnan macro
1195    or (older) isnanf function.  */
1196 #  if __GNUC__ >= 4
1197     /* GCC 4.0 and newer provides three built-ins for isnan.  */
1198 #   undef isnanf
1199 #   define isnanf(x) __builtin_isnanf ((float)(x))
1200 #  elif defined isnan
1201 #   undef isnanf
1202 #   define isnanf(x) isnan ((float)(x))
1203 #  endif
1204 # else
1205 /* Test whether X is a NaN.  */
1206 #  undef isnanf
1207 #  define isnanf rpl_isnanf
1208 _GL_EXTERN_C int isnanf (float x);
1209 # endif
1210 #endif
1211
1212 #if @GNULIB_ISNAND@
1213 /* Test for NaN for 'double' numbers.
1214    This function is a gnulib extension, unlike isnan() which applied only
1215    to 'double' numbers earlier but now is a type-generic macro.  */
1216 # if @HAVE_ISNAND@
1217 /* The original <math.h> included above provides a declaration of isnan
1218    macro.  */
1219 #  if __GNUC__ >= 4
1220     /* GCC 4.0 and newer provides three built-ins for isnan.  */
1221 #   undef isnand
1222 #   define isnand(x) __builtin_isnan ((double)(x))
1223 #  else
1224 #   undef isnand
1225 #   define isnand(x) isnan ((double)(x))
1226 #  endif
1227 # else
1228 /* Test whether X is a NaN.  */
1229 #  undef isnand
1230 #  define isnand rpl_isnand
1231 _GL_EXTERN_C int isnand (double x);
1232 # endif
1233 #endif
1234
1235 #if @GNULIB_ISNANL@
1236 /* Test for NaN for 'long double' numbers.  */
1237 # if @HAVE_ISNANL@
1238 /* The original <math.h> included above provides a declaration of isnan
1239    macro or (older) isnanl function.  */
1240 #  if __GNUC__ >= 4
1241     /* GCC 4.0 and newer provides three built-ins for isnan.  */
1242 #   undef isnanl
1243 #   define isnanl(x) __builtin_isnanl ((long double)(x))
1244 #  elif defined isnan
1245 #   undef isnanl
1246 #   define isnanl(x) isnan ((long double)(x))
1247 #  endif
1248 # else
1249 /* Test whether X is a NaN.  */
1250 #  undef isnanl
1251 #  define isnanl rpl_isnanl
1252 _GL_EXTERN_C int isnanl (long double x) _GL_ATTRIBUTE_CONST;
1253 # endif
1254 #endif
1255
1256 /* This must come *after* the snippets for GNULIB_ISNANF and GNULIB_ISNANL!  */
1257 #if @GNULIB_ISNAN@
1258 # if @REPLACE_ISNAN@
1259 /* We can't just use the isnanf macro (e.g.) as exposed by
1260    isnanf.h (e.g.) here, because those may end up being macros
1261    that recursively expand back to isnan.  So use the gnulib
1262    replacements for them directly. */
1263 #  if @HAVE_ISNANF@ && __GNUC__ >= 4
1264 #   define gl_isnan_f(x) __builtin_isnanf ((float)(x))
1265 #  else
1266 _GL_EXTERN_C int rpl_isnanf (float x);
1267 #   define gl_isnan_f(x) rpl_isnanf (x)
1268 #  endif
1269 #  if @HAVE_ISNAND@ && __GNUC__ >= 4
1270 #   define gl_isnan_d(x) __builtin_isnan ((double)(x))
1271 #  else
1272 _GL_EXTERN_C int rpl_isnand (double x);
1273 #   define gl_isnan_d(x) rpl_isnand (x)
1274 #  endif
1275 #  if @HAVE_ISNANL@ && __GNUC__ >= 4
1276 #   define gl_isnan_l(x) __builtin_isnanl ((long double)(x))
1277 #  else
1278 _GL_EXTERN_C int rpl_isnanl (long double x) _GL_ATTRIBUTE_CONST;
1279 #   define gl_isnan_l(x) rpl_isnanl (x)
1280 #  endif
1281 #  undef isnan
1282 #  define isnan(x) \
1283    (sizeof (x) == sizeof (long double) ? gl_isnan_l (x) : \
1284     sizeof (x) == sizeof (double) ? gl_isnan_d (x) : \
1285     gl_isnan_f (x))
1286 # elif __GNUC__ >= 4
1287 #  undef isnan
1288 #  define isnan(x) \
1289    (sizeof (x) == sizeof (long double) ? __builtin_isnanl ((long double)(x)) : \
1290     sizeof (x) == sizeof (double) ? __builtin_isnan ((double)(x)) : \
1291     __builtin_isnanf ((float)(x)))
1292 # endif
1293 # ifdef __cplusplus
1294 #  ifdef isnan
1295 _GL_MATH_CXX_REAL_FLOATING_DECL_1 (isnan)
1296 #   undef isnan
1297 _GL_MATH_CXX_REAL_FLOATING_DECL_2 (isnan)
1298 #  endif
1299 # else
1300 /* Ensure isnan is a macro.  */
1301 #  ifndef isnan
1302 #   define isnan isnan
1303 #  endif
1304 # endif
1305 #elif defined GNULIB_POSIXCHECK
1306 # if defined isnan
1307 _GL_WARN_REAL_FLOATING_DECL (isnan);
1308 #  undef isnan
1309 #  define isnan(x) _GL_WARN_REAL_FLOATING_IMPL (isnan, x)
1310 # endif
1311 #endif
1312
1313
1314 #if @GNULIB_SIGNBIT@
1315 # if @REPLACE_SIGNBIT_USING_GCC@
1316 #  undef signbit
1317    /* GCC 4.0 and newer provides three built-ins for signbit.  */
1318 #  define signbit(x) \
1319    (sizeof (x) == sizeof (long double) ? __builtin_signbitl (x) : \
1320     sizeof (x) == sizeof (double) ? __builtin_signbit (x) : \
1321     __builtin_signbitf (x))
1322 # endif
1323 # if @REPLACE_SIGNBIT@
1324 #  undef signbit
1325 _GL_EXTERN_C int gl_signbitf (float arg);
1326 _GL_EXTERN_C int gl_signbitd (double arg);
1327 _GL_EXTERN_C int gl_signbitl (long double arg);
1328 #  if __GNUC__ >= 2 && !defined __STRICT_ANSI__
1329 #   define _GL_NUM_UINT_WORDS(type) \
1330       ((sizeof (type) + sizeof (unsigned int) - 1) / sizeof (unsigned int))
1331 #   if defined FLT_SIGNBIT_WORD && defined FLT_SIGNBIT_BIT && !defined gl_signbitf
1332 #    define gl_signbitf_OPTIMIZED_MACRO
1333 #    define gl_signbitf(arg) \
1334        ({ union { float _value;                                         \
1335                   unsigned int _word[_GL_NUM_UINT_WORDS (float)];       \
1336                 } _m;                                                   \
1337           _m._value = (arg);                                            \
1338           (_m._word[FLT_SIGNBIT_WORD] >> FLT_SIGNBIT_BIT) & 1;          \
1339         })
1340 #   endif
1341 #   if defined DBL_SIGNBIT_WORD && defined DBL_SIGNBIT_BIT && !defined gl_signbitd
1342 #    define gl_signbitd_OPTIMIZED_MACRO
1343 #    define gl_signbitd(arg) \
1344        ({ union { double _value;                                        \
1345                   unsigned int _word[_GL_NUM_UINT_WORDS (double)];      \
1346                 } _m;                                                   \
1347           _m._value = (arg);                                            \
1348           (_m._word[DBL_SIGNBIT_WORD] >> DBL_SIGNBIT_BIT) & 1;          \
1349         })
1350 #   endif
1351 #   if defined LDBL_SIGNBIT_WORD && defined LDBL_SIGNBIT_BIT && !defined gl_signbitl
1352 #    define gl_signbitl_OPTIMIZED_MACRO
1353 #    define gl_signbitl(arg) \
1354        ({ union { long double _value;                                   \
1355                   unsigned int _word[_GL_NUM_UINT_WORDS (long double)]; \
1356                 } _m;                                                   \
1357           _m._value = (arg);                                            \
1358           (_m._word[LDBL_SIGNBIT_WORD] >> LDBL_SIGNBIT_BIT) & 1;        \
1359         })
1360 #   endif
1361 #  endif
1362 #  define signbit(x) \
1363    (sizeof (x) == sizeof (long double) ? gl_signbitl (x) : \
1364     sizeof (x) == sizeof (double) ? gl_signbitd (x) : \
1365     gl_signbitf (x))
1366 # endif
1367 # ifdef __cplusplus
1368 #  ifdef signbit
1369 _GL_MATH_CXX_REAL_FLOATING_DECL_1 (signbit)
1370 #   undef signbit
1371 _GL_MATH_CXX_REAL_FLOATING_DECL_2 (signbit)
1372 #  endif
1373 # endif
1374 #elif defined GNULIB_POSIXCHECK
1375 # if defined signbit
1376 _GL_WARN_REAL_FLOATING_DECL (signbit);
1377 #  undef signbit
1378 #  define signbit(x) _GL_WARN_REAL_FLOATING_IMPL (signbit, x)
1379 # endif
1380 #endif
1381
1382
1383 #endif /* _@GUARD_PREFIX@_MATH_H */
1384 #endif /* _@GUARD_PREFIX@_MATH_H */