In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/0599cd66b4e9bae6409714e39aa0eebc67712ca7?hp=54ad4e11aa2a4191637d6f4ef1b878490e4fb6db>
- Log ----------------------------------------------------------------- commit 0599cd66b4e9bae6409714e39aa0eebc67712ca7 Author: David Mitchell <[email protected]> Date: Fri Jun 23 12:25:30 2017 +0100 add DEBUGGING_RE_ONLY define re.xs and re_top.h both turn DEBUGGING on. make them set DEBUGGING_RE_ONLY too so that its easy to tell this is a fake DEBUGGING. ----------------------------------------------------------------------- Summary of changes: ext/re/re.pm | 2 +- ext/re/re.xs | 1 + ext/re/re_top.h | 1 + 3 files changed, 3 insertions(+), 1 deletion(-) diff --git a/ext/re/re.pm b/ext/re/re.pm index c416b94c28..81c632b6df 100644 --- a/ext/re/re.pm +++ b/ext/re/re.pm @@ -4,7 +4,7 @@ package re; use strict; use warnings; -our $VERSION = "0.34"; +our $VERSION = "0.35"; our @ISA = qw(Exporter); our @EXPORT_OK = ('regmust', qw(is_regexp regexp_pattern diff --git a/ext/re/re.xs b/ext/re/re.xs index 9545d1dba0..c2064ffb91 100644 --- a/ext/re/re.xs +++ b/ext/re/re.xs @@ -1,5 +1,6 @@ #if defined(PERL_EXT_RE_DEBUG) && !defined(DEBUGGING) # define DEBUGGING +# define DEBUGGING_RE_ONLY #endif #define PERL_NO_GET_CONTEXT diff --git a/ext/re/re_top.h b/ext/re/re_top.h index ce4c716aa5..543f924908 100644 --- a/ext/re/re_top.h +++ b/ext/re/re_top.h @@ -5,6 +5,7 @@ /* need access to debugger hooks */ #if defined(PERL_EXT_RE_DEBUG) && !defined(DEBUGGING) # define DEBUGGING +# define DEBUGGING_RE_ONLY #endif /* We *really* need to overwrite these symbols: */ -- Perl5 Master Repository
