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