This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
PL_scopestack_name needs to be present, -DDEBUGGING or not.
authorNicholas Clark <nick@ccl4.org>
Wed, 18 Nov 2009 13:21:18 +0000 (13:21 +0000)
committerNicholas Clark <nick@ccl4.org>
Wed, 18 Nov 2009 13:23:40 +0000 (13:23 +0000)
-DDEBUGGING and not need to be binary compatible with each other. Fixes the
test failures in ext/re caused by d343c3ef45381352 for threaded builds without
-DDEBUGGING.

intrpvar.h

index 20df305..650eb62 100644 (file)
@@ -43,9 +43,9 @@ PERLVAR(Istack_base,  SV **)
 PERLVAR(Istack_max,    SV **)
 
 PERLVAR(Iscopestack,   I32 *)          /* scopes we've ENTERed */
-#ifdef DEBUGGING
-PERLVAR(Iscopestack_name, const char * *) /* name of the scopes we've ENTERed */
-#endif
+/* name of the scopes we've ENTERed. Only used with -DDEBUGGING, but needs to be
+   present always, as -DDEUBGGING must be binary compatible with non.  */
+PERLVARI(Iscopestack_name, const char * *, NULL)
 PERLVAR(Iscopestack_ix,        I32)
 PERLVAR(Iscopestack_max,I32)