This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
make perl build again on non-DEBUGGING builds
authorDavid Mitchell <davem@iabyn.com>
Tue, 5 Jun 2012 21:29:23 +0000 (22:29 +0100)
committerDavid Mitchell <davem@iabyn.com>
Wed, 13 Jun 2012 12:32:52 +0000 (13:32 +0100)
The PL_block_type debugging-only array is now used indeirectly in
ext/re/re-exec.c, which enables debugging even on non-debugging builds

makedef.pl
perl.h

index ce92ee1..95b4d66 100644 (file)
@@ -247,7 +247,6 @@ unless ($define{'DEBUGGING'}) {
                    Perl_pad_sv
                    Perl_pad_setsv
                    Perl_hv_assert
-                   PL_block_type
                    PL_watchaddr
                    PL_watchok
                    PL_watch_pvx
diff --git a/perl.h b/perl.h
index 862f25c..9fc2700 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -4600,7 +4600,9 @@ EXTCONST unsigned char PL_freq[] = {      /* letter frequencies for mixed English/C *
 EXTCONST unsigned char PL_freq[];
 #endif
 
-#ifdef DEBUGGING
+/* Although only used for debugging, these constants must be available in
+ * non-debugging builds too, since they're used in ext/re/re_exec.c,
+ * which has DEBUGGING enabled always */
 #ifdef DOINIT
 EXTCONST char* const PL_block_type[] = {
        "NULL",
@@ -4619,7 +4621,6 @@ EXTCONST char* const PL_block_type[] = {
 #else
 EXTCONST char* PL_block_type[];
 #endif
-#endif
 
 /* These are all the compile time options that affect binary compatibility.
    Other compile time options that are binary compatible are in perl.c