libstdc++-v3/testsuite/special_functions/16_laguerre/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-2024 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.16 laguerre
  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   unsigned int n = 2;
  36
  37   float a = std::laguerre(n, xf);
  38   float b = std::laguerref(n, xf);
  39   double c = std::laguerre(n, xd);
  40   long double d = std::laguerre(n, xl);
  41   long double e = std::laguerrel(n, xl);
  42
  43   VERIFY(std::isnan(a));
  44   VERIFY(std::isnan(b));
  45   VERIFY(std::isnan(c));
  46   VERIFY(std::isnan(d));
  47   VERIFY(std::isnan(e));
  48
  49   return;
  50 }
  51
  52 int
  53 main()
  54 {
  55   test01();
  56   return 0;
  57 }
  58