tests/test-math-c++.cc

   1 /* Test of <math.h> substitute in C++ mode.
   2    Copyright (C) 2010-2011 Free Software Foundation, Inc.
   3
   4    This program is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation; either version 3 of the License, or
   7    (at your option) any later version.
   8
   9    This program is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12    GNU General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  16
  17 /* Written by Bruno Haible <bruno@clisp.org>, 2010.  */
  18
  19 #define GNULIB_NAMESPACE gnulib
  20 #include <config.h>
  21
  22 #include <math.h>
  23
  24 #include "signature.h"
  25
  26 /* Signature check for a function that takes a real-floating argument.
  27    Check that each overloaded function with the specified signature exists.  */
  28 #define REAL_FLOATING_CHECK(func,\
  29                             rettype1, parameters1,\
  30                             rettype2, parameters2,\
  31                             rettype3, parameters3) \
  32   OVERLOADED_CHECK (func, rettype1, parameters1, _1); \
  33   OVERLOADED_CHECK (func, rettype2, parameters2, _2); \
  34   OVERLOADED_CHECK (func, rettype3, parameters3, _3)
  35 #define OVERLOADED_CHECK(func, rettype, parameters, suffix) \
  36   static rettype (* _GL_UNUSED signature_check_ ## func ## suffix) parameters \
  37     = static_cast<rettype(*)parameters>(func)
  38
  39
  40 /* Keep these checks in the same order as math.in.h!  */
  41
  42 #if GNULIB_TEST_ACOSF
  43 SIGNATURE_CHECK (GNULIB_NAMESPACE::acosf, float, (float));
  44 #endif
  45 //SIGNATURE_CHECK (GNULIB_NAMESPACE::acos, double, (double));
  46 #if GNULIB_TEST_ACOSL
  47 SIGNATURE_CHECK (GNULIB_NAMESPACE::acosl, long double, (long double));
  48 #endif
  49
  50 #if GNULIB_TEST_ASINF
  51 SIGNATURE_CHECK (GNULIB_NAMESPACE::asinf, float, (float));
  52 #endif
  53 //SIGNATURE_CHECK (GNULIB_NAMESPACE::asin, double, (double));
  54 #if GNULIB_TEST_ASINL
  55 SIGNATURE_CHECK (GNULIB_NAMESPACE::asinl, long double, (long double));
  56 #endif
  57
  58 #if GNULIB_TEST_ATANF
  59 SIGNATURE_CHECK (GNULIB_NAMESPACE::atanf, float, (float));
  60 #endif
  61 //SIGNATURE_CHECK (GNULIB_NAMESPACE::atan, double, (double));
  62 #if GNULIB_TEST_ATANL
  63 SIGNATURE_CHECK (GNULIB_NAMESPACE::atanl, long double, (long double));
  64 #endif
  65
  66 #if GNULIB_TEST_ATAN2F
  67 SIGNATURE_CHECK (GNULIB_NAMESPACE::atan2f, float, (float, float));
  68 #endif
  69 //SIGNATURE_CHECK (GNULIB_NAMESPACE::atan2, double, (double, double));
  70
  71 //SIGNATURE_CHECK (GNULIB_NAMESPACE::cbrt, double, (double));
  72
  73 #if GNULIB_TEST_CEILF
  74 SIGNATURE_CHECK (GNULIB_NAMESPACE::ceilf, float, (float));
  75 #endif
  76 #if GNULIB_TEST_CEIL
  77 SIGNATURE_CHECK (GNULIB_NAMESPACE::ceil, double, (double));
  78 #endif
  79 #if GNULIB_TEST_CEILL
  80 SIGNATURE_CHECK (GNULIB_NAMESPACE::ceill, long double, (long double));
  81 #endif
  82
  83 #if GNULIB_TEST_COPYSIGNF
  84 SIGNATURE_CHECK (GNULIB_NAMESPACE::copysignf, float, (float, float));
  85 #endif
  86 #if GNULIB_TEST_COPYSIGN
  87 SIGNATURE_CHECK (GNULIB_NAMESPACE::copysign, double, (double, double));
  88 #endif
  89 #if GNULIB_TEST_COPYSIGNL
  90 SIGNATURE_CHECK (GNULIB_NAMESPACE::copysignl, long double,
  91                  (long double, long double));
  92 #endif
  93
  94 #if GNULIB_TEST_COSF
  95 SIGNATURE_CHECK (GNULIB_NAMESPACE::cosf, float, (float));
  96 #endif
  97 //SIGNATURE_CHECK (GNULIB_NAMESPACE::cos, double, (double));
  98 #if GNULIB_TEST_COSL
  99 SIGNATURE_CHECK (GNULIB_NAMESPACE::cosl, long double, (long double));
 100 #endif
 101
 102 #if GNULIB_TEST_COSHF
 103 SIGNATURE_CHECK (GNULIB_NAMESPACE::coshf, float, (float));
 104 #endif
 105 //SIGNATURE_CHECK (GNULIB_NAMESPACE::cosh, double, (double));
 106
 107 //SIGNATURE_CHECK (GNULIB_NAMESPACE::erf, double, (double));
 108
 109 //SIGNATURE_CHECK (GNULIB_NAMESPACE::erfc, double, (double));
 110
 111 #if GNULIB_TEST_EXPF
 112 SIGNATURE_CHECK (GNULIB_NAMESPACE::expf, float, (float));
 113 #endif
 114 //SIGNATURE_CHECK (GNULIB_NAMESPACE::exp, double, (double));
 115 #if GNULIB_TEST_EXPL
 116 SIGNATURE_CHECK (GNULIB_NAMESPACE::expl, long double, (long double));
 117 #endif
 118
 119 #if GNULIB_TEST_FABSF
 120 SIGNATURE_CHECK (GNULIB_NAMESPACE::fabsf, float, (float));
 121 #endif
 122 //SIGNATURE_CHECK (GNULIB_NAMESPACE::fabs, double, (double));
 123
 124 #if GNULIB_TEST_FLOORF
 125 SIGNATURE_CHECK (GNULIB_NAMESPACE::floorf, float, (float));
 126 #endif
 127 #if GNULIB_TEST_FLOOR
 128 SIGNATURE_CHECK (GNULIB_NAMESPACE::floor, double, (double));
 129 #endif
 130 #if GNULIB_TEST_FLOORL
 131 SIGNATURE_CHECK (GNULIB_NAMESPACE::floorl, long double, (long double));
 132 #endif
 133
 134 #if GNULIB_TEST_FMODF
 135 SIGNATURE_CHECK (GNULIB_NAMESPACE::fmodf, float, (float, float));
 136 #endif
 137 //SIGNATURE_CHECK (GNULIB_NAMESPACE::fmod, double, (double, double));
 138
 139 #if GNULIB_TEST_FREXPF
 140 SIGNATURE_CHECK (GNULIB_NAMESPACE::frexpf, float, (float, int *));
 141 #endif
 142 #if GNULIB_TEST_FREXP
 143 SIGNATURE_CHECK (GNULIB_NAMESPACE::frexp, double, (double, int *));
 144 #endif
 145 #if GNULIB_TEST_FREXPL
 146 SIGNATURE_CHECK (GNULIB_NAMESPACE::frexpl, long double, (long double, int *));
 147 #endif
 148
 149 //SIGNATURE_CHECK (GNULIB_NAMESPACE::hypot, double, (double, double));
 150
 151 //SIGNATURE_CHECK (GNULIB_NAMESPACE::j0, double, (double));
 152
 153 //SIGNATURE_CHECK (GNULIB_NAMESPACE::j1, double, (double));
 154
 155 //SIGNATURE_CHECK (GNULIB_NAMESPACE::jn, double, (int, double));
 156
 157 #if GNULIB_TEST_LDEXPF
 158 SIGNATURE_CHECK (GNULIB_NAMESPACE::ldexpf, float, (float, int));
 159 #endif
 160 //SIGNATURE_CHECK (GNULIB_NAMESPACE::ldexp, double, (double, int));
 161 #if GNULIB_TEST_LDEXPL
 162 SIGNATURE_CHECK (GNULIB_NAMESPACE::ldexpl, long double, (long double, int));
 163 #endif
 164
 165 //SIGNATURE_CHECK (GNULIB_NAMESPACE::lgamma, double, (double));
 166
 167 //SIGNATURE_CHECK (GNULIB_NAMESPACE::log10, double, (double));
 168
 169 //SIGNATURE_CHECK (GNULIB_NAMESPACE::log1p, double, (double));
 170
 171 //SIGNATURE_CHECK (GNULIB_NAMESPACE::logb, double, (double));
 172
 173 #if GNULIB_TEST_LOGF
 174 SIGNATURE_CHECK (GNULIB_NAMESPACE::logf, float, (float));
 175 #endif
 176 //SIGNATURE_CHECK (GNULIB_NAMESPACE::log, double, (double));
 177 #if GNULIB_TEST_LOGL
 178 SIGNATURE_CHECK (GNULIB_NAMESPACE::logl, long double, (long double));
 179 #endif
 180
 181 #if GNULIB_TEST_LOG10F
 182 SIGNATURE_CHECK (GNULIB_NAMESPACE::log10f, float, (float));
 183 #endif
 184
 185 #if GNULIB_TEST_MODFF
 186 SIGNATURE_CHECK (GNULIB_NAMESPACE::modff, float, (float, float *));
 187 #endif
 188 //SIGNATURE_CHECK (GNULIB_NAMESPACE::modf, double, (double, double *));
 189
 190 //SIGNATURE_CHECK (GNULIB_NAMESPACE::nextafter, double, (double, double));
 191
 192 #if GNULIB_TEST_POWF
 193 SIGNATURE_CHECK (GNULIB_NAMESPACE::powf, float, (float, float));
 194 #endif
 195 //SIGNATURE_CHECK (GNULIB_NAMESPACE::pow, double, (double, double));
 196
 197 //SIGNATURE_CHECK (GNULIB_NAMESPACE::remainder, double, (double, double));
 198
 199 #if GNULIB_TEST_RINTF
 200 SIGNATURE_CHECK (GNULIB_NAMESPACE::rintf, float, (float));
 201 #endif
 202 #if GNULIB_TEST_RINT
 203 SIGNATURE_CHECK (GNULIB_NAMESPACE::rint, double, (double));
 204 #endif
 205 #if GNULIB_TEST_RINTL
 206 SIGNATURE_CHECK (GNULIB_NAMESPACE::rintl, long double, (long double));
 207 #endif
 208
 209 #if GNULIB_TEST_ROUNDF
 210 SIGNATURE_CHECK (GNULIB_NAMESPACE::roundf, float, (float));
 211 #endif
 212 #if GNULIB_TEST_ROUND
 213 SIGNATURE_CHECK (GNULIB_NAMESPACE::round, double, (double));
 214 #endif
 215 #if GNULIB_TEST_ROUNDL
 216 SIGNATURE_CHECK (GNULIB_NAMESPACE::roundl, long double, (long double));
 217 #endif
 218
 219 #if GNULIB_TEST_SINF
 220 SIGNATURE_CHECK (GNULIB_NAMESPACE::sinf, float, (float));
 221 #endif
 222 //SIGNATURE_CHECK (GNULIB_NAMESPACE::sin, double, (double));
 223 #if GNULIB_TEST_SINL
 224 SIGNATURE_CHECK (GNULIB_NAMESPACE::sinl, long double, (long double));
 225 #endif
 226
 227 #if GNULIB_TEST_SINHF
 228 SIGNATURE_CHECK (GNULIB_NAMESPACE::sinhf, float, (float));
 229 #endif
 230 //SIGNATURE_CHECK (GNULIB_NAMESPACE::sinh, double, (double));
 231
 232 #if GNULIB_TEST_SQRTF
 233 SIGNATURE_CHECK (GNULIB_NAMESPACE::sqrtf, float, (float));
 234 #endif
 235 //SIGNATURE_CHECK (GNULIB_NAMESPACE::sqrt, double, (double));
 236 #if GNULIB_TEST_SQRTL
 237 SIGNATURE_CHECK (GNULIB_NAMESPACE::sqrtl, long double, (long double));
 238 #endif
 239
 240 #if GNULIB_TEST_TANF
 241 SIGNATURE_CHECK (GNULIB_NAMESPACE::tanf, float, (float));
 242 #endif
 243 //SIGNATURE_CHECK (GNULIB_NAMESPACE::tan, double, (double));
 244 #if GNULIB_TEST_TANL
 245 SIGNATURE_CHECK (GNULIB_NAMESPACE::tanl, long double, (long double));
 246 #endif
 247
 248 #if GNULIB_TEST_TANHF
 249 SIGNATURE_CHECK (GNULIB_NAMESPACE::tanhf, float, (float));
 250 #endif
 251 //SIGNATURE_CHECK (GNULIB_NAMESPACE::tanh, double, (double));
 252
 253 #if GNULIB_TEST_TRUNCF
 254 SIGNATURE_CHECK (GNULIB_NAMESPACE::truncf, float, (float));
 255 #endif
 256 #if GNULIB_TEST_TRUNC
 257 SIGNATURE_CHECK (GNULIB_NAMESPACE::trunc, double, (double));
 258 #endif
 259 #if GNULIB_TEST_TRUNCL
 260 SIGNATURE_CHECK (GNULIB_NAMESPACE::truncl, long double, (long double));
 261 #endif
 262
 263 //SIGNATURE_CHECK (GNULIB_NAMESPACE::y0, double, (double));
 264
 265 //SIGNATURE_CHECK (GNULIB_NAMESPACE::y1, double, (double));
 266
 267 //SIGNATURE_CHECK (GNULIB_NAMESPACE::yn, double, (int, double));
 268
 269 #if GNULIB_TEST_ISFINITE
 270 # ifdef isfinite
 271 #  error "isfinite should not be a macro in C++"
 272 # endif
 273 REAL_FLOATING_CHECK (isfinite, int, (float), int, (double), int, (long double));
 274 #endif
 275
 276 #if GNULIB_TEST_ISINF
 277 # ifdef isinf
 278 #  error "isinf should not be a macro in C++"
 279 # endif
 280 REAL_FLOATING_CHECK (isinf, int, (float), int, (double), int, (long double));
 281 #endif
 282
 283 #if GNULIB_TEST_ISNAN
 284 # ifdef isnan
 285 #  error "isnan should not be a macro in C++"
 286 # endif
 287 REAL_FLOATING_CHECK (isnan, int, (float), int, (double), int, (long double));
 288 #endif
 289
 290 #if GNULIB_TEST_SIGNBIT
 291 # ifdef signbit
 292 #  error "signbit should not be a macro in C++"
 293 # endif
 294 REAL_FLOATING_CHECK (signbit, int, (float), int, (double), int, (long double));
 295 #endif
 296
 297
 298 int
 299 main ()
 300 {
 301 }