libstdc++-v3/testsuite/special_functions/09_cyl_bessel_k/check_nan.cc

   1 // { dg-do run { target c++11 } }
   2 // { dg-require-c-std "" }
   3 // { dg-options "-D__STDCPP_WANT_MATH_SPEC_FUNCS__" }
   4 // { dg-add-options ieee }
   5
   6 // Copyright (C) 2016-2018 Free Software Foundation, Inc.
   7 //
   8 // This file is part of the GNU ISO C++ Library.  This library is free
   9 // software; you can redistribute it and/or modify it under the
  10 // terms of the GNU General Public License as published by the
  11 // Free Software Foundation; either version 3, or (at your option)
  12 // any later version.
  13 //
  14 // This library is distributed in the hope that it will be useful,
  15 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  16 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17 // GNU General Public License for more details.
  18 //
  19 // You should have received a copy of the GNU General Public License along
  20 // with this library; see the file COPYING3.  If not see
  21 // <http://www.gnu.org/licenses/>.
  22
  23 // 8.1.9 cyl_bessel_k
  24
  25 #include <cmath>
  26 #include <testsuite_hooks.h>
  27
  28 void
  29 test01()
  30 {
  31   float xf = std::numeric_limits<float>::quiet_NaN();
  32   double xd = std::numeric_limits<double>::quiet_NaN();
  33   long double xl = std::numeric_limits<long double>::quiet_NaN();
  34
  35   float nuf = 0.0F;
  36   double nud = 0.0;
  37   long double nul = 0.0L;
  38
  39   float a = std::cyl_bessel_k(nuf, xf);
  40   float b = std::cyl_bessel_kf(nuf, xf);
  41   double c = std::cyl_bessel_k(nud, xd);
  42   long double d = std::cyl_bessel_k(nul, xl);
  43   long double e = std::cyl_bessel_kl(nul, xl);
  44
  45   VERIFY(std::isnan(a));
  46   VERIFY(std::isnan(b));
  47   VERIFY(std::isnan(c));
  48   VERIFY(std::isnan(d));
  49   VERIFY(std::isnan(e));
  50
  51   return;
  52 }
  53
  54 void
  55 test02()
  56 {
  57   float xf = 1.0F;
  58   double xd = 1.0;
  59   long double xl = 1.0L;
  60
  61   float nuf = std::numeric_limits<float>::quiet_NaN();
  62   double nud = std::numeric_limits<double>::quiet_NaN();
  63   long double nul = std::numeric_limits<long double>::quiet_NaN();
  64
  65   float a = std::cyl_bessel_k(nuf, xf);
  66   float b = std::cyl_bessel_kf(nuf, xf);
  67   double c = std::cyl_bessel_k(nud, xd);
  68   long double d = std::cyl_bessel_k(nul, xl);
  69   long double e = std::cyl_bessel_kl(nul, xl);
  70
  71   VERIFY(std::isnan(a));
  72   VERIFY(std::isnan(b));
  73   VERIFY(std::isnan(c));
  74   VERIFY(std::isnan(d));
  75   VERIFY(std::isnan(e));
  76
  77   return;
  78 }
  79
  80 int
  81 main()
  82 {
  83   test01();
  84   test02();
  85   return 0;
  86 }
  87