diff options
| author | Craig A. Berry <craigberry@mac.com> | 2015-02-14 08:26:02 -0600 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2015-02-14 08:30:14 -0600 |
| commit | c4f3aff16193e9c772b7add6634cd7894e2d1cce (patch) | |
| tree | e7b9ea5ad84a20b7c544ef57f7cdb60029173961 /vms | |
| parent | 52f4d632547391b1db71d16e631dd023dcd6a9b0 (diff) | |
| download | perl-c4f3aff16193e9c772b7add6634cd7894e2d1cce.tar.gz | |
Set NAN_COMPARE_BROKEN on VMS with long doubles.
This gets us passing more (but not all) of the infnan.t tests
with long doubles (which are true 128-bit IEEE 754 gizmos).
Diffstat (limited to 'vms')
| -rw-r--r-- | vms/vmsish.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/vms/vmsish.h b/vms/vmsish.h index f43001357b..fcfd03fa20 100644 --- a/vms/vmsish.h +++ b/vms/vmsish.h @@ -791,4 +791,8 @@ char * my_getlogin (void); #define PERL_RMSEXPAND_M_VMS_IN 0x08 /* Assume input is VMS already */ #define PERL_RMSEXPAND_M_SYMLINK 0x20 /* Use symbolic link, not target */ +/* With long doubles, NaN == NaN, which it shouldn't. */ +#ifdef USE_LONG_DOUBLE +# define NAN_COMPARE_BROKEN 1 +#endif #endif /* __vmsish_h_included */ |