From 2c7d988316b685b95a349750a1487f7473c5a179 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Tue, 26 Jul 2016 22:10:30 -0400 Subject: VAX: VAX format H --- perl.h | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/perl.h b/perl.h index 62703e8fff..2735b524b6 100644 --- a/perl.h +++ b/perl.h @@ -6869,6 +6869,10 @@ extern void moncontrol(int); # define LONGDOUBLE_DOUBLEDOUBLE # endif +# if LONG_DOUBLEKIND == LONG_DOUBLE_IS_VAX_H_FLOAT +# define LONGDOUBLE_VAX_ENDIAN +# endif + #endif /* LONG_DOUBLEKIND */ #ifdef USE_QUADMATH /* assume quadmath endianness == native double endianness */ @@ -6902,6 +6906,9 @@ extern void moncontrol(int); # ifdef LONGDOUBLE_MIX_ENDIAN # define NV_MIX_ENDIAN # endif +# ifdef LONGDOUBLE_VAX_ENDIAN +# define NV_VAX_ENDIAN +# endif #endif #ifdef DOUBLE_IS_IEEE_FORMAT -- cgit v1.2.1