diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-04-16 08:57:01 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-04-16 08:57:01 +0000 |
| commit | 03476e8e225023314ac8982933b2825edd7b8b8c (patch) | |
| tree | 35e2cb7fb143795d50a19a39fb041debb8516274 | |
| parent | 77bbdecc499e5311887f7b422e569a89d0378219 (diff) | |
| download | perl-03476e8e225023314ac8982933b2825edd7b8b8c.tar.gz | |
Patch from Merijn.
p4raw-id: //depot/perl@19230
| -rw-r--r-- | perl.h | 12 |
1 files changed, 8 insertions, 4 deletions
@@ -1252,15 +1252,19 @@ typedef NVTYPE NV; # ifndef HAS_MODFL_PROTO long double modfl(long double, long double *); # endif -# else if defined(HAS_AINTL) && defined(HAS_COPYSIGNL) +# else +# if defined(HAS_AINTL) && defined(HAS_COPYSIGNL) extern long double Perl_my_modfl(long double x, long double *ip); -# define Perl_modf(x,y) Perl_my_modfl(x,y) +# define Perl_modf(x,y) Perl_my_modfl(x,y) +# endif # endif # ifdef HAS_FREXPL # define Perl_frexp(x,y) frexpl(x,y) -# else if defined(HAS_ILOGBL) && defined(HAS_SCALBNL) +# else +# if defined(HAS_ILOGBL) && defined(HAS_SCALBNL) extern long double Perl_my_frexpl(long double x, int *e); -# define Perl_frexp(x,y) Perl_my_frexpl(x,y) +# define Perl_frexp(x,y) Perl_my_frexpl(x,y) +# endif # endif # ifndef Perl_isnan # ifdef HAS_ISNANL |