diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-19 14:15:45 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-19 14:15:45 +0000 |
| commit | 172ea7c87e87614bc0ae85422590b4c9d7c3960c (patch) | |
| tree | d1b907a5f43ffe57290a61173f882721263b7b58 /ext/POSIX | |
| parent | 16be52b8fb809cc375006ad8517483286dc5be74 (diff) | |
| download | perl-172ea7c87e87614bc0ae85422590b4c9d7c3960c.tar.gz | |
Put back the long double avoidance code to POSIX.xs
because VMS seems to need it still.
p4raw-id: //depot/perl@6713
Diffstat (limited to 'ext/POSIX')
| -rw-r--r-- | ext/POSIX/POSIX.xs | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs index 473610f99f..06869f6ec3 100644 --- a/ext/POSIX/POSIX.xs +++ b/ext/POSIX/POSIX.xs @@ -538,6 +538,24 @@ mini_mktime(struct tm *ptm) ptm->tm_wday = (jday + WEEKDAY_BIAS) % 7; } +#ifdef HAS_LONG_DOUBLE +# if LONG_DOUBLESIZE > DOUBLESIZE +# undef HAS_LONG_DOUBLE /* XXX until we figure out how to use them */ +# endif +#endif + +#ifndef HAS_LONG_DOUBLE +#ifdef LDBL_MAX +#undef LDBL_MAX +#endif +#ifdef LDBL_MIN +#undef LDBL_MIN +#endif +#ifdef LDBL_EPSILON +#undef LDBL_EPSILON +#endif +#endif + static int not_here(char *s) { |