New module 'fma'.
[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 #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 _GL_FUNCDECL_SYS (ceilf, float, (float x));
266 #  endif
267 _GL_CXXALIAS_SYS (ceilf, float, (float x));
268 # endif
269 _GL_CXXALIASWARN (ceilf);
270 #elif defined GNULIB_POSIXCHECK
271 # undef ceilf
272 # if HAVE_RAW_DECL_CEILF
273 _GL_WARN_ON_USE (ceilf, "ceilf is unportable - "
274                  "use gnulib module ceilf for portability");
275 # endif
276 #endif
277
278 #if @GNULIB_CEIL@
279 # if @REPLACE_CEIL@
280 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
281 #   define ceil rpl_ceil
282 #  endif
283 _GL_FUNCDECL_RPL (ceil, double, (double x));
284 _GL_CXXALIAS_RPL (ceil, double, (double x));
285 # else
286 _GL_CXXALIAS_SYS (ceil, double, (double x));
287 # endif
288 _GL_CXXALIASWARN (ceil);
289 #endif
290
291 #if @GNULIB_CEILL@
292 # if @REPLACE_CEILL@
293 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
294 #   undef ceill
295 #   define ceill rpl_ceill
296 #  endif
297 _GL_FUNCDECL_RPL (ceill, long double, (long double x));
298 _GL_CXXALIAS_RPL (ceill, long double, (long double x));
299 # else
300 #  if !@HAVE_DECL_CEILL@
301 _GL_FUNCDECL_SYS (ceill, long double, (long double x));
302 #  endif
303 _GL_CXXALIAS_SYS (ceill, long double, (long double x));
304 # endif
305 _GL_CXXALIASWARN (ceill);
306 #elif defined GNULIB_POSIXCHECK
307 # undef ceill
308 # if HAVE_RAW_DECL_CEILL
309 _GL_WARN_ON_USE (ceill, "ceill is unportable - "
310                  "use gnulib module ceill for portability");
311 # endif
312 #endif
313
314
315 #if @GNULIB_COPYSIGNF@
316 # if !@HAVE_COPYSIGNF@
317 _GL_FUNCDECL_SYS (copysignf, float, (float x, float y));
318 # endif
319 _GL_CXXALIAS_SYS (copysignf, float, (float x, float y));
320 _GL_CXXALIASWARN (copysignf);
321 #elif defined GNULIB_POSIXCHECK
322 # undef copysignf
323 # if HAVE_RAW_DECL_COPYSIGNF
324 _GL_WARN_ON_USE (copysignf, "copysignf is unportable - "
325                  "use gnulib module copysignf for portability");
326 # endif
327 #endif
328
329 #if @GNULIB_COPYSIGN@
330 # if !@HAVE_COPYSIGN@
331 _GL_FUNCDECL_SYS (copysign, double, (double x, double y));
332 # endif
333 _GL_CXXALIAS_SYS (copysign, double, (double x, double y));
334 _GL_CXXALIASWARN (copysign);
335 #elif defined GNULIB_POSIXCHECK
336 # undef copysign
337 # if HAVE_RAW_DECL_COPYSIGN
338 _GL_WARN_ON_USE (copysign, "copysign is unportable - "
339                  "use gnulib module copysign for portability");
340 # endif
341 #endif
342
343 #if @GNULIB_COPYSIGNL@
344 # if !@HAVE_COPYSIGNL@
345 _GL_FUNCDECL_SYS (copysignl, long double, (long double x, long double y));
346 # endif
347 _GL_CXXALIAS_SYS (copysignl, long double, (long double x, long double y));
348 _GL_CXXALIASWARN (copysignl);
349 #elif defined GNULIB_POSIXCHECK
350 # undef copysignl
351 # if HAVE_RAW_DECL_COPYSIGNL
352 _GL_WARN_ON_USE (copysign, "copysignl is unportable - "
353                  "use gnulib module copysignl for portability");
354 # endif
355 #endif
356
357
358 #if @GNULIB_COSF@
359 # if !@HAVE_COSF@
360 #  undef cosf
361 _GL_FUNCDECL_SYS (cosf, float, (float x));
362 # endif
363 _GL_CXXALIAS_SYS (cosf, float, (float x));
364 _GL_CXXALIASWARN (cosf);
365 #elif defined GNULIB_POSIXCHECK
366 # undef cosf
367 # if HAVE_RAW_DECL_COSF
368 _GL_WARN_ON_USE (cosf, "cosf is unportable - "
369                  "use gnulib module cosf for portability");
370 # endif
371 #endif
372
373 #if @GNULIB_COSL@
374 # if !@HAVE_COSL@ || !@HAVE_DECL_COSL@
375 _GL_FUNCDECL_SYS (cosl, long double, (long double x));
376 # endif
377 _GL_CXXALIAS_SYS (cosl, long double, (long double x));
378 _GL_CXXALIASWARN (cosl);
379 #elif defined GNULIB_POSIXCHECK
380 # undef cosl
381 # if HAVE_RAW_DECL_COSL
382 _GL_WARN_ON_USE (cosl, "cosl is unportable - "
383                  "use gnulib module mathl for portability");
384 # endif
385 #endif
386
387
388 #if @GNULIB_COSHF@
389 # if !@HAVE_COSHF@
390 #  undef coshf
391 _GL_FUNCDECL_SYS (coshf, float, (float x));
392 # endif
393 _GL_CXXALIAS_SYS (coshf, float, (float x));
394 _GL_CXXALIASWARN (coshf);
395 #elif defined GNULIB_POSIXCHECK
396 # undef coshf
397 # if HAVE_RAW_DECL_COSHF
398 _GL_WARN_ON_USE (coshf, "coshf is unportable - "
399                  "use gnulib module coshf for portability");
400 # endif
401 #endif
402
403
404 #if @GNULIB_EXPF@
405 # if !@HAVE_EXPF@
406 #  undef expf
407 _GL_FUNCDECL_SYS (expf, float, (float x));
408 # endif
409 _GL_CXXALIAS_SYS (expf, float, (float x));
410 _GL_CXXALIASWARN (expf);
411 #elif defined GNULIB_POSIXCHECK
412 # undef expf
413 # if HAVE_RAW_DECL_EXPF
414 _GL_WARN_ON_USE (expf, "expf is unportable - "
415                  "use gnulib module expf for portability");
416 # endif
417 #endif
418
419 #if @GNULIB_EXPL@
420 # if !@HAVE_EXPL@ || !@HAVE_DECL_EXPL@
421 _GL_FUNCDECL_SYS (expl, long double, (long double x));
422 # endif
423 _GL_CXXALIAS_SYS (expl, long double, (long double x));
424 _GL_CXXALIASWARN (expl);
425 #elif defined GNULIB_POSIXCHECK
426 # undef expl
427 # if HAVE_RAW_DECL_EXPL
428 _GL_WARN_ON_USE (expl, "expl is unportable - "
429                  "use gnulib module mathl for portability");
430 # endif
431 #endif
432
433
434 #if @GNULIB_FABSF@
435 # if !@HAVE_FABSF@
436 #  undef fabsf
437 _GL_FUNCDECL_SYS (fabsf, float, (float x));
438 # endif
439 _GL_CXXALIAS_SYS (fabsf, float, (float x));
440 _GL_CXXALIASWARN (fabsf);
441 #elif defined GNULIB_POSIXCHECK
442 # undef fabsf
443 # if HAVE_RAW_DECL_FABSF
444 _GL_WARN_ON_USE (fabsf, "fabsf is unportable - "
445                  "use gnulib module fabsf for portability");
446 # endif
447 #endif
448
449
450 #if @GNULIB_FLOORF@
451 # if @REPLACE_FLOORF@
452 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
453 #   undef floorf
454 #   define floorf rpl_floorf
455 #  endif
456 _GL_FUNCDECL_RPL (floorf, float, (float x));
457 _GL_CXXALIAS_RPL (floorf, float, (float x));
458 # else
459 #  if !@HAVE_DECL_FLOORF@
460 _GL_FUNCDECL_SYS (floorf, float, (float x));
461 #  endif
462 _GL_CXXALIAS_SYS (floorf, float, (float x));
463 # endif
464 _GL_CXXALIASWARN (floorf);
465 #elif defined GNULIB_POSIXCHECK
466 # undef floorf
467 # if HAVE_RAW_DECL_FLOORF
468 _GL_WARN_ON_USE (floorf, "floorf is unportable - "
469                  "use gnulib module floorf for portability");
470 # endif
471 #endif
472
473 #if @GNULIB_FLOOR@
474 # if @REPLACE_FLOOR@
475 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
476 #   define floor rpl_floor
477 #  endif
478 _GL_FUNCDECL_RPL (floor, double, (double x));
479 _GL_CXXALIAS_RPL (floor, double, (double x));
480 # else
481 _GL_CXXALIAS_SYS (floor, double, (double x));
482 # endif
483 _GL_CXXALIASWARN (floor);
484 #endif
485
486 #if @GNULIB_FLOORL@
487 # if @REPLACE_FLOORL@
488 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
489 #   undef floorl
490 #   define floorl rpl_floorl
491 #  endif
492 _GL_FUNCDECL_RPL (floorl, long double, (long double x));
493 _GL_CXXALIAS_RPL (floorl, long double, (long double x));
494 # else
495 #  if !@HAVE_DECL_FLOORL@
496 _GL_FUNCDECL_SYS (floorl, long double, (long double x));
497 #  endif
498 _GL_CXXALIAS_SYS (floorl, long double, (long double x));
499 # endif
500 _GL_CXXALIASWARN (floorl);
501 #elif defined GNULIB_POSIXCHECK
502 # undef floorl
503 # if HAVE_RAW_DECL_FLOORL
504 _GL_WARN_ON_USE (floorl, "floorl is unportable - "
505                  "use gnulib module floorl for portability");
506 # endif
507 #endif
508
509
510 #if @GNULIB_FMA@
511 # if @REPLACE_FMA@
512 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
513 #   undef fma
514 #   define fma rpl_fma
515 #  endif
516 _GL_FUNCDECL_RPL (fma, double, (double x, double y, double z));
517 _GL_CXXALIAS_RPL (fma, double, (double x, double y, double z));
518 # else
519 #  if !@HAVE_FMA@
520 _GL_FUNCDECL_SYS (fma, double, (double x, double y, double z));
521 #  endif
522 _GL_CXXALIAS_SYS (fma, double, (double x, double y, double z));
523 # endif
524 _GL_CXXALIASWARN (fma);
525 #elif defined GNULIB_POSIXCHECK
526 # undef fma
527 # if HAVE_RAW_DECL_FMA
528 _GL_WARN_ON_USE (fma, "fma is unportable - "
529                  "use gnulib module fma for portability");
530 # endif
531 #endif
532
533
534 #if @GNULIB_FMODF@
535 # if !@HAVE_FMODF@
536 #  undef fmodf
537 _GL_FUNCDECL_SYS (fmodf, float, (float x, float y));
538 # endif
539 _GL_CXXALIAS_SYS (fmodf, float, (float x, float y));
540 _GL_CXXALIASWARN (fmodf);
541 #elif defined GNULIB_POSIXCHECK
542 # undef fmodf
543 # if HAVE_RAW_DECL_FMODF
544 _GL_WARN_ON_USE (fmodf, "fmodf is unportable - "
545                  "use gnulib module fmodf for portability");
546 # endif
547 #endif
548
549
550 /* Write x as
551      x = mantissa * 2^exp
552    where
553      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
554      If x is zero: mantissa = x, exp = 0.
555      If x is infinite or NaN: mantissa = x, exp unspecified.
556    Store exp in *EXPPTR and return mantissa.  */
557 #if @GNULIB_FREXPF@
558 # if @REPLACE_FREXPF@
559 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
560 #   undef frexpf
561 #   define frexpf rpl_frexpf
562 #  endif
563 _GL_FUNCDECL_RPL (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
564 _GL_CXXALIAS_RPL (frexpf, float, (float x, int *expptr));
565 # else
566 #  if !@HAVE_FREXPF@
567 #   undef frexpf
568 _GL_FUNCDECL_SYS (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
569 #  endif
570 _GL_CXXALIAS_SYS (frexpf, float, (float x, int *expptr));
571 # endif
572 _GL_CXXALIASWARN (frexpf);
573 #elif defined GNULIB_POSIXCHECK
574 # undef frexpf
575 # if HAVE_RAW_DECL_FREXPF
576 _GL_WARN_ON_USE (frexpf, "frexpf is unportable - "
577                  "use gnulib module frexpf for portability");
578 # endif
579 #endif
580
581 /* Write x as
582      x = mantissa * 2^exp
583    where
584      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
585      If x is zero: mantissa = x, exp = 0.
586      If x is infinite or NaN: mantissa = x, exp unspecified.
587    Store exp in *EXPPTR and return mantissa.  */
588 #if @GNULIB_FREXP@
589 # if @REPLACE_FREXP@
590 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
591 #   define frexp rpl_frexp
592 #  endif
593 _GL_FUNCDECL_RPL (frexp, double, (double x, int *expptr) _GL_ARG_NONNULL ((2)));
594 _GL_CXXALIAS_RPL (frexp, double, (double x, int *expptr));
595 # else
596 _GL_CXXALIAS_SYS (frexp, double, (double x, int *expptr));
597 # endif
598 _GL_CXXALIASWARN (frexp);
599 #elif defined GNULIB_POSIXCHECK
600 # undef frexp
601 /* Assume frexp is always declared.  */
602 _GL_WARN_ON_USE (frexp, "frexp is unportable - "
603                  "use gnulib module frexp for portability");
604 #endif
605
606 /* Write x as
607      x = mantissa * 2^exp
608    where
609      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
610      If x is zero: mantissa = x, exp = 0.
611      If x is infinite or NaN: mantissa = x, exp unspecified.
612    Store exp in *EXPPTR and return mantissa.  */
613 #if @GNULIB_FREXPL@ && @REPLACE_FREXPL@
614 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
615 #  undef frexpl
616 #  define frexpl rpl_frexpl
617 # endif
618 _GL_FUNCDECL_RPL (frexpl, long double,
619                   (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
620 _GL_CXXALIAS_RPL (frexpl, long double, (long double x, int *expptr));
621 #else
622 # if !@HAVE_DECL_FREXPL@
623 _GL_FUNCDECL_SYS (frexpl, long double,
624                   (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
625 # endif
626 # if @GNULIB_FREXPL@
627 _GL_CXXALIAS_SYS (frexpl, long double, (long double x, int *expptr));
628 # endif
629 #endif
630 #if @GNULIB_FREXPL@ && !(@REPLACE_FREXPL@ && !@HAVE_DECL_FREXPL@)
631 _GL_CXXALIASWARN (frexpl);
632 #endif
633 #if !@GNULIB_FREXPL@ && defined GNULIB_POSIXCHECK
634 # undef frexpl
635 # if HAVE_RAW_DECL_FREXPL
636 _GL_WARN_ON_USE (frexpl, "frexpl is unportable - "
637                  "use gnulib module frexpl for portability");
638 # endif
639 #endif
640
641
642 /* Return x * 2^exp.  */
643 #if @GNULIB_LDEXPF@
644 # if !@HAVE_LDEXPF@
645 #  undef ldexpf
646 _GL_FUNCDECL_SYS (ldexpf, float, (float x, int exp));
647 # endif
648 _GL_CXXALIAS_SYS (ldexpf, float, (float x, int exp));
649 _GL_CXXALIASWARN (ldexpf);
650 #elif defined GNULIB_POSIXCHECK
651 # undef ldexpf
652 # if HAVE_RAW_DECL_LDEXPF
653 _GL_WARN_ON_USE (ldexpf, "ldexpf is unportable - "
654                  "use gnulib module ldexpf for portability");
655 # endif
656 #endif
657
658 /* Return x * 2^exp.  */
659 #if @GNULIB_LDEXPL@ && @REPLACE_LDEXPL@
660 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
661 #  undef ldexpl
662 #  define ldexpl rpl_ldexpl
663 # endif
664 _GL_FUNCDECL_RPL (ldexpl, long double, (long double x, int exp));
665 _GL_CXXALIAS_RPL (ldexpl, long double, (long double x, int exp));
666 #else
667 # if !@HAVE_DECL_LDEXPL@
668 _GL_FUNCDECL_SYS (ldexpl, long double, (long double x, int exp));
669 # endif
670 # if @GNULIB_LDEXPL@
671 _GL_CXXALIAS_SYS (ldexpl, long double, (long double x, int exp));
672 # endif
673 #endif
674 #if @GNULIB_LDEXPL@
675 _GL_CXXALIASWARN (ldexpl);
676 #endif
677 #if !@GNULIB_LDEXPL@ && defined GNULIB_POSIXCHECK
678 # undef ldexpl
679 # if HAVE_RAW_DECL_LDEXPL
680 _GL_WARN_ON_USE (ldexpl, "ldexpl is unportable - "
681                  "use gnulib module ldexpl for portability");
682 # endif
683 #endif
684
685
686 #if @GNULIB_LOGB@
687 # if !@HAVE_DECL_LOGB@
688 _GL_EXTERN_C double logb (double x);
689 # endif
690 #elif defined GNULIB_POSIXCHECK
691 # undef logb
692 # if HAVE_RAW_DECL_LOGB
693 _GL_WARN_ON_USE (logb, "logb is unportable - "
694                  "use gnulib module logb for portability");
695 # endif
696 #endif
697
698
699 #if @GNULIB_LOGF@
700 # if !@HAVE_LOGF@
701 #  undef logf
702 _GL_FUNCDECL_SYS (logf, float, (float x));
703 # endif
704 _GL_CXXALIAS_SYS (logf, float, (float x));
705 _GL_CXXALIASWARN (logf);
706 #elif defined GNULIB_POSIXCHECK
707 # undef logf
708 # if HAVE_RAW_DECL_LOGF
709 _GL_WARN_ON_USE (logf, "logf is unportable - "
710                  "use gnulib module logf for portability");
711 # endif
712 #endif
713
714 #if @GNULIB_LOGL@
715 # if !@HAVE_LOGL@ || !@HAVE_DECL_LOGL@
716 _GL_FUNCDECL_SYS (logl, long double, (long double x));
717 # endif
718 _GL_CXXALIAS_SYS (logl, long double, (long double x));
719 _GL_CXXALIASWARN (logl);
720 #elif defined GNULIB_POSIXCHECK
721 # undef logl
722 # if HAVE_RAW_DECL_LOGL
723 _GL_WARN_ON_USE (logl, "logl is unportable - "
724                  "use gnulib module mathl for portability");
725 # endif
726 #endif
727
728
729 #if @GNULIB_LOG10F@
730 # if !@HAVE_LOG10F@
731 #  undef log10f
732 _GL_FUNCDECL_SYS (log10f, float, (float x));
733 # endif
734 _GL_CXXALIAS_SYS (log10f, float, (float x));
735 _GL_CXXALIASWARN (log10f);
736 #elif defined GNULIB_POSIXCHECK
737 # undef log10f
738 # if HAVE_RAW_DECL_LOG10F
739 _GL_WARN_ON_USE (log10f, "log10f is unportable - "
740                  "use gnulib module log10f for portability");
741 # endif
742 #endif
743
744
745 #if @GNULIB_MODFF@
746 # if !@HAVE_MODFF@
747 #  undef modff
748 _GL_FUNCDECL_SYS (modff, float, (float x, float *iptr) _GL_ARG_NONNULL ((2)));
749 # endif
750 _GL_CXXALIAS_SYS (modff, float, (float x, float *iptr));
751 _GL_CXXALIASWARN (modff);
752 #elif defined GNULIB_POSIXCHECK
753 # undef modff
754 # if HAVE_RAW_DECL_MODFF
755 _GL_WARN_ON_USE (modff, "modff is unportable - "
756                  "use gnulib module modff for portability");
757 # endif
758 #endif
759
760
761 #if @GNULIB_POWF@
762 # if !@HAVE_POWF@
763 #  undef powf
764 _GL_FUNCDECL_SYS (powf, float, (float x, float y));
765 # endif
766 _GL_CXXALIAS_SYS (powf, float, (float x, float y));
767 _GL_CXXALIASWARN (powf);
768 #elif defined GNULIB_POSIXCHECK
769 # undef powf
770 # if HAVE_RAW_DECL_POWF
771 _GL_WARN_ON_USE (powf, "powf is unportable - "
772                  "use gnulib module powf for portability");
773 # endif
774 #endif
775
776
777 #if @GNULIB_RINTF@
778 # if !@HAVE_RINTF@
779 _GL_FUNCDECL_SYS (rintf, float, (float x));
780 # endif
781 _GL_CXXALIAS_SYS (rintf, float, (float x));
782 _GL_CXXALIASWARN (rintf);
783 #elif defined GNULIB_POSIXCHECK
784 # undef rintf
785 # if HAVE_RAW_DECL_RINTF
786 _GL_WARN_ON_USE (rintf, "rintf is unportable - "
787                  "use gnulib module rintf for portability");
788 # endif
789 #endif
790
791 #if @GNULIB_RINT@
792 # if !@HAVE_RINT@
793 _GL_FUNCDECL_SYS (rint, double, (double x));
794 # endif
795 _GL_CXXALIAS_SYS (rint, double, (double x));
796 _GL_CXXALIASWARN (rint);
797 #elif defined GNULIB_POSIXCHECK
798 # undef rint
799 # if HAVE_RAW_DECL_RINT
800 _GL_WARN_ON_USE (rint, "rint is unportable - "
801                  "use gnulib module rint for portability");
802 # endif
803 #endif
804
805 #if @GNULIB_RINTL@
806 # if !@HAVE_RINTL@
807 _GL_FUNCDECL_SYS (rintl, long double, (long double x));
808 # endif
809 _GL_CXXALIAS_SYS (rintl, long double, (long double x));
810 _GL_CXXALIASWARN (rintl);
811 #elif defined GNULIB_POSIXCHECK
812 # undef rintl
813 # if HAVE_RAW_DECL_RINTL
814 _GL_WARN_ON_USE (rintl, "rintl is unportable - "
815                  "use gnulib module rintl for portability");
816 # endif
817 #endif
818
819
820 #if @GNULIB_ROUNDF@
821 # if @REPLACE_ROUNDF@
822 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
823 #   undef roundf
824 #   define roundf rpl_roundf
825 #  endif
826 _GL_FUNCDECL_RPL (roundf, float, (float x));
827 _GL_CXXALIAS_RPL (roundf, float, (float x));
828 # else
829 #  if !@HAVE_DECL_ROUNDF@
830 _GL_FUNCDECL_SYS (roundf, float, (float x));
831 #  endif
832 _GL_CXXALIAS_SYS (roundf, float, (float x));
833 # endif
834 _GL_CXXALIASWARN (roundf);
835 #elif defined GNULIB_POSIXCHECK
836 # undef roundf
837 # if HAVE_RAW_DECL_ROUNDF
838 _GL_WARN_ON_USE (roundf, "roundf is unportable - "
839                  "use gnulib module roundf for portability");
840 # endif
841 #endif
842
843 #if @GNULIB_ROUND@
844 # if @REPLACE_ROUND@
845 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
846 #   undef round
847 #   define round rpl_round
848 #  endif
849 _GL_FUNCDECL_RPL (round, double, (double x));
850 _GL_CXXALIAS_RPL (round, double, (double x));
851 # else
852 #  if !@HAVE_DECL_ROUND@
853 _GL_FUNCDECL_SYS (round, double, (double x));
854 #  endif
855 _GL_CXXALIAS_SYS (round, double, (double x));
856 # endif
857 _GL_CXXALIASWARN (round);
858 #elif defined GNULIB_POSIXCHECK
859 # undef round
860 # if HAVE_RAW_DECL_ROUND
861 _GL_WARN_ON_USE (round, "round is unportable - "
862                  "use gnulib module round for portability");
863 # endif
864 #endif
865
866 #if @GNULIB_ROUNDL@
867 # if @REPLACE_ROUNDL@
868 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
869 #   undef roundl
870 #   define roundl rpl_roundl
871 #  endif
872 _GL_FUNCDECL_RPL (roundl, long double, (long double x));
873 _GL_CXXALIAS_RPL (roundl, long double, (long double x));
874 # else
875 #  if !@HAVE_DECL_ROUNDL@
876 _GL_FUNCDECL_SYS (roundl, long double, (long double x));
877 #  endif
878 _GL_CXXALIAS_SYS (roundl, long double, (long double x));
879 # endif
880 _GL_CXXALIASWARN (roundl);
881 #elif defined GNULIB_POSIXCHECK
882 # undef roundl
883 # if HAVE_RAW_DECL_ROUNDL
884 _GL_WARN_ON_USE (roundl, "roundl is unportable - "
885                  "use gnulib module roundl for portability");
886 # endif
887 #endif
888
889
890 #if @GNULIB_SINF@
891 # if !@HAVE_SINF@
892 #  undef sinf
893 _GL_FUNCDECL_SYS (sinf, float, (float x));
894 # endif
895 _GL_CXXALIAS_SYS (sinf, float, (float x));
896 _GL_CXXALIASWARN (sinf);
897 #elif defined GNULIB_POSIXCHECK
898 # undef sinf
899 # if HAVE_RAW_DECL_SINF
900 _GL_WARN_ON_USE (sinf, "sinf is unportable - "
901                  "use gnulib module sinf for portability");
902 # endif
903 #endif
904
905 #if @GNULIB_SINL@
906 # if !@HAVE_SINL@ || !@HAVE_DECL_SINL@
907 _GL_FUNCDECL_SYS (sinl, long double, (long double x));
908 # endif
909 _GL_CXXALIAS_SYS (sinl, long double, (long double x));
910 _GL_CXXALIASWARN (sinl);
911 #elif defined GNULIB_POSIXCHECK
912 # undef sinl
913 # if HAVE_RAW_DECL_SINL
914 _GL_WARN_ON_USE (sinl, "sinl is unportable - "
915                  "use gnulib module mathl for portability");
916 # endif
917 #endif
918
919
920 #if @GNULIB_SINHF@
921 # if !@HAVE_SINHF@
922 #  undef sinhf
923 _GL_FUNCDECL_SYS (sinhf, float, (float x));
924 # endif
925 _GL_CXXALIAS_SYS (sinhf, float, (float x));
926 _GL_CXXALIASWARN (sinhf);
927 #elif defined GNULIB_POSIXCHECK
928 # undef sinhf
929 # if HAVE_RAW_DECL_SINHF
930 _GL_WARN_ON_USE (sinhf, "sinhf is unportable - "
931                  "use gnulib module sinhf for portability");
932 # endif
933 #endif
934
935
936 #if @GNULIB_SQRTF@
937 # if !@HAVE_SQRTF@
938 #  undef sqrtf
939 _GL_FUNCDECL_SYS (sqrtf, float, (float x));
940 # endif
941 _GL_CXXALIAS_SYS (sqrtf, float, (float x));
942 _GL_CXXALIASWARN (sqrtf);
943 #elif defined GNULIB_POSIXCHECK
944 # undef sqrtf
945 # if HAVE_RAW_DECL_SQRTF
946 _GL_WARN_ON_USE (sqrtf, "sqrtf is unportable - "
947                  "use gnulib module sqrtf for portability");
948 # endif
949 #endif
950
951 #if @GNULIB_SQRTL@
952 # if !@HAVE_SQRTL@ || !@HAVE_DECL_SQRTL@
953 _GL_FUNCDECL_SYS (sqrtl, long double, (long double x));
954 # endif
955 _GL_CXXALIAS_SYS (sqrtl, long double, (long double x));
956 _GL_CXXALIASWARN (sqrtl);
957 #elif defined GNULIB_POSIXCHECK
958 # undef sqrtl
959 # if HAVE_RAW_DECL_SQRTL
960 _GL_WARN_ON_USE (sqrtl, "sqrtl is unportable - "
961                  "use gnulib module mathl for portability");
962 # endif
963 #endif
964
965
966 #if @GNULIB_TANF@
967 # if !@HAVE_TANF@
968 #  undef tanf
969 _GL_FUNCDECL_SYS (tanf, float, (float x));
970 # endif
971 _GL_CXXALIAS_SYS (tanf, float, (float x));
972 _GL_CXXALIASWARN (tanf);
973 #elif defined GNULIB_POSIXCHECK
974 # undef tanf
975 # if HAVE_RAW_DECL_TANF
976 _GL_WARN_ON_USE (tanf, "tanf is unportable - "
977                  "use gnulib module tanf for portability");
978 # endif
979 #endif
980
981 #if @GNULIB_TANL@
982 # if !@HAVE_TANL@ || !@HAVE_DECL_TANL@
983 _GL_FUNCDECL_SYS (tanl, long double, (long double x));
984 # endif
985 _GL_CXXALIAS_SYS (tanl, long double, (long double x));
986 _GL_CXXALIASWARN (tanl);
987 #elif defined GNULIB_POSIXCHECK
988 # undef tanl
989 # if HAVE_RAW_DECL_TANL
990 _GL_WARN_ON_USE (tanl, "tanl is unportable - "
991                  "use gnulib module mathl for portability");
992 # endif
993 #endif
994
995
996 #if @GNULIB_TANHF@
997 # if !@HAVE_TANHF@
998 #  undef tanhf
999 _GL_FUNCDECL_SYS (tanhf, float, (float x));
1000 # endif
1001 _GL_CXXALIAS_SYS (tanhf, float, (float x));
1002 _GL_CXXALIASWARN (tanhf);
1003 #elif defined GNULIB_POSIXCHECK
1004 # undef tanhf
1005 # if HAVE_RAW_DECL_TANHF
1006 _GL_WARN_ON_USE (tanhf, "tanhf is unportable - "
1007                  "use gnulib module tanhf for portability");
1008 # endif
1009 #endif
1010
1011
1012 #if @GNULIB_TRUNCF@
1013 # if @REPLACE_TRUNCF@
1014 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
1015 #   define truncf rpl_truncf
1016 #  endif
1017 _GL_FUNCDECL_RPL (truncf, float, (float x));
1018 _GL_CXXALIAS_RPL (truncf, float, (float x));
1019 # else
1020 #  if !@HAVE_DECL_TRUNCF@
1021 _GL_FUNCDECL_SYS (truncf, float, (float x));
1022 #  endif
1023 _GL_CXXALIAS_SYS (truncf, float, (float x));
1024 # endif
1025 _GL_CXXALIASWARN (truncf);
1026 #elif defined GNULIB_POSIXCHECK
1027 # undef truncf
1028 # if HAVE_RAW_DECL_TRUNCF
1029 _GL_WARN_ON_USE (truncf, "truncf is unportable - "
1030                  "use gnulib module truncf for portability");
1031 # endif
1032 #endif
1033
1034 #if @GNULIB_TRUNC@
1035 # if @REPLACE_TRUNC@
1036 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
1037 #   define trunc rpl_trunc
1038 #  endif
1039 _GL_FUNCDECL_RPL (trunc, double, (double x));
1040 _GL_CXXALIAS_RPL (trunc, double, (double x));
1041 # else
1042 #  if !@HAVE_DECL_TRUNC@
1043 _GL_FUNCDECL_SYS (trunc, double, (double x));
1044 #  endif
1045 _GL_CXXALIAS_SYS (trunc, double, (double x));
1046 # endif
1047 _GL_CXXALIASWARN (trunc);
1048 #elif defined GNULIB_POSIXCHECK
1049 # undef trunc
1050 # if HAVE_RAW_DECL_TRUNC
1051 _GL_WARN_ON_USE (trunc, "trunc is unportable - "
1052                  "use gnulib module trunc for portability");
1053 # endif
1054 #endif
1055
1056 #if @GNULIB_TRUNCL@
1057 # if @REPLACE_TRUNCL@
1058 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
1059 #   undef truncl
1060 #   define truncl rpl_truncl
1061 #  endif
1062 _GL_FUNCDECL_RPL (truncl, long double, (long double x));
1063 _GL_CXXALIAS_RPL (truncl, long double, (long double x));
1064 # else
1065 #  if !@HAVE_DECL_TRUNCL@
1066 _GL_FUNCDECL_SYS (truncl, long double, (long double x));
1067 #  endif
1068 _GL_CXXALIAS_SYS (truncl, long double, (long double x));
1069 # endif
1070 _GL_CXXALIASWARN (truncl);
1071 #elif defined GNULIB_POSIXCHECK
1072 # undef truncl
1073 # if HAVE_RAW_DECL_TRUNCL
1074 _GL_WARN_ON_USE (truncl, "truncl is unportable - "
1075                  "use gnulib module truncl for portability");
1076 # endif
1077 #endif
1078
1079
1080 /* Definitions of function-like macros come here, after the function
1081    declarations.  */
1082
1083
1084 #if @GNULIB_ISFINITE@
1085 # if @REPLACE_ISFINITE@
1086 _GL_EXTERN_C int gl_isfinitef (float x);
1087 _GL_EXTERN_C int gl_isfinited (double x);
1088 _GL_EXTERN_C int gl_isfinitel (long double x);
1089 #  undef isfinite
1090 #  define isfinite(x) \
1091    (sizeof (x) == sizeof (long double) ? gl_isfinitel (x) : \
1092     sizeof (x) == sizeof (double) ? gl_isfinited (x) : \
1093     gl_isfinitef (x))
1094 # endif
1095 # ifdef __cplusplus
1096 #  ifdef isfinite
1097 _GL_MATH_CXX_REAL_FLOATING_DECL_1 (isfinite)
1098 #   undef isfinite
1099 _GL_MATH_CXX_REAL_FLOATING_DECL_2 (isfinite)
1100 #  endif
1101 # endif
1102 #elif defined GNULIB_POSIXCHECK
1103 # if defined isfinite
1104 _GL_WARN_REAL_FLOATING_DECL (isfinite);
1105 #  undef isfinite
1106 #  define isfinite(x) _GL_WARN_REAL_FLOATING_IMPL (isfinite, x)
1107 # endif
1108 #endif
1109
1110
1111 #if @GNULIB_ISINF@
1112 # if @REPLACE_ISINF@
1113 _GL_EXTERN_C int gl_isinff (float x);
1114 _GL_EXTERN_C int gl_isinfd (double x);
1115 _GL_EXTERN_C int gl_isinfl (long double x);
1116 #  undef isinf
1117 #  define isinf(x) \
1118    (sizeof (x) == sizeof (long double) ? gl_isinfl (x) : \
1119     sizeof (x) == sizeof (double) ? gl_isinfd (x) : \
1120     gl_isinff (x))
1121 # endif
1122 # ifdef __cplusplus
1123 #  ifdef isinf
1124 _GL_MATH_CXX_REAL_FLOATING_DECL_1 (isinf)
1125 #   undef isinf
1126 _GL_MATH_CXX_REAL_FLOATING_DECL_2 (isinf)
1127 #  endif
1128 # endif
1129 #elif defined GNULIB_POSIXCHECK
1130 # if defined isinf
1131 _GL_WARN_REAL_FLOATING_DECL (isinf);
1132 #  undef isinf
1133 #  define isinf(x) _GL_WARN_REAL_FLOATING_IMPL (isinf, x)
1134 # endif
1135 #endif
1136
1137
1138 #if @GNULIB_ISNANF@
1139 /* Test for NaN for 'float' numbers.  */
1140 # if @HAVE_ISNANF@
1141 /* The original <math.h> included above provides a declaration of isnan macro
1142    or (older) isnanf function.  */
1143 #  if __GNUC__ >= 4
1144     /* GCC 4.0 and newer provides three built-ins for isnan.  */
1145 #   undef isnanf
1146 #   define isnanf(x) __builtin_isnanf ((float)(x))
1147 #  elif defined isnan
1148 #   undef isnanf
1149 #   define isnanf(x) isnan ((float)(x))
1150 #  endif
1151 # else
1152 /* Test whether X is a NaN.  */
1153 #  undef isnanf
1154 #  define isnanf rpl_isnanf
1155 _GL_EXTERN_C int isnanf (float x);
1156 # endif
1157 #endif
1158
1159 #if @GNULIB_ISNAND@
1160 /* Test for NaN for 'double' numbers.
1161    This function is a gnulib extension, unlike isnan() which applied only
1162    to 'double' numbers earlier but now is a type-generic macro.  */
1163 # if @HAVE_ISNAND@
1164 /* The original <math.h> included above provides a declaration of isnan
1165    macro.  */
1166 #  if __GNUC__ >= 4
1167     /* GCC 4.0 and newer provides three built-ins for isnan.  */
1168 #   undef isnand
1169 #   define isnand(x) __builtin_isnan ((double)(x))
1170 #  else
1171 #   undef isnand
1172 #   define isnand(x) isnan ((double)(x))
1173 #  endif
1174 # else
1175 /* Test whether X is a NaN.  */
1176 #  undef isnand
1177 #  define isnand rpl_isnand
1178 _GL_EXTERN_C int isnand (double x);
1179 # endif
1180 #endif
1181
1182 #if @GNULIB_ISNANL@
1183 /* Test for NaN for 'long double' numbers.  */
1184 # if @HAVE_ISNANL@
1185 /* The original <math.h> included above provides a declaration of isnan
1186    macro or (older) isnanl function.  */
1187 #  if __GNUC__ >= 4
1188     /* GCC 4.0 and newer provides three built-ins for isnan.  */
1189 #   undef isnanl
1190 #   define isnanl(x) __builtin_isnanl ((long double)(x))
1191 #  elif defined isnan
1192 #   undef isnanl
1193 #   define isnanl(x) isnan ((long double)(x))
1194 #  endif
1195 # else
1196 /* Test whether X is a NaN.  */
1197 #  undef isnanl
1198 #  define isnanl rpl_isnanl
1199 _GL_EXTERN_C int isnanl (long double x);
1200 # endif
1201 #endif
1202
1203 /* This must come *after* the snippets for GNULIB_ISNANF and GNULIB_ISNANL!  */
1204 #if @GNULIB_ISNAN@
1205 # if @REPLACE_ISNAN@
1206 /* We can't just use the isnanf macro (e.g.) as exposed by
1207    isnanf.h (e.g.) here, because those may end up being macros
1208    that recursively expand back to isnan.  So use the gnulib
1209    replacements for them directly. */
1210 #  if @HAVE_ISNANF@ && __GNUC__ >= 4
1211 #   define gl_isnan_f(x) __builtin_isnanf ((float)(x))
1212 #  else
1213 _GL_EXTERN_C int rpl_isnanf (float x);
1214 #   define gl_isnan_f(x) rpl_isnanf (x)
1215 #  endif
1216 #  if @HAVE_ISNAND@ && __GNUC__ >= 4
1217 #   define gl_isnan_d(x) __builtin_isnan ((double)(x))
1218 #  else
1219 _GL_EXTERN_C int rpl_isnand (double x);
1220 #   define gl_isnan_d(x) rpl_isnand (x)
1221 #  endif
1222 #  if @HAVE_ISNANL@ && __GNUC__ >= 4
1223 #   define gl_isnan_l(x) __builtin_isnanl ((long double)(x))
1224 #  else
1225 _GL_EXTERN_C int rpl_isnanl (long double x);
1226 #   define gl_isnan_l(x) rpl_isnanl (x)
1227 #  endif
1228 #  undef isnan
1229 #  define isnan(x) \
1230    (sizeof (x) == sizeof (long double) ? gl_isnan_l (x) : \
1231     sizeof (x) == sizeof (double) ? gl_isnan_d (x) : \
1232     gl_isnan_f (x))
1233 # elif __GNUC__ >= 4
1234 #  undef isnan
1235 #  define isnan(x) \
1236    (sizeof (x) == sizeof (long double) ? __builtin_isnanl ((long double)(x)) : \
1237     sizeof (x) == sizeof (double) ? __builtin_isnan ((double)(x)) : \
1238     __builtin_isnanf ((float)(x)))
1239 # endif
1240 # ifdef __cplusplus
1241 #  ifdef isnan
1242 _GL_MATH_CXX_REAL_FLOATING_DECL_1 (isnan)
1243 #   undef isnan
1244 _GL_MATH_CXX_REAL_FLOATING_DECL_2 (isnan)
1245 #  endif
1246 # else
1247 /* Ensure isnan is a macro.  */
1248 #  ifndef isnan
1249 #   define isnan isnan
1250 #  endif
1251 # endif
1252 #elif defined GNULIB_POSIXCHECK
1253 # if defined isnan
1254 _GL_WARN_REAL_FLOATING_DECL (isnan);
1255 #  undef isnan
1256 #  define isnan(x) _GL_WARN_REAL_FLOATING_IMPL (isnan, x)
1257 # endif
1258 #endif
1259
1260
1261 #if @GNULIB_SIGNBIT@
1262 # if @REPLACE_SIGNBIT_USING_GCC@
1263 #  undef signbit
1264    /* GCC 4.0 and newer provides three built-ins for signbit.  */
1265 #  define signbit(x) \
1266    (sizeof (x) == sizeof (long double) ? __builtin_signbitl (x) : \
1267     sizeof (x) == sizeof (double) ? __builtin_signbit (x) : \
1268     __builtin_signbitf (x))
1269 # endif
1270 # if @REPLACE_SIGNBIT@
1271 #  undef signbit
1272 _GL_EXTERN_C int gl_signbitf (float arg);
1273 _GL_EXTERN_C int gl_signbitd (double arg);
1274 _GL_EXTERN_C int gl_signbitl (long double arg);
1275 #  if __GNUC__ >= 2 && !defined __STRICT_ANSI__
1276 #   define _GL_NUM_UINT_WORDS(type) \
1277       ((sizeof (type) + sizeof (unsigned int) - 1) / sizeof (unsigned int))
1278 #   if defined FLT_SIGNBIT_WORD && defined FLT_SIGNBIT_BIT && !defined gl_signbitf
1279 #    define gl_signbitf_OPTIMIZED_MACRO
1280 #    define gl_signbitf(arg) \
1281        ({ union { float _value;                                         \
1282                   unsigned int _word[_GL_NUM_UINT_WORDS (float)];       \
1283                 } _m;                                                   \
1284           _m._value = (arg);                                            \
1285           (_m._word[FLT_SIGNBIT_WORD] >> FLT_SIGNBIT_BIT) & 1;          \
1286         })
1287 #   endif
1288 #   if defined DBL_SIGNBIT_WORD && defined DBL_SIGNBIT_BIT && !defined gl_signbitd
1289 #    define gl_signbitd_OPTIMIZED_MACRO
1290 #    define gl_signbitd(arg) \
1291        ({ union { double _value;                                        \
1292                   unsigned int _word[_GL_NUM_UINT_WORDS (double)];      \
1293                 } _m;                                                   \
1294           _m._value = (arg);                                            \
1295           (_m._word[DBL_SIGNBIT_WORD] >> DBL_SIGNBIT_BIT) & 1;          \
1296         })
1297 #   endif
1298 #   if defined LDBL_SIGNBIT_WORD && defined LDBL_SIGNBIT_BIT && !defined gl_signbitl
1299 #    define gl_signbitl_OPTIMIZED_MACRO
1300 #    define gl_signbitl(arg) \
1301        ({ union { long double _value;                                   \
1302                   unsigned int _word[_GL_NUM_UINT_WORDS (long double)]; \
1303                 } _m;                                                   \
1304           _m._value = (arg);                                            \
1305           (_m._word[LDBL_SIGNBIT_WORD] >> LDBL_SIGNBIT_BIT) & 1;        \
1306         })
1307 #   endif
1308 #  endif
1309 #  define signbit(x) \
1310    (sizeof (x) == sizeof (long double) ? gl_signbitl (x) : \
1311     sizeof (x) == sizeof (double) ? gl_signbitd (x) : \
1312     gl_signbitf (x))
1313 # endif
1314 # ifdef __cplusplus
1315 #  ifdef signbit
1316 _GL_MATH_CXX_REAL_FLOATING_DECL_1 (signbit)
1317 #   undef signbit
1318 _GL_MATH_CXX_REAL_FLOATING_DECL_2 (signbit)
1319 #  endif
1320 # endif
1321 #elif defined GNULIB_POSIXCHECK
1322 # if defined signbit
1323 _GL_WARN_REAL_FLOATING_DECL (signbit);
1324 #  undef signbit
1325 #  define signbit(x) _GL_WARN_REAL_FLOATING_IMPL (signbit, x)
1326 # endif
1327 #endif
1328
1329
1330 #endif /* _@GUARD_PREFIX@_MATH_H */
1331 #endif /* _@GUARD_PREFIX@_MATH_H */