e7899ff4483e8dad1b25188852cd43f7dab6bbea
[gnulib.git] / lib / math.in.h
1 /* A GNU-like <math.h>.
2
3    Copyright (C) 2002-2003, 2007-2011 Free Software Foundation, Inc.
4
5    This program is free software: you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 3 of the License, or
8    (at your option) any later version.
9
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details.
14
15    You should have received a copy of the GNU General Public License
16    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
17
18 #ifndef _@GUARD_PREFIX@_MATH_H
19
20 #if __GNUC__ >= 3
21 @PRAGMA_SYSTEM_HEADER@
22 #endif
23 @PRAGMA_COLUMNS@
24
25 /* The include_next requires a split double-inclusion guard.  */
26 #@INCLUDE_NEXT_AS_FIRST_DIRECTIVE@ @NEXT_AS_FIRST_DIRECTIVE_MATH_H@
27
28 #ifndef _@GUARD_PREFIX@_MATH_H
29 #define _@GUARD_PREFIX@_MATH_H
30
31
32 /* The definitions of _GL_FUNCDECL_RPL etc. are copied here.  */
33
34 /* The definition of _GL_ARG_NONNULL is copied here.  */
35
36 /* The definition of _GL_WARN_ON_USE is copied here.  */
37
38 /* Helper macros to define a portability warning for the
39    classification macro FUNC called with VALUE.  POSIX declares the
40    classification macros with an argument of real-floating (that is,
41    one of float, double, or long double).  */
42 #define _GL_WARN_REAL_FLOATING_DECL(func) \
43 static inline int                                                   \
44 rpl_ ## func ## f (float f)                                         \
45 {                                                                   \
46   return func (f);                                                  \
47 }                                                                   \
48 static inline int                                                   \
49 rpl_ ## func ## d (double d)                                        \
50 {                                                                   \
51   return func (d);                                                  \
52 }                                                                   \
53 static inline int                                                   \
54 rpl_ ## func ## l (long double l)                                   \
55 {                                                                   \
56   return func (l);                                                  \
57 }                                                                   \
58 _GL_WARN_ON_USE (rpl_ ## func ## f, #func " is unportable - "       \
59                  "use gnulib module " #func " for portability");    \
60 _GL_WARN_ON_USE (rpl_ ## func ## d, #func " is unportable - "       \
61                  "use gnulib module " #func " for portability");    \
62 _GL_WARN_ON_USE (rpl_ ## func ## l, #func " is unportable - "       \
63                  "use gnulib module " #func " for portability")
64 #define _GL_WARN_REAL_FLOATING_IMPL(func, value) \
65   (sizeof (value) == sizeof (float) ? rpl_ ## func ## f (value)     \
66    : sizeof (value) == sizeof (double) ? rpl_ ## func ## d (value)  \
67    : rpl_ ## func ## l (value))
68
69
70 #if @REPLACE_ITOLD@
71 /* Pull in a function that fixes the 'int' to 'long double' conversion
72    of glibc 2.7.  */
73 _GL_EXTERN_C void _Qp_itoq (long double *, int);
74 static void (*_gl_math_fix_itold) (long double *, int) = _Qp_itoq;
75 #endif
76
77
78 /* POSIX allows platforms that don't support NAN.  But all major
79    machines in the past 15 years have supported something close to
80    IEEE NaN, so we define this unconditionally.  We also must define
81    it on platforms like Solaris 10, where NAN is present but defined
82    as a function pointer rather than a floating point constant.  */
83 #if !defined NAN || @REPLACE_NAN@
84 # if !GNULIB_defined_NAN
85 #  undef NAN
86   /* The Compaq (ex-DEC) C 6.4 compiler and the Microsoft MSVC 9 compiler
87      choke on the expression 0.0 / 0.0.  */
88 #  if defined __DECC || defined _MSC_VER
89 static float
90 _NaN ()
91 {
92   static float zero = 0.0f;
93   return zero / zero;
94 }
95 #   define NAN (_NaN())
96 #  else
97 #   define NAN (0.0f / 0.0f)
98 #  endif
99 #  define GNULIB_defined_NAN 1
100 # endif
101 #endif
102
103 /* Solaris 10 defines HUGE_VAL, but as a function pointer rather
104    than a floating point constant.  */
105 #if @REPLACE_HUGE_VAL@
106 # undef HUGE_VAL
107 # define HUGE_VAL (1.0 / 0.0)
108 #endif
109
110
111 #if @GNULIB_ACOSF@
112 # if !@HAVE_ACOSF@
113 #  undef acosf
114 _GL_FUNCDECL_SYS (acosf, float, (float x));
115 # endif
116 _GL_CXXALIAS_SYS (acosf, float, (float x));
117 _GL_CXXALIASWARN (acosf);
118 #elif defined GNULIB_POSIXCHECK
119 # undef acosf
120 # if HAVE_RAW_DECL_ACOSF
121 _GL_WARN_ON_USE (acosf, "acosf is unportable - "
122                  "use gnulib module acosf for portability");
123 # endif
124 #endif
125
126 #if @GNULIB_ACOSL@
127 # if !@HAVE_ACOSL@ || !@HAVE_DECL_ACOSL@
128 _GL_FUNCDECL_SYS (acosl, long double, (long double x));
129 # endif
130 _GL_CXXALIAS_SYS (acosl, long double, (long double x));
131 _GL_CXXALIASWARN (acosl);
132 #elif defined GNULIB_POSIXCHECK
133 # undef acosl
134 # if HAVE_RAW_DECL_ACOSL
135 _GL_WARN_ON_USE (acosl, "acosl is unportable - "
136                  "use gnulib module mathl for portability");
137 # endif
138 #endif
139
140
141 #if @GNULIB_ASINF@
142 # if !@HAVE_ASINF@
143 #  undef asinf
144 _GL_FUNCDECL_SYS (asinf, float, (float x));
145 # endif
146 _GL_CXXALIAS_SYS (asinf, float, (float x));
147 _GL_CXXALIASWARN (asinf);
148 #elif defined GNULIB_POSIXCHECK
149 # undef asinf
150 # if HAVE_RAW_DECL_ASINF
151 _GL_WARN_ON_USE (asinf, "asinf is unportable - "
152                  "use gnulib module asinf for portability");
153 # endif
154 #endif
155
156 #if @GNULIB_ASINL@
157 # if !@HAVE_ASINL@ || !@HAVE_DECL_ASINL@
158 _GL_FUNCDECL_SYS (asinl, long double, (long double x));
159 # endif
160 _GL_CXXALIAS_SYS (asinl, long double, (long double x));
161 _GL_CXXALIASWARN (asinl);
162 #elif defined GNULIB_POSIXCHECK
163 # undef asinl
164 # if HAVE_RAW_DECL_ASINL
165 _GL_WARN_ON_USE (asinl, "asinl is unportable - "
166                  "use gnulib module mathl for portability");
167 # endif
168 #endif
169
170
171 #if @GNULIB_ATANF@
172 # if !@HAVE_ATANF@
173 #  undef atanf
174 _GL_FUNCDECL_SYS (atanf, float, (float x));
175 # endif
176 _GL_CXXALIAS_SYS (atanf, float, (float x));
177 _GL_CXXALIASWARN (atanf);
178 #elif defined GNULIB_POSIXCHECK
179 # undef atanf
180 # if HAVE_RAW_DECL_ATANF
181 _GL_WARN_ON_USE (atanf, "atanf is unportable - "
182                  "use gnulib module atanf for portability");
183 # endif
184 #endif
185
186 #if @GNULIB_ATANL@
187 # if !@HAVE_ATANL@ || !@HAVE_DECL_ATANL@
188 _GL_FUNCDECL_SYS (atanl, long double, (long double x));
189 # endif
190 _GL_CXXALIAS_SYS (atanl, long double, (long double x));
191 _GL_CXXALIASWARN (atanl);
192 #elif defined GNULIB_POSIXCHECK
193 # undef atanl
194 # if HAVE_RAW_DECL_ATANL
195 _GL_WARN_ON_USE (atanl, "atanl is unportable - "
196                  "use gnulib module mathl for portability");
197 # endif
198 #endif
199
200
201 #if @GNULIB_ATAN2F@
202 # if !@HAVE_ATAN2F@
203 #  undef atan2f
204 _GL_FUNCDECL_SYS (atan2f, float, (float y, float x));
205 # endif
206 _GL_CXXALIAS_SYS (atan2f, float, (float y, float x));
207 _GL_CXXALIASWARN (atan2f);
208 #elif defined GNULIB_POSIXCHECK
209 # undef atan2f
210 # if HAVE_RAW_DECL_ATAN2F
211 _GL_WARN_ON_USE (atan2f, "atan2f is unportable - "
212                  "use gnulib module atan2f for portability");
213 # endif
214 #endif
215
216
217 #if @GNULIB_CEILF@
218 # if @REPLACE_CEILF@
219 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
220 #   undef ceilf
221 #   define ceilf rpl_ceilf
222 #  endif
223 _GL_FUNCDECL_RPL (ceilf, float, (float x));
224 _GL_CXXALIAS_RPL (ceilf, float, (float x));
225 # else
226 #  if !@HAVE_DECL_CEILF@
227 _GL_FUNCDECL_SYS (ceilf, float, (float x));
228 #  endif
229 _GL_CXXALIAS_SYS (ceilf, float, (float x));
230 # endif
231 _GL_CXXALIASWARN (ceilf);
232 #elif defined GNULIB_POSIXCHECK
233 # undef ceilf
234 # if HAVE_RAW_DECL_CEILF
235 _GL_WARN_ON_USE (ceilf, "ceilf is unportable - "
236                  "use gnulib module ceilf for portability");
237 # endif
238 #endif
239
240 #if @GNULIB_CEIL@
241 # if @REPLACE_CEIL@
242 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
243 #   define ceil rpl_ceil
244 #  endif
245 _GL_FUNCDECL_RPL (ceil, double, (double x));
246 _GL_CXXALIAS_RPL (ceil, double, (double x));
247 # else
248 _GL_CXXALIAS_SYS (ceil, double, (double x));
249 # endif
250 _GL_CXXALIASWARN (ceil);
251 #endif
252
253 #if @GNULIB_CEILL@
254 # if @REPLACE_CEILL@
255 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
256 #   undef ceill
257 #   define ceill rpl_ceill
258 #  endif
259 _GL_FUNCDECL_RPL (ceill, long double, (long double x));
260 _GL_CXXALIAS_RPL (ceill, long double, (long double x));
261 # else
262 #  if !@HAVE_DECL_CEILL@
263 _GL_FUNCDECL_SYS (ceill, long double, (long double x));
264 #  endif
265 _GL_CXXALIAS_SYS (ceill, long double, (long double x));
266 # endif
267 _GL_CXXALIASWARN (ceill);
268 #elif defined GNULIB_POSIXCHECK
269 # undef ceill
270 # if HAVE_RAW_DECL_CEILL
271 _GL_WARN_ON_USE (ceill, "ceill is unportable - "
272                  "use gnulib module ceill for portability");
273 # endif
274 #endif
275
276
277 #if @GNULIB_COSF@
278 # if !@HAVE_COSF@
279 #  undef cosf
280 _GL_FUNCDECL_SYS (cosf, float, (float x));
281 # endif
282 _GL_CXXALIAS_SYS (cosf, float, (float x));
283 _GL_CXXALIASWARN (cosf);
284 #elif defined GNULIB_POSIXCHECK
285 # undef cosf
286 # if HAVE_RAW_DECL_COSF
287 _GL_WARN_ON_USE (cosf, "cosf is unportable - "
288                  "use gnulib module cosf for portability");
289 # endif
290 #endif
291
292 #if @GNULIB_COSL@
293 # if !@HAVE_COSL@ || !@HAVE_DECL_COSL@
294 _GL_FUNCDECL_SYS (cosl, long double, (long double x));
295 # endif
296 _GL_CXXALIAS_SYS (cosl, long double, (long double x));
297 _GL_CXXALIASWARN (cosl);
298 #elif defined GNULIB_POSIXCHECK
299 # undef cosl
300 # if HAVE_RAW_DECL_COSL
301 _GL_WARN_ON_USE (cosl, "cosl is unportable - "
302                  "use gnulib module mathl for portability");
303 # endif
304 #endif
305
306
307 #if @GNULIB_EXPF@
308 # if !@HAVE_EXPF@
309 #  undef expf
310 _GL_FUNCDECL_SYS (expf, float, (float x));
311 # endif
312 _GL_CXXALIAS_SYS (expf, float, (float x));
313 _GL_CXXALIASWARN (expf);
314 #elif defined GNULIB_POSIXCHECK
315 # undef expf
316 # if HAVE_RAW_DECL_EXPF
317 _GL_WARN_ON_USE (expf, "expf is unportable - "
318                  "use gnulib module expf for portability");
319 # endif
320 #endif
321
322 #if @GNULIB_EXPL@
323 # if !@HAVE_EXPL@ || !@HAVE_DECL_EXPL@
324 _GL_FUNCDECL_SYS (expl, long double, (long double x));
325 # endif
326 _GL_CXXALIAS_SYS (expl, long double, (long double x));
327 _GL_CXXALIASWARN (expl);
328 #elif defined GNULIB_POSIXCHECK
329 # undef expl
330 # if HAVE_RAW_DECL_EXPL
331 _GL_WARN_ON_USE (expl, "expl is unportable - "
332                  "use gnulib module mathl for portability");
333 # endif
334 #endif
335
336
337 #if @GNULIB_FABSF@
338 # if !@HAVE_FABSF@
339 #  undef fabsf
340 _GL_FUNCDECL_SYS (fabsf, float, (float x));
341 # endif
342 _GL_CXXALIAS_SYS (fabsf, float, (float x));
343 _GL_CXXALIASWARN (fabsf);
344 #elif defined GNULIB_POSIXCHECK
345 # undef fabsf
346 # if HAVE_RAW_DECL_FABSF
347 _GL_WARN_ON_USE (fabsf, "fabsf is unportable - "
348                  "use gnulib module fabsf for portability");
349 # endif
350 #endif
351
352
353 #if @GNULIB_FLOORF@
354 # if @REPLACE_FLOORF@
355 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
356 #   undef floorf
357 #   define floorf rpl_floorf
358 #  endif
359 _GL_FUNCDECL_RPL (floorf, float, (float x));
360 _GL_CXXALIAS_RPL (floorf, float, (float x));
361 # else
362 #  if !@HAVE_DECL_FLOORF@
363 _GL_FUNCDECL_SYS (floorf, float, (float x));
364 #  endif
365 _GL_CXXALIAS_SYS (floorf, float, (float x));
366 # endif
367 _GL_CXXALIASWARN (floorf);
368 #elif defined GNULIB_POSIXCHECK
369 # undef floorf
370 # if HAVE_RAW_DECL_FLOORF
371 _GL_WARN_ON_USE (floorf, "floorf is unportable - "
372                  "use gnulib module floorf for portability");
373 # endif
374 #endif
375
376 #if @GNULIB_FLOOR@
377 # if @REPLACE_FLOOR@
378 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
379 #   define floor rpl_floor
380 #  endif
381 _GL_FUNCDECL_RPL (floor, double, (double x));
382 _GL_CXXALIAS_RPL (floor, double, (double x));
383 # else
384 _GL_CXXALIAS_SYS (floor, double, (double x));
385 # endif
386 _GL_CXXALIASWARN (floor);
387 #endif
388
389 #if @GNULIB_FLOORL@
390 # if @REPLACE_FLOORL@
391 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
392 #   undef floorl
393 #   define floorl rpl_floorl
394 #  endif
395 _GL_FUNCDECL_RPL (floorl, long double, (long double x));
396 _GL_CXXALIAS_RPL (floorl, long double, (long double x));
397 # else
398 #  if !@HAVE_DECL_FLOORL@
399 _GL_FUNCDECL_SYS (floorl, long double, (long double x));
400 #  endif
401 _GL_CXXALIAS_SYS (floorl, long double, (long double x));
402 # endif
403 _GL_CXXALIASWARN (floorl);
404 #elif defined GNULIB_POSIXCHECK
405 # undef floorl
406 # if HAVE_RAW_DECL_FLOORL
407 _GL_WARN_ON_USE (floorl, "floorl is unportable - "
408                  "use gnulib module floorl for portability");
409 # endif
410 #endif
411
412
413 #if @GNULIB_FMODF@
414 # if !@HAVE_FMODF@
415 #  undef fmodf
416 _GL_FUNCDECL_SYS (fmodf, float, (float x, float y));
417 # endif
418 _GL_CXXALIAS_SYS (fmodf, float, (float x, float y));
419 _GL_CXXALIASWARN (fmodf);
420 #elif defined GNULIB_POSIXCHECK
421 # undef fmodf
422 # if HAVE_RAW_DECL_FMODF
423 _GL_WARN_ON_USE (fmodf, "fmodf is unportable - "
424                  "use gnulib module fmodf for portability");
425 # endif
426 #endif
427
428
429 /* Write x as
430      x = mantissa * 2^exp
431    where
432      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
433      If x is zero: mantissa = x, exp = 0.
434      If x is infinite or NaN: mantissa = x, exp unspecified.
435    Store exp in *EXPPTR and return mantissa.  */
436 #if @GNULIB_FREXPF@
437 # if @REPLACE_FREXPF@
438 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
439 #   undef frexpf
440 #   define frexpf rpl_frexpf
441 #  endif
442 _GL_FUNCDECL_RPL (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
443 _GL_CXXALIAS_RPL (frexpf, float, (float x, int *expptr));
444 # else
445 #  if !@HAVE_FREXPF@
446 #   undef frexpf
447 _GL_FUNCDECL_SYS (frexpf, float, (float x, int *expptr) _GL_ARG_NONNULL ((2)));
448 #  endif
449 _GL_CXXALIAS_SYS (frexpf, float, (float x, int *expptr));
450 # endif
451 _GL_CXXALIASWARN (frexpf);
452 #elif defined GNULIB_POSIXCHECK
453 # undef frexpf
454 # if HAVE_RAW_DECL_FREXPF
455 _GL_WARN_ON_USE (frexpf, "frexpf is unportable - "
456                  "use gnulib module frexpf for portability");
457 # endif
458 #endif
459
460 /* Write x as
461      x = mantissa * 2^exp
462    where
463      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
464      If x is zero: mantissa = x, exp = 0.
465      If x is infinite or NaN: mantissa = x, exp unspecified.
466    Store exp in *EXPPTR and return mantissa.  */
467 #if @GNULIB_FREXP@
468 # if @REPLACE_FREXP@
469 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
470 #   define frexp rpl_frexp
471 #  endif
472 _GL_FUNCDECL_RPL (frexp, double, (double x, int *expptr) _GL_ARG_NONNULL ((2)));
473 _GL_CXXALIAS_RPL (frexp, double, (double x, int *expptr));
474 # else
475 _GL_CXXALIAS_SYS (frexp, double, (double x, int *expptr));
476 # endif
477 _GL_CXXALIASWARN (frexp);
478 #elif defined GNULIB_POSIXCHECK
479 # undef frexp
480 /* Assume frexp is always declared.  */
481 _GL_WARN_ON_USE (frexp, "frexp is unportable - "
482                  "use gnulib module frexp for portability");
483 #endif
484
485 /* Write x as
486      x = mantissa * 2^exp
487    where
488      If x finite and nonzero: 0.5 <= |mantissa| < 1.0.
489      If x is zero: mantissa = x, exp = 0.
490      If x is infinite or NaN: mantissa = x, exp unspecified.
491    Store exp in *EXPPTR and return mantissa.  */
492 #if @GNULIB_FREXPL@ && @REPLACE_FREXPL@
493 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
494 #  undef frexpl
495 #  define frexpl rpl_frexpl
496 # endif
497 _GL_FUNCDECL_RPL (frexpl, long double,
498                   (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
499 _GL_CXXALIAS_RPL (frexpl, long double, (long double x, int *expptr));
500 #else
501 # if !@HAVE_DECL_FREXPL@
502 _GL_FUNCDECL_SYS (frexpl, long double,
503                   (long double x, int *expptr) _GL_ARG_NONNULL ((2)));
504 # endif
505 # if @GNULIB_FREXPL@
506 _GL_CXXALIAS_SYS (frexpl, long double, (long double x, int *expptr));
507 # endif
508 #endif
509 #if @GNULIB_FREXPL@ && !(@REPLACE_FREXPL@ && !@HAVE_DECL_FREXPL@)
510 _GL_CXXALIASWARN (frexpl);
511 #endif
512 #if !@GNULIB_FREXPL@ && defined GNULIB_POSIXCHECK
513 # undef frexpl
514 # if HAVE_RAW_DECL_FREXPL
515 _GL_WARN_ON_USE (frexpl, "frexpl is unportable - "
516                  "use gnulib module frexpl for portability");
517 # endif
518 #endif
519
520
521 /* Return x * 2^exp.  */
522 #if @GNULIB_LDEXPF@
523 # if !@HAVE_LDEXPF@
524 #  undef ldexpf
525 _GL_FUNCDECL_SYS (ldexpf, float, (float x, int exp));
526 # endif
527 _GL_CXXALIAS_SYS (ldexpf, float, (float x, int exp));
528 _GL_CXXALIASWARN (ldexpf);
529 #elif defined GNULIB_POSIXCHECK
530 # undef ldexpf
531 # if HAVE_RAW_DECL_LDEXPF
532 _GL_WARN_ON_USE (ldexpf, "ldexpf is unportable - "
533                  "use gnulib module ldexpf for portability");
534 # endif
535 #endif
536
537 /* Return x * 2^exp.  */
538 #if @GNULIB_LDEXPL@ && @REPLACE_LDEXPL@
539 # if !(defined __cplusplus && defined GNULIB_NAMESPACE)
540 #  undef ldexpl
541 #  define ldexpl rpl_ldexpl
542 # endif
543 _GL_FUNCDECL_RPL (ldexpl, long double, (long double x, int exp));
544 _GL_CXXALIAS_RPL (ldexpl, long double, (long double x, int exp));
545 #else
546 # if !@HAVE_DECL_LDEXPL@
547 _GL_FUNCDECL_SYS (ldexpl, long double, (long double x, int exp));
548 # endif
549 # if @GNULIB_LDEXPL@
550 _GL_CXXALIAS_SYS (ldexpl, long double, (long double x, int exp));
551 # endif
552 #endif
553 #if @GNULIB_LDEXPL@
554 _GL_CXXALIASWARN (ldexpl);
555 #endif
556 #if !@GNULIB_LDEXPL@ && defined GNULIB_POSIXCHECK
557 # undef ldexpl
558 # if HAVE_RAW_DECL_LDEXPL
559 _GL_WARN_ON_USE (ldexpl, "ldexpl is unportable - "
560                  "use gnulib module ldexpl for portability");
561 # endif
562 #endif
563
564
565 #if @GNULIB_LOGB@
566 # if !@HAVE_DECL_LOGB@
567 _GL_EXTERN_C double logb (double x);
568 # endif
569 #elif defined GNULIB_POSIXCHECK
570 # undef logb
571 # if HAVE_RAW_DECL_LOGB
572 _GL_WARN_ON_USE (logb, "logb is unportable - "
573                  "use gnulib module logb for portability");
574 # endif
575 #endif
576
577
578 #if @GNULIB_LOGF@
579 # if !@HAVE_LOGF@
580 #  undef logf
581 _GL_FUNCDECL_SYS (logf, float, (float x));
582 # endif
583 _GL_CXXALIAS_SYS (logf, float, (float x));
584 _GL_CXXALIASWARN (logf);
585 #elif defined GNULIB_POSIXCHECK
586 # undef logf
587 # if HAVE_RAW_DECL_LOGF
588 _GL_WARN_ON_USE (logf, "logf is unportable - "
589                  "use gnulib module logf for portability");
590 # endif
591 #endif
592
593 #if @GNULIB_LOGL@
594 # if !@HAVE_LOGL@ || !@HAVE_DECL_LOGL@
595 _GL_FUNCDECL_SYS (logl, long double, (long double x));
596 # endif
597 _GL_CXXALIAS_SYS (logl, long double, (long double x));
598 _GL_CXXALIASWARN (logl);
599 #elif defined GNULIB_POSIXCHECK
600 # undef logl
601 # if HAVE_RAW_DECL_LOGL
602 _GL_WARN_ON_USE (logl, "logl is unportable - "
603                  "use gnulib module mathl for portability");
604 # endif
605 #endif
606
607
608 #if @GNULIB_LOG10F@
609 # if !@HAVE_LOG10F@
610 #  undef log10f
611 _GL_FUNCDECL_SYS (log10f, float, (float x));
612 # endif
613 _GL_CXXALIAS_SYS (log10f, float, (float x));
614 _GL_CXXALIASWARN (log10f);
615 #elif defined GNULIB_POSIXCHECK
616 # undef log10f
617 # if HAVE_RAW_DECL_LOG10F
618 _GL_WARN_ON_USE (log10f, "log10f is unportable - "
619                  "use gnulib module log10f for portability");
620 # endif
621 #endif
622
623
624 #if @GNULIB_MODFF@
625 # if !@HAVE_MODFF@
626 #  undef modff
627 _GL_FUNCDECL_SYS (modff, float, (float x, float *iptr) _GL_ARG_NONNULL ((2)));
628 # endif
629 _GL_CXXALIAS_SYS (modff, float, (float x, float *iptr));
630 _GL_CXXALIASWARN (modff);
631 #elif defined GNULIB_POSIXCHECK
632 # undef modff
633 # if HAVE_RAW_DECL_MODFF
634 _GL_WARN_ON_USE (modff, "modff is unportable - "
635                  "use gnulib module modff for portability");
636 # endif
637 #endif
638
639
640 #if @GNULIB_POWF@
641 # if !@HAVE_POWF@
642 #  undef powf
643 _GL_FUNCDECL_SYS (powf, float, (float x, float y));
644 # endif
645 _GL_CXXALIAS_SYS (powf, float, (float x, float y));
646 _GL_CXXALIASWARN (powf);
647 #elif defined GNULIB_POSIXCHECK
648 # undef powf
649 # if HAVE_RAW_DECL_POWF
650 _GL_WARN_ON_USE (powf, "powf is unportable - "
651                  "use gnulib module powf for portability");
652 # endif
653 #endif
654
655
656 #if @GNULIB_ROUNDF@
657 # if @REPLACE_ROUNDF@
658 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
659 #   undef roundf
660 #   define roundf rpl_roundf
661 #  endif
662 _GL_FUNCDECL_RPL (roundf, float, (float x));
663 _GL_CXXALIAS_RPL (roundf, float, (float x));
664 # else
665 #  if !@HAVE_DECL_ROUNDF@
666 _GL_FUNCDECL_SYS (roundf, float, (float x));
667 #  endif
668 _GL_CXXALIAS_SYS (roundf, float, (float x));
669 # endif
670 _GL_CXXALIASWARN (roundf);
671 #elif defined GNULIB_POSIXCHECK
672 # undef roundf
673 # if HAVE_RAW_DECL_ROUNDF
674 _GL_WARN_ON_USE (roundf, "roundf is unportable - "
675                  "use gnulib module roundf for portability");
676 # endif
677 #endif
678
679 #if @GNULIB_ROUND@
680 # if @REPLACE_ROUND@
681 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
682 #   undef round
683 #   define round rpl_round
684 #  endif
685 _GL_FUNCDECL_RPL (round, double, (double x));
686 _GL_CXXALIAS_RPL (round, double, (double x));
687 # else
688 #  if !@HAVE_DECL_ROUND@
689 _GL_FUNCDECL_SYS (round, double, (double x));
690 #  endif
691 _GL_CXXALIAS_SYS (round, double, (double x));
692 # endif
693 _GL_CXXALIASWARN (round);
694 #elif defined GNULIB_POSIXCHECK
695 # undef round
696 # if HAVE_RAW_DECL_ROUND
697 _GL_WARN_ON_USE (round, "round is unportable - "
698                  "use gnulib module round for portability");
699 # endif
700 #endif
701
702 #if @GNULIB_ROUNDL@
703 # if @REPLACE_ROUNDL@
704 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
705 #   undef roundl
706 #   define roundl rpl_roundl
707 #  endif
708 _GL_FUNCDECL_RPL (roundl, long double, (long double x));
709 _GL_CXXALIAS_RPL (roundl, long double, (long double x));
710 # else
711 #  if !@HAVE_DECL_ROUNDL@
712 _GL_FUNCDECL_SYS (roundl, long double, (long double x));
713 #  endif
714 _GL_CXXALIAS_SYS (roundl, long double, (long double x));
715 # endif
716 _GL_CXXALIASWARN (roundl);
717 #elif defined GNULIB_POSIXCHECK
718 # undef roundl
719 # if HAVE_RAW_DECL_ROUNDL
720 _GL_WARN_ON_USE (roundl, "roundl is unportable - "
721                  "use gnulib module roundl for portability");
722 # endif
723 #endif
724
725
726 #if @GNULIB_SINF@
727 # if !@HAVE_SINF@
728 #  undef sinf
729 _GL_FUNCDECL_SYS (sinf, float, (float x));
730 # endif
731 _GL_CXXALIAS_SYS (sinf, float, (float x));
732 _GL_CXXALIASWARN (sinf);
733 #elif defined GNULIB_POSIXCHECK
734 # undef sinf
735 # if HAVE_RAW_DECL_SINF
736 _GL_WARN_ON_USE (sinf, "sinf is unportable - "
737                  "use gnulib module sinf for portability");
738 # endif
739 #endif
740
741 #if @GNULIB_SINL@
742 # if !@HAVE_SINL@ || !@HAVE_DECL_SINL@
743 _GL_FUNCDECL_SYS (sinl, long double, (long double x));
744 # endif
745 _GL_CXXALIAS_SYS (sinl, long double, (long double x));
746 _GL_CXXALIASWARN (sinl);
747 #elif defined GNULIB_POSIXCHECK
748 # undef sinl
749 # if HAVE_RAW_DECL_SINL
750 _GL_WARN_ON_USE (sinl, "sinl is unportable - "
751                  "use gnulib module mathl for portability");
752 # endif
753 #endif
754
755
756 #if @GNULIB_SINHF@
757 # if !@HAVE_SINHF@
758 #  undef sinhf
759 _GL_FUNCDECL_SYS (sinhf, float, (float x));
760 # endif
761 _GL_CXXALIAS_SYS (sinhf, float, (float x));
762 _GL_CXXALIASWARN (sinhf);
763 #elif defined GNULIB_POSIXCHECK
764 # undef sinhf
765 # if HAVE_RAW_DECL_SINHF
766 _GL_WARN_ON_USE (sinhf, "sinhf is unportable - "
767                  "use gnulib module sinhf for portability");
768 # endif
769 #endif
770
771
772 #if @GNULIB_SQRTF@
773 # if !@HAVE_SQRTF@
774 #  undef sqrtf
775 _GL_FUNCDECL_SYS (sqrtf, float, (float x));
776 # endif
777 _GL_CXXALIAS_SYS (sqrtf, float, (float x));
778 _GL_CXXALIASWARN (sqrtf);
779 #elif defined GNULIB_POSIXCHECK
780 # undef sqrtf
781 # if HAVE_RAW_DECL_SQRTF
782 _GL_WARN_ON_USE (sqrtf, "sqrtf is unportable - "
783                  "use gnulib module sqrtf for portability");
784 # endif
785 #endif
786
787 #if @GNULIB_SQRTL@
788 # if !@HAVE_SQRTL@ || !@HAVE_DECL_SQRTL@
789 _GL_FUNCDECL_SYS (sqrtl, long double, (long double x));
790 # endif
791 _GL_CXXALIAS_SYS (sqrtl, long double, (long double x));
792 _GL_CXXALIASWARN (sqrtl);
793 #elif defined GNULIB_POSIXCHECK
794 # undef sqrtl
795 # if HAVE_RAW_DECL_SQRTL
796 _GL_WARN_ON_USE (sqrtl, "sqrtl is unportable - "
797                  "use gnulib module mathl for portability");
798 # endif
799 #endif
800
801
802 #if @GNULIB_TANF@
803 # if !@HAVE_TANF@
804 #  undef tanf
805 _GL_FUNCDECL_SYS (tanf, float, (float x));
806 # endif
807 _GL_CXXALIAS_SYS (tanf, float, (float x));
808 _GL_CXXALIASWARN (tanf);
809 #elif defined GNULIB_POSIXCHECK
810 # undef tanf
811 # if HAVE_RAW_DECL_TANF
812 _GL_WARN_ON_USE (tanf, "tanf is unportable - "
813                  "use gnulib module tanf for portability");
814 # endif
815 #endif
816
817 #if @GNULIB_TANL@
818 # if !@HAVE_TANL@ || !@HAVE_DECL_TANL@
819 _GL_FUNCDECL_SYS (tanl, long double, (long double x));
820 # endif
821 _GL_CXXALIAS_SYS (tanl, long double, (long double x));
822 _GL_CXXALIASWARN (tanl);
823 #elif defined GNULIB_POSIXCHECK
824 # undef tanl
825 # if HAVE_RAW_DECL_TANL
826 _GL_WARN_ON_USE (tanl, "tanl is unportable - "
827                  "use gnulib module mathl for portability");
828 # endif
829 #endif
830
831
832 #if @GNULIB_TRUNCF@
833 # if @REPLACE_TRUNCF@
834 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
835 #   define truncf rpl_truncf
836 #  endif
837 _GL_FUNCDECL_RPL (truncf, float, (float x));
838 _GL_CXXALIAS_RPL (truncf, float, (float x));
839 # else
840 #  if !@HAVE_DECL_TRUNCF@
841 _GL_FUNCDECL_SYS (truncf, float, (float x));
842 #  endif
843 _GL_CXXALIAS_SYS (truncf, float, (float x));
844 # endif
845 _GL_CXXALIASWARN (truncf);
846 #elif defined GNULIB_POSIXCHECK
847 # undef truncf
848 # if HAVE_RAW_DECL_TRUNCF
849 _GL_WARN_ON_USE (truncf, "truncf is unportable - "
850                  "use gnulib module truncf for portability");
851 # endif
852 #endif
853
854 #if @GNULIB_TRUNC@
855 # if @REPLACE_TRUNC@
856 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
857 #   define trunc rpl_trunc
858 #  endif
859 _GL_FUNCDECL_RPL (trunc, double, (double x));
860 _GL_CXXALIAS_RPL (trunc, double, (double x));
861 # else
862 #  if !@HAVE_DECL_TRUNC@
863 _GL_FUNCDECL_SYS (trunc, double, (double x));
864 #  endif
865 _GL_CXXALIAS_SYS (trunc, double, (double x));
866 # endif
867 _GL_CXXALIASWARN (trunc);
868 #elif defined GNULIB_POSIXCHECK
869 # undef trunc
870 # if HAVE_RAW_DECL_TRUNC
871 _GL_WARN_ON_USE (trunc, "trunc is unportable - "
872                  "use gnulib module trunc for portability");
873 # endif
874 #endif
875
876 #if @GNULIB_TRUNCL@
877 # if @REPLACE_TRUNCL@
878 #  if !(defined __cplusplus && defined GNULIB_NAMESPACE)
879 #   undef truncl
880 #   define truncl rpl_truncl
881 #  endif
882 _GL_FUNCDECL_RPL (truncl, long double, (long double x));
883 _GL_CXXALIAS_RPL (truncl, long double, (long double x));
884 # else
885 #  if !@HAVE_DECL_TRUNCL@
886 _GL_FUNCDECL_SYS (truncl, long double, (long double x));
887 #  endif
888 _GL_CXXALIAS_SYS (truncl, long double, (long double x));
889 # endif
890 _GL_CXXALIASWARN (truncl);
891 #elif defined GNULIB_POSIXCHECK
892 # undef truncl
893 # if HAVE_RAW_DECL_TRUNCL
894 _GL_WARN_ON_USE (truncl, "truncl is unportable - "
895                  "use gnulib module truncl for portability");
896 # endif
897 #endif
898
899
900 /* Definitions of function-like macros come here, after the function
901    declarations.  */
902
903
904 #if @GNULIB_ISFINITE@
905 # if @REPLACE_ISFINITE@
906 _GL_EXTERN_C int gl_isfinitef (float x);
907 _GL_EXTERN_C int gl_isfinited (double x);
908 _GL_EXTERN_C int gl_isfinitel (long double x);
909 #  undef isfinite
910 #  define isfinite(x) \
911    (sizeof (x) == sizeof (long double) ? gl_isfinitel (x) : \
912     sizeof (x) == sizeof (double) ? gl_isfinited (x) : \
913     gl_isfinitef (x))
914 # endif
915 #elif defined GNULIB_POSIXCHECK
916 # if defined isfinite
917 _GL_WARN_REAL_FLOATING_DECL (isfinite);
918 #  undef isfinite
919 #  define isfinite(x) _GL_WARN_REAL_FLOATING_IMPL (isfinite, x)
920 # endif
921 #endif
922
923
924 #if @GNULIB_ISINF@
925 # if @REPLACE_ISINF@
926 _GL_EXTERN_C int gl_isinff (float x);
927 _GL_EXTERN_C int gl_isinfd (double x);
928 _GL_EXTERN_C int gl_isinfl (long double x);
929 #  undef isinf
930 #  define isinf(x) \
931    (sizeof (x) == sizeof (long double) ? gl_isinfl (x) : \
932     sizeof (x) == sizeof (double) ? gl_isinfd (x) : \
933     gl_isinff (x))
934 # endif
935 #elif defined GNULIB_POSIXCHECK
936 # if defined isinf
937 _GL_WARN_REAL_FLOATING_DECL (isinf);
938 #  undef isinf
939 #  define isinf(x) _GL_WARN_REAL_FLOATING_IMPL (isinf, x)
940 # endif
941 #endif
942
943
944 #if @GNULIB_ISNANF@
945 /* Test for NaN for 'float' numbers.  */
946 # if @HAVE_ISNANF@
947 /* The original <math.h> included above provides a declaration of isnan macro
948    or (older) isnanf function.  */
949 #  if __GNUC__ >= 4
950     /* GCC 4.0 and newer provides three built-ins for isnan.  */
951 #   undef isnanf
952 #   define isnanf(x) __builtin_isnanf ((float)(x))
953 #  elif defined isnan
954 #   undef isnanf
955 #   define isnanf(x) isnan ((float)(x))
956 #  endif
957 # else
958 /* Test whether X is a NaN.  */
959 #  undef isnanf
960 #  define isnanf rpl_isnanf
961 _GL_EXTERN_C int isnanf (float x);
962 # endif
963 #endif
964
965 #if @GNULIB_ISNAND@
966 /* Test for NaN for 'double' numbers.
967    This function is a gnulib extension, unlike isnan() which applied only
968    to 'double' numbers earlier but now is a type-generic macro.  */
969 # if @HAVE_ISNAND@
970 /* The original <math.h> included above provides a declaration of isnan
971    macro.  */
972 #  if __GNUC__ >= 4
973     /* GCC 4.0 and newer provides three built-ins for isnan.  */
974 #   undef isnand
975 #   define isnand(x) __builtin_isnan ((double)(x))
976 #  else
977 #   undef isnand
978 #   define isnand(x) isnan ((double)(x))
979 #  endif
980 # else
981 /* Test whether X is a NaN.  */
982 #  undef isnand
983 #  define isnand rpl_isnand
984 _GL_EXTERN_C int isnand (double x);
985 # endif
986 #endif
987
988 #if @GNULIB_ISNANL@
989 /* Test for NaN for 'long double' numbers.  */
990 # if @HAVE_ISNANL@
991 /* The original <math.h> included above provides a declaration of isnan
992    macro or (older) isnanl function.  */
993 #  if __GNUC__ >= 4
994     /* GCC 4.0 and newer provides three built-ins for isnan.  */
995 #   undef isnanl
996 #   define isnanl(x) __builtin_isnanl ((long double)(x))
997 #  elif defined isnan
998 #   undef isnanl
999 #   define isnanl(x) isnan ((long double)(x))
1000 #  endif
1001 # else
1002 /* Test whether X is a NaN.  */
1003 #  undef isnanl
1004 #  define isnanl rpl_isnanl
1005 _GL_EXTERN_C int isnanl (long double x);
1006 # endif
1007 #endif
1008
1009 /* This must come *after* the snippets for GNULIB_ISNANF and GNULIB_ISNANL!  */
1010 #if @GNULIB_ISNAN@
1011 # if @REPLACE_ISNAN@
1012 /* We can't just use the isnanf macro (e.g.) as exposed by
1013    isnanf.h (e.g.) here, because those may end up being macros
1014    that recursively expand back to isnan.  So use the gnulib
1015    replacements for them directly. */
1016 #  if @HAVE_ISNANF@ && __GNUC__ >= 4
1017 #   define gl_isnan_f(x) __builtin_isnanf ((float)(x))
1018 #  else
1019 _GL_EXTERN_C int rpl_isnanf (float x);
1020 #   define gl_isnan_f(x) rpl_isnanf (x)
1021 #  endif
1022 #  if @HAVE_ISNAND@ && __GNUC__ >= 4
1023 #   define gl_isnan_d(x) __builtin_isnan ((double)(x))
1024 #  else
1025 _GL_EXTERN_C int rpl_isnand (double x);
1026 #   define gl_isnan_d(x) rpl_isnand (x)
1027 #  endif
1028 #  if @HAVE_ISNANL@ && __GNUC__ >= 4
1029 #   define gl_isnan_l(x) __builtin_isnanl ((long double)(x))
1030 #  else
1031 _GL_EXTERN_C int rpl_isnanl (long double x);
1032 #   define gl_isnan_l(x) rpl_isnanl (x)
1033 #  endif
1034 #  undef isnan
1035 #  define isnan(x) \
1036    (sizeof (x) == sizeof (long double) ? gl_isnan_l (x) : \
1037     sizeof (x) == sizeof (double) ? gl_isnan_d (x) : \
1038     gl_isnan_f (x))
1039 # elif __GNUC__ >= 4
1040 #  undef isnan
1041 #  define isnan(x) \
1042    (sizeof (x) == sizeof (long double) ? __builtin_isnanl ((long double)(x)) : \
1043     sizeof (x) == sizeof (double) ? __builtin_isnan ((double)(x)) : \
1044     __builtin_isnanf ((float)(x)))
1045 # endif
1046 /* Ensure isnan is a macro.  */
1047 # ifndef isnan
1048 #  define isnan isnan
1049 # endif
1050 #elif defined GNULIB_POSIXCHECK
1051 # if defined isnan
1052 _GL_WARN_REAL_FLOATING_DECL (isnan);
1053 #  undef isnan
1054 #  define isnan(x) _GL_WARN_REAL_FLOATING_IMPL (isnan, x)
1055 # endif
1056 #endif
1057
1058
1059 #if @GNULIB_SIGNBIT@
1060 # if @REPLACE_SIGNBIT_USING_GCC@
1061 #  undef signbit
1062    /* GCC 4.0 and newer provides three built-ins for signbit.  */
1063 #  define signbit(x) \
1064    (sizeof (x) == sizeof (long double) ? __builtin_signbitl (x) : \
1065     sizeof (x) == sizeof (double) ? __builtin_signbit (x) : \
1066     __builtin_signbitf (x))
1067 # endif
1068 # if @REPLACE_SIGNBIT@
1069 #  undef signbit
1070 _GL_EXTERN_C int gl_signbitf (float arg);
1071 _GL_EXTERN_C int gl_signbitd (double arg);
1072 _GL_EXTERN_C int gl_signbitl (long double arg);
1073 #  if __GNUC__ >= 2 && !__STRICT_ANSI__
1074 #   define _GL_NUM_UINT_WORDS(type) \
1075       ((sizeof (type) + sizeof (unsigned int) - 1) / sizeof (unsigned int))
1076 #   if defined FLT_SIGNBIT_WORD && defined FLT_SIGNBIT_BIT && !defined gl_signbitf
1077 #    define gl_signbitf_OPTIMIZED_MACRO
1078 #    define gl_signbitf(arg) \
1079        ({ union { float _value;                                         \
1080                   unsigned int _word[_GL_NUM_UINT_WORDS (float)];       \
1081                 } _m;                                                   \
1082           _m._value = (arg);                                            \
1083           (_m._word[FLT_SIGNBIT_WORD] >> FLT_SIGNBIT_BIT) & 1;          \
1084         })
1085 #   endif
1086 #   if defined DBL_SIGNBIT_WORD && defined DBL_SIGNBIT_BIT && !defined gl_signbitd
1087 #    define gl_signbitd_OPTIMIZED_MACRO
1088 #    define gl_signbitd(arg) \
1089        ({ union { double _value;                                        \
1090                   unsigned int _word[_GL_NUM_UINT_WORDS (double)];      \
1091                 } _m;                                                   \
1092           _m._value = (arg);                                            \
1093           (_m._word[DBL_SIGNBIT_WORD] >> DBL_SIGNBIT_BIT) & 1;          \
1094         })
1095 #   endif
1096 #   if defined LDBL_SIGNBIT_WORD && defined LDBL_SIGNBIT_BIT && !defined gl_signbitl
1097 #    define gl_signbitl_OPTIMIZED_MACRO
1098 #    define gl_signbitl(arg) \
1099        ({ union { long double _value;                                   \
1100                   unsigned int _word[_GL_NUM_UINT_WORDS (long double)]; \
1101                 } _m;                                                   \
1102           _m._value = (arg);                                            \
1103           (_m._word[LDBL_SIGNBIT_WORD] >> LDBL_SIGNBIT_BIT) & 1;        \
1104         })
1105 #   endif
1106 #  endif
1107 #  define signbit(x) \
1108    (sizeof (x) == sizeof (long double) ? gl_signbitl (x) : \
1109     sizeof (x) == sizeof (double) ? gl_signbitd (x) : \
1110     gl_signbitf (x))
1111 # endif
1112 #elif defined GNULIB_POSIXCHECK
1113 # if defined signbit
1114 _GL_WARN_REAL_FLOATING_DECL (signbit);
1115 #  undef signbit
1116 #  define signbit(x) _GL_WARN_REAL_FLOATING_IMPL (signbit, x)
1117 # endif
1118 #endif
1119
1120
1121 #endif /* _@GUARD_PREFIX@_MATH_H */
1122 #endif /* _@GUARD_PREFIX@_MATH_H */