PL_bincompat_options was missing options that affect the interpreter struct.
authorNicholas Clark <nick@ccl4.org>
Mon, 18 Jul 2011 15:26:09 +0000 (17:26 +0200)
committerNicholas Clark <nick@ccl4.org>
Mon, 18 Jul 2011 15:26:09 +0000 (17:26 +0200)
It had most, but not all, C pre-processor options that change the size of the
interpreter struct.

perl.c
perl.h

diff --git a/perl.c b/perl.c
index 914fbcd4656e67e7799f63f537c94e717f8b9f52..4878f9ca8bbe2c49928528a2f878a11711d0fcf7 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -1701,15 +1701,9 @@ S_Internals_V(pTHX_ CV *cv)
 #  ifdef USE_LOCALE
                             " USE_LOCALE"
 #  endif
-#  ifdef USE_LOCALE_COLLATE
-                            " USE_LOCALE_COLLATE"
-#  endif
 #  ifdef USE_LOCALE_CTYPE
                             " USE_LOCALE_CTYPE"
 #  endif
-#  ifdef USE_LOCALE_NUMERIC
-                            " USE_LOCALE_NUMERIC"
-#  endif
 #  ifdef USE_PERL_ATOF
                             " USE_PERL_ATOF"
 #  endif              
diff --git a/perl.h b/perl.h
index 25d29aaf6a4bec0f231adc8cc92e79e39e427f34..7304e05614977602670439ab953410016877e2d3 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -4629,12 +4629,24 @@ EXTCONST char PL_bincompat_options[] =
 #  ifdef FAKE_THREADS
                             " FAKE_THREADS"
 #  endif
+#  ifdef FCRYPT
+                            " FCRYPT"
+#  endif
+#  ifdef HAS_TIMES
+                            " HAS_TIMES"
+#  endif
+#  ifdef HAVE_INTERP_INTERN
+                            "  HAVE_INTERP_INTERN"
+#  endif
 #  ifdef MULTIPLICITY
                             " MULTIPLICITY"
 #  endif
 #  ifdef MYMALLOC
                             " MYMALLOC"
 #  endif
+#  ifdef PERLIO_LAYERS
+                            " PERLIO_LAYERS"
+#  endif
 #  ifdef PERL_DEBUG_READONLY_OPS
                             " PERL_DEBUG_READONLY_OPS"
 #  endif
@@ -4650,6 +4662,9 @@ EXTCONST char PL_bincompat_options[] =
 #  ifdef PERL_MAD
                             " PERL_MAD"
 #  endif
+#  ifdef PERL_MICRO
+                            " PERL_MICRO"
+#  endif
 #  ifdef PERL_NEED_APPCTX
                             " PERL_NEED_APPCTX"
 #  endif
@@ -4689,6 +4704,12 @@ EXTCONST char PL_bincompat_options[] =
 #  ifdef USE_LARGE_FILES
                             " USE_LARGE_FILES"
 #  endif
+#  ifdef USE_LOCALE_COLLATE
+                            " USE_LOCALE_COLLATE"
+#  endif
+#  ifdef USE_LOCALE_NUMERIC
+                            " USE_LOCALE_NUMERIC"
+#  endif
 #  ifdef USE_LONG_DOUBLE
                             " USE_LONG_DOUBLE"
 #  endif