root/maint/gnulib/tests/infinity.h

/* */

INCLUDED FROM

DEFINITIONS

1. Infinityf
2. Infinityd
3. Infinityl

   1 /* Macros for infinity.
   2    Copyright (C) 2011-2021 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 <https://www.gnu.org/licenses/>.  */
  16 
  17 
  18 /* Infinityf () returns a 'float' +Infinity.  */
  19 
  20 /* The Microsoft MSVC 9 compiler chokes on the expression 1.0f / 0.0f.
  21    The IBM XL C compiler on z/OS complains.
  22    PGI 16.10 complains.  */
  23 #if defined _MSC_VER || (defined __MVS__ && defined __IBMC__) || defined __PGI
  24 static float
  25 Infinityf ()
     /*  */
  26 {
  27   static float zero = 0.0f;
  28   return 1.0f / zero;
  29 }
  30 #else
  31 # define Infinityf() (1.0f / 0.0f)
  32 #endif
  33 
  34 
  35 /* Infinityd () returns a 'double' +Infinity.  */
  36 
  37 /* The Microsoft MSVC 9 compiler chokes on the expression 1.0 / 0.0.
  38    The IBM XL C compiler on z/OS complains.
  39    PGI 16.10 complains.  */
  40 #if defined _MSC_VER || (defined __MVS__ && defined __IBMC__) || defined __PGI
  41 static double
  42 Infinityd ()
     /*  */
  43 {
  44   static double zero = 0.0;
  45   return 1.0 / zero;
  46 }
  47 #else
  48 # define Infinityd() (1.0 / 0.0)
  49 #endif
  50 
  51 
  52 /* Infinityl () returns a 'long double' +Infinity.  */
  53 
  54 /* The Microsoft MSVC 9 compiler chokes on the expression 1.0L / 0.0L.
  55    The IBM XL C compiler on z/OS complains.
  56    PGI 16.10 complains.  */
  57 #if defined _MSC_VER || (defined __MVS__ && defined __IBMC__) || defined __PGI
  58 static long double
  59 Infinityl ()
     /*  */
  60 {
  61   static long double zero = 0.0L;
  62   return 1.0L / zero;
  63 }
  64 #else
  65 # define Infinityl() (1.0L / 0.0L)
  66 #endif

/* */