diff options
| author | Craig A. Berry <craigberry@mac.com> | 2012-12-23 13:42:47 -0600 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2012-12-23 13:42:47 -0600 |
| commit | 85bba25fe3bc5148e16eda74c253ecbcfc871984 (patch) | |
| tree | fe3a7f704e8875d24cc3e53ac200cc4c80a25b15 /pp_pack.c | |
| parent | 7f5d1fb2f5a68c62ce067a88dba574b23dfebba4 (diff) | |
| download | perl-85bba25fe3bc5148e16eda74c253ecbcfc871984.tar.gz | |
Proper IEEE overflow semantics for VMS.
Way back in 67597c89125e7e14 we misspelled _IEEE_FP as __IEEE_FP,
with a spurious leading underscore. Which I then copied and
pasted into pp_pack.c in baf3cf9c09c529. This means that on
Alpha and Itanium systems with the default selection of IEEE
floating point, we've actually (for the last decade!) been
using a workaround intended for VAX or Alpha and Itanium builds
that have explicitly selected VAX-compatible floating point
formats. Oh well.
Diffstat (limited to 'pp_pack.c')
| -rw-r--r-- | pp_pack.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3115,7 +3115,7 @@ extern const float _float_constants[]; else afloat = (float) anv; } #else /* __VOS__ */ -# if defined(VMS) && !defined(__IEEE_FP) +# if defined(VMS) && !defined(_IEEE_FP) /* IEEE fp overflow shenanigans are unavailable on VAX and optional * on Alpha; fake it if we don't have them. */ @@ -3154,7 +3154,7 @@ extern const double _double_constants[]; else adouble = (double) anv; } #else /* __VOS__ */ -# if defined(VMS) && !defined(__IEEE_FP) +# if defined(VMS) && !defined(_IEEE_FP) /* IEEE fp overflow shenanigans are unavailable on VAX and optional * on Alpha; fake it if we don't have them. */ |