This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add NV_MIX_ENDIAN define.
authorJarkko Hietaniemi <jhi@iki.fi>
Thu, 29 Jan 2015 01:42:57 +0000 (20:42 -0500)
committerJarkko Hietaniemi <jhi@iki.fi>
Mon, 2 Feb 2015 22:02:54 +0000 (17:02 -0500)
perl.h

diff --git a/perl.h b/perl.h
index 3e3dfa9..29086d8 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -6425,6 +6425,11 @@ extern void moncontrol(int);
 #  define DOUBLE_BIG_ENDIAN
 #endif
 
+#if DOUBLEKIND == DOUBLE_IS_IEEE_754_64_BIT_MIXED_ENDIAN_LE_BE || \
+    DOUBLEKIND == DOUBLE_IS_IEEE_754_64_BIT_MIXED_ENDIAN_BE_LE
+#  define DOUBLE_MIX_ENDIAN
+#endif
+
 #ifdef LONG_DOUBLEKIND
 
 #  if LONG_DOUBLEKIND == LONG_DOUBLE_IS_IEEE_754_128_BIT_LITTLE_ENDIAN || \
@@ -6458,6 +6463,9 @@ extern void moncontrol(int);
 #  ifdef DOUBLE_BIG_ENDIAN
 #    define NV_BIG_ENDIAN
 #  endif
+#  ifdef DOUBLE_MIX_ENDIAN
+#    define NV_MIX_ENDIAN
+#  endif
 #elif NVSIZE == LONG_DOUBLESIZE
 #  ifdef LONGDOUBLE_LITTLE_ENDIAN
 #    define NV_LITTLE_ENDIAN