This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add NV_MIX_ENDIAN define.
[perl5.git] / 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