X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=tests%2Ftest-math-c%2B%2B.cc;h=c113eaf0f5261960b371a98f7672687db094bab2;hb=1276a2c5f24c0c932426aca9c899fa524d2443f2;hp=0b9a48db1d1fe7ef3d4c6d8ab8d7a2704a5a3d3c;hpb=20f0673b1b22f84e39b3bacae027cdc21be2ed39;p=gnulib.git

diff --git a/tests/test-math-c++.cc b/tests/test-math-c++.cc
index 0b9a48db1..c113eaf0f 100644
--- a/tests/test-math-c++.cc
+++ b/tests/test-math-c++.cc
@@ -1,5 +1,5 @@
 /* Test of <math.h> substitute in C++ mode.
-   Copyright (C) 2010-2011 Free Software Foundation, Inc.
+   Copyright (C) 2010-2014 Free Software Foundation, Inc.
 
    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -23,214 +23,381 @@
 
 #include "signature.h"
 
+/* Signature check for a function that takes a real-floating argument.
+   Check that each overloaded function with the specified signature exists.  */
+#define REAL_FLOATING_CHECK(func,\
+                            rettype1, parameters1,\
+                            rettype2, parameters2,\
+                            rettype3, parameters3) \
+  OVERLOADED_CHECK (func, rettype1, parameters1, _1); \
+  OVERLOADED_CHECK (func, rettype2, parameters2, _2); \
+  OVERLOADED_CHECK (func, rettype3, parameters3, _3)
+#define OVERLOADED_CHECK(func, rettype, parameters, suffix) \
+  static rettype (* _GL_UNUSED signature_check_ ## func ## suffix) parameters \
+    = static_cast<rettype(*)parameters>(func)
+
+
+/* Keep these checks in the same order as math.in.h!  */
 
 #if GNULIB_TEST_ACOSF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::acosf, float, (float));
 #endif
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::acos, double, (double));
+#if GNULIB_TEST_ACOSL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::acosl, long double, (long double));
+#endif
+
 #if GNULIB_TEST_ASINF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::asinf, float, (float));
 #endif
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::asin, double, (double));
+#if GNULIB_TEST_ASINL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::asinl, long double, (long double));
+#endif
+
 #if GNULIB_TEST_ATANF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::atanf, float, (float));
 #endif
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::atan, double, (double));
+#if GNULIB_TEST_ATANL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::atanl, long double, (long double));
+#endif
+
 #if GNULIB_TEST_ATAN2F
 SIGNATURE_CHECK (GNULIB_NAMESPACE::atan2f, float, (float, float));
 #endif
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::atan2, double, (double, double));
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::cbrt, double, (double));
+
+#if GNULIB_TEST_CBRTF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::cbrtf, float, (float));
+#endif
+#if GNULIB_TEST_CBRT
+SIGNATURE_CHECK (GNULIB_NAMESPACE::cbrt, double, (double));
+#endif
+#if GNULIB_TEST_CBRTL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::cbrtl, long double, (long double));
+#endif
+
+#if GNULIB_TEST_CEILF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::ceilf, float, (float));
+#endif
+#if GNULIB_TEST_CEIL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::ceil, double, (double));
+#endif
+#if GNULIB_TEST_CEILL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::ceill, long double, (long double));
+#endif
+
 #if GNULIB_TEST_COPYSIGNF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::copysignf, float, (float, float));
 #endif
 #if GNULIB_TEST_COPYSIGN
 SIGNATURE_CHECK (GNULIB_NAMESPACE::copysign, double, (double, double));
 #endif
+#if GNULIB_TEST_COPYSIGNL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::copysignl, long double,
+                 (long double, long double));
+#endif
+
 #if GNULIB_TEST_COSF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::cosf, float, (float));
 #endif
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::cos, double, (double));
+#if GNULIB_TEST_COSL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::cosl, long double, (long double));
+#endif
+
 #if GNULIB_TEST_COSHF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::coshf, float, (float));
 #endif
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::cosh, double, (double));
+
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::erf, double, (double));
+
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::erfc, double, (double));
+
 #if GNULIB_TEST_EXPF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::expf, float, (float));
 #endif
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::exp, double, (double));
+#if GNULIB_TEST_EXPL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::expl, long double, (long double));
+#endif
+
+#if GNULIB_TEST_EXP2F
+SIGNATURE_CHECK (GNULIB_NAMESPACE::exp2f, float, (float));
+#endif
+#if GNULIB_TEST_EXP2
+SIGNATURE_CHECK (GNULIB_NAMESPACE::exp2, double, (double));
+#endif
+#if GNULIB_TEST_EXP2L
+SIGNATURE_CHECK (GNULIB_NAMESPACE::exp2l, long double, (long double));
+#endif
+
+#if GNULIB_TEST_EXPM1F
+SIGNATURE_CHECK (GNULIB_NAMESPACE::expm1f, float, (float));
+#endif
+#if GNULIB_TEST_EXPM1
+SIGNATURE_CHECK (GNULIB_NAMESPACE::expm1, double, (double));
+#endif
+#if GNULIB_TEST_EXPM1L
+SIGNATURE_CHECK (GNULIB_NAMESPACE::expm1l, long double, (long double));
+#endif
+
 #if GNULIB_TEST_FABSF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::fabsf, float, (float));
 #endif
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::fabs, double, (double));
+#if GNULIB_TEST_FABSL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::fabsl, long double, (long double));
+#endif
+
+#if GNULIB_TEST_FLOORF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::floorf, float, (float));
+#endif
+#if GNULIB_TEST_FLOOR
+SIGNATURE_CHECK (GNULIB_NAMESPACE::floor, double, (double));
+#endif
+#if GNULIB_TEST_FLOORL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::floorl, long double, (long double));
+#endif
+
 #if GNULIB_TEST_FMODF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::fmodf, float, (float, float));
 #endif
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::fmod, double, (double, double));
+#if GNULIB_TEST_FMOD
+SIGNATURE_CHECK (GNULIB_NAMESPACE::fmod, double, (double, double));
+#endif
+#if GNULIB_TEST_FMODL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::fmodl, long double,
+                 (long double, long double));
+#endif
+
 #if GNULIB_TEST_FREXPF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::frexpf, float, (float, int *));
 #endif
 #if GNULIB_TEST_FREXP
 SIGNATURE_CHECK (GNULIB_NAMESPACE::frexp, double, (double, int *));
 #endif
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::hypot, double, (double, double));
+#if GNULIB_TEST_FREXPL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::frexpl, long double, (long double, int *));
+#endif
+
+#if GNULIB_TEST_HYPOTF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::hypotf, float, (float, float));
+#endif
+#if GNULIB_TEST_HYPOT
+SIGNATURE_CHECK (GNULIB_NAMESPACE::hypot, double, (double, double));
+#endif
+#if GNULIB_TEST_HYPOTL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::hypotl, long double,
+                 (long double, long double));
+#endif
+
+#if GNULIB_TEST_ILOGBF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::ilogbf, int, (float));
+#endif
+#if GNULIB_TEST_ILOGB
+SIGNATURE_CHECK (GNULIB_NAMESPACE::ilogb, int, (double));
+#endif
+#if GNULIB_TEST_ILOGBL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::ilogbl, int, (long double));
+#endif
+
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::j0, double, (double));
+
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::j1, double, (double));
+
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::jn, double, (int, double));
+
 #if GNULIB_TEST_LDEXPF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::ldexpf, float, (float, int));
 #endif
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::ldexp, double, (double, int));
+#if GNULIB_TEST_LDEXPL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::ldexpl, long double, (long double, int));
+#endif
+
 //SIGNATURE_CHECK (GNULIB_NAMESPACE::lgamma, double, (double));
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::log10, double, (double));
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::log1p, double, (double));
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::logb, double, (double));
-#if GNULIB_TEST_LOGF
-SIGNATURE_CHECK (GNULIB_NAMESPACE::logf, float, (float));
+
+#if GNULIB_TEST_LOG10
+SIGNATURE_CHECK (GNULIB_NAMESPACE::log10, double, (double));
 #endif
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::log, double, (double));
-#if GNULIB_TEST_LOG10F
-SIGNATURE_CHECK (GNULIB_NAMESPACE::log10f, float, (float));
+#if GNULIB_TEST_LOG10L
+SIGNATURE_CHECK (GNULIB_NAMESPACE::log10l, long double, (long double));
 #endif
-#if GNULIB_TEST_MODFF
-SIGNATURE_CHECK (GNULIB_NAMESPACE::modff, float, (float, float *));
+
+#if GNULIB_TEST_LOG1PF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::log1pf, float, (float));
 #endif
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::modf, double, (double, double *));
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::nextafter, double, (double, double));
-#if GNULIB_TEST_POWF
-SIGNATURE_CHECK (GNULIB_NAMESPACE::powf, float, (float, float));
+#if GNULIB_TEST_LOG1P
+SIGNATURE_CHECK (GNULIB_NAMESPACE::log1p, double, (double));
 #endif
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::pow, double, (double, double));
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::remainder, double, (double, double));
-#if GNULIB_TEST_RINTF
-SIGNATURE_CHECK (GNULIB_NAMESPACE::rintf, float, (float));
+#if GNULIB_TEST_LOG1PL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::log1pl, long double, (long double));
 #endif
-#if GNULIB_TEST_RINT
-SIGNATURE_CHECK (GNULIB_NAMESPACE::rint, double, (double));
+
+#if GNULIB_TEST_LOGF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::logf, float, (float));
 #endif
-#if GNULIB_TEST_SINF
-SIGNATURE_CHECK (GNULIB_NAMESPACE::sinf, float, (float));
+#if GNULIB_TEST_LOG
+SIGNATURE_CHECK (GNULIB_NAMESPACE::log, double, (double));
 #endif
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::sin, double, (double));
-#if GNULIB_TEST_SINHF
-SIGNATURE_CHECK (GNULIB_NAMESPACE::sinhf, float, (float));
+#if GNULIB_TEST_LOGL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::logl, long double, (long double));
 #endif
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::sinh, double, (double));
-#if GNULIB_TEST_SQRTF
-SIGNATURE_CHECK (GNULIB_NAMESPACE::sqrtf, float, (float));
+
+#if GNULIB_TEST_LOG10F
+SIGNATURE_CHECK (GNULIB_NAMESPACE::log10f, float, (float));
 #endif
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::sqrt, double, (double));
-#if GNULIB_TEST_TANF
-SIGNATURE_CHECK (GNULIB_NAMESPACE::tanf, float, (float));
+
+#if GNULIB_TEST_LOG2F
+SIGNATURE_CHECK (GNULIB_NAMESPACE::log2f, float, (float));
 #endif
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::tan, double, (double));
-#if GNULIB_TEST_TANHF
-SIGNATURE_CHECK (GNULIB_NAMESPACE::tanhf, float, (float));
+#if GNULIB_TEST_LOG2
+SIGNATURE_CHECK (GNULIB_NAMESPACE::log2, double, (double));
 #endif
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::tanh, double, (double));
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::y0, double, (double));
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::y1, double, (double));
-//SIGNATURE_CHECK (GNULIB_NAMESPACE::yn, double, (int, double));
-
-#if GNULIB_TEST_ACOSL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::acosl, long double, (long double));
+#if GNULIB_TEST_LOG2L
+SIGNATURE_CHECK (GNULIB_NAMESPACE::log2l, long double, (long double));
 #endif
 
-#if GNULIB_TEST_ASINL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::asinl, long double, (long double));
+#if GNULIB_TEST_LOGBF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::logbf, float, (float));
 #endif
-
-#if GNULIB_TEST_ATANL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::atanl, long double, (long double));
+#if GNULIB_TEST_LOGB
+SIGNATURE_CHECK (GNULIB_NAMESPACE::logb, double, (double));
 #endif
-
-#if GNULIB_TEST_CEILF
-SIGNATURE_CHECK (GNULIB_NAMESPACE::ceilf, float, (float));
+#if GNULIB_TEST_LOGBL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::logbl, long double, (long double));
 #endif
 
-#if GNULIB_TEST_CEIL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::ceil, double, (double));
+#if GNULIB_TEST_MODFF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::modff, float, (float, float *));
 #endif
-
-#if GNULIB_TEST_CEILL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::ceill, long double, (long double));
+#if GNULIB_TEST_MODF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::modf, double, (double, double *));
 #endif
-
-#if GNULIB_TEST_COPYSIGNL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::copysignl, long double,
-                 (long double, long double));
+#if GNULIB_TEST_MODFL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::modfl, long double,
+                 (long double, long double *));
 #endif
 
-#if GNULIB_TEST_COSL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::cosl, long double, (long double));
-#endif
+//SIGNATURE_CHECK (GNULIB_NAMESPACE::nextafter, double, (double, double));
 
-#if GNULIB_TEST_EXPL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::expl, long double, (long double));
+#if GNULIB_TEST_POWF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::powf, float, (float, float));
 #endif
+//SIGNATURE_CHECK (GNULIB_NAMESPACE::pow, double, (double, double));
 
-#if GNULIB_TEST_FLOORF
-SIGNATURE_CHECK (GNULIB_NAMESPACE::floorf, float, (float));
+#if GNULIB_TEST_REMAINDERF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::remainderf, float, (float, float));
 #endif
-
-#if GNULIB_TEST_FLOOR
-SIGNATURE_CHECK (GNULIB_NAMESPACE::floor, double, (double));
+#if GNULIB_TEST_REMAINDER
+SIGNATURE_CHECK (GNULIB_NAMESPACE::remainder, double, (double, double));
 #endif
-
-#if GNULIB_TEST_FLOORL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::floorl, long double, (long double));
+#if GNULIB_TEST_REMAINDERL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::remainderl, long double,
+                 (long double, long double));
 #endif
 
-#if GNULIB_TEST_FREXPL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::frexpl, long double, (long double, int *));
+#if GNULIB_TEST_RINTF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::rintf, float, (float));
 #endif
-
-#if GNULIB_TEST_LDEXPL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::ldexpl, long double, (long double, int));
+#if GNULIB_TEST_RINT
+SIGNATURE_CHECK (GNULIB_NAMESPACE::rint, double, (double));
 #endif
-
-#if GNULIB_TEST_LOGL
-SIGNATURE_CHECK (GNULIB_NAMESPACE::logl, long double, (long double));
+#if GNULIB_TEST_RINTL
+SIGNATURE_CHECK (GNULIB_NAMESPACE::rintl, long double, (long double));
 #endif
 
 #if GNULIB_TEST_ROUNDF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::roundf, float, (float));
 #endif
-
 #if GNULIB_TEST_ROUND
 SIGNATURE_CHECK (GNULIB_NAMESPACE::round, double, (double));
 #endif
-
 #if GNULIB_TEST_ROUNDL
 SIGNATURE_CHECK (GNULIB_NAMESPACE::roundl, long double, (long double));
 #endif
 
+#if GNULIB_TEST_SINF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::sinf, float, (float));
+#endif
+//SIGNATURE_CHECK (GNULIB_NAMESPACE::sin, double, (double));
 #if GNULIB_TEST_SINL
 SIGNATURE_CHECK (GNULIB_NAMESPACE::sinl, long double, (long double));
 #endif
 
+#if GNULIB_TEST_SINHF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::sinhf, float, (float));
+#endif
+//SIGNATURE_CHECK (GNULIB_NAMESPACE::sinh, double, (double));
+
+#if GNULIB_TEST_SQRTF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::sqrtf, float, (float));
+#endif
+//SIGNATURE_CHECK (GNULIB_NAMESPACE::sqrt, double, (double));
 #if GNULIB_TEST_SQRTL
 SIGNATURE_CHECK (GNULIB_NAMESPACE::sqrtl, long double, (long double));
 #endif
 
+#if GNULIB_TEST_TANF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::tanf, float, (float));
+#endif
+//SIGNATURE_CHECK (GNULIB_NAMESPACE::tan, double, (double));
 #if GNULIB_TEST_TANL
 SIGNATURE_CHECK (GNULIB_NAMESPACE::tanl, long double, (long double));
 #endif
 
+#if GNULIB_TEST_TANHF
+SIGNATURE_CHECK (GNULIB_NAMESPACE::tanhf, float, (float));
+#endif
+//SIGNATURE_CHECK (GNULIB_NAMESPACE::tanh, double, (double));
+
 #if GNULIB_TEST_TRUNCF
 SIGNATURE_CHECK (GNULIB_NAMESPACE::truncf, float, (float));
 #endif
-
 #if GNULIB_TEST_TRUNC
 SIGNATURE_CHECK (GNULIB_NAMESPACE::trunc, double, (double));
 #endif
-
 #if GNULIB_TEST_TRUNCL
 SIGNATURE_CHECK (GNULIB_NAMESPACE::truncl, long double, (long double));
 #endif
 
+//SIGNATURE_CHECK (GNULIB_NAMESPACE::y0, double, (double));
+
+//SIGNATURE_CHECK (GNULIB_NAMESPACE::y1, double, (double));
+
+//SIGNATURE_CHECK (GNULIB_NAMESPACE::yn, double, (int, double));
+
+#if GNULIB_TEST_ISFINITE
+# ifdef isfinite
+#  error "isfinite should not be a macro in C++"
+# endif
+REAL_FLOATING_CHECK (isfinite, int, (float), int, (double), int, (long double));
+#endif
+
+#if GNULIB_TEST_ISINF
+# ifdef isinf
+#  error "isinf should not be a macro in C++"
+# endif
+REAL_FLOATING_CHECK (isinf, int, (float), int, (double), int, (long double));
+#endif
+
+#if GNULIB_TEST_ISNAN
+# ifdef isnan
+#  error "isnan should not be a macro in C++"
+# endif
+REAL_FLOATING_CHECK (isnan, int, (float), int, (double), int, (long double));
+#endif
+
+#if GNULIB_TEST_SIGNBIT
+# ifdef signbit
+#  error "signbit should not be a macro in C++"
+# endif
+REAL_FLOATING_CHECK (signbit, int, (float), int, (double), int, (long double));
+#endif
+
 
 int
 main ()