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

diff --git a/perl.h b/perl.h
index 7353dd9..3e3dfa9 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -6451,6 +6451,22 @@ extern void moncontrol(int);
 
 #endif /* LONG_DOUBLEKIND */
 
+#if NVSIZE == DOUBLESIZE
+#  ifdef DOUBLE_LITTLE_ENDIAN
+#    define NV_LITTLE_ENDIAN
+#  endif
+#  ifdef DOUBLE_BIG_ENDIAN
+#    define NV_BIG_ENDIAN
+#  endif
+#elif NVSIZE == LONG_DOUBLESIZE
+#  ifdef LONGDOUBLE_LITTLE_ENDIAN
+#    define NV_LITTLE_ENDIAN
+#  endif
+#  ifdef LONGDOUBLE_BIG_ENDIAN
+#    define NV_BIG_ENDIAN
+#  endif
+#endif
+
 /*
 
    (KEEP THIS LAST IN perl.h!)