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