diff options
| author | Spider Boardman <spider@orb.nashua.nh.us> | 2002-03-18 04:38:55 -0500 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-18 13:44:14 +0000 |
| commit | a38b217b898443ed11b663015145e44d72be5560 (patch) | |
| tree | ea61a82f7d79bcde70e75cc67e656c6bad2e2a6f /perl.h | |
| parent | e510eb3345284443d367077dd08b1094e88b343d (diff) | |
| download | perl-a38b217b898443ed11b663015145e44d72be5560.tar.gz | |
Re: perl@15244
Message-Id: <200203181438.JAA406792@leggy.zk3.dec.com>
(IA64 work.)
p4raw-id: //depot/perl@15289
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1233,7 +1233,7 @@ typedef NVTYPE NV; # else # define Perl_frexp(x,y) ((long double)frexp((double)(x),y)) # endif -# ifndef Perl_isinf +# ifndef Perl_isnan # ifdef HAS_ISNANL # define Perl_isnan(x) isnanl(x) # endif @@ -1341,7 +1341,7 @@ typedef NVTYPE NV; #if !defined(Perl_fp_class) && defined(HAS_FPCLASSIFY) # include <math.h> # define Perl_fp_class(x) fpclassify(x) -# define Perl_fp_class_nan(x) (fp_classify(x)==FP_SNAN|FP|_fp_classify(x)==QNAN) +# define Perl_fp_class_nan(x) (fp_classify(x)==FP_SNAN||fp_classify(x)==FP_QNAN) # define Perl_fp_class_inf(x) (fp_classify(x)==FP_INFINITE) # define Perl_fp_class_norm(x) (fp_classify(x)==FP_NORMAL) # define Perl_fp_class_denorm(x) (fp_classify(x)==FP_SUBNORMAL) |