summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorYves Orton <demerphq@gmail.com>2007-01-31 00:58:31 +0100
committerH.Merijn Brand <h.m.brand@xs4all.nl>2007-01-31 10:29:59 +0000
commitbcdf74043c1fd4b60b7764f5cd7d87525cf77e74 (patch)
tree0a3acc4337796c1ed8e000810e9ecaa82ec42e5a /regexec.c
parent57b84237ab396aa1e1efe3b629c2b636d4869d93 (diff)
downloadperl-bcdf74043c1fd4b60b7764f5cd7d87525cf77e74.tar.gz
Improve regex stringification code
Message-ID: <9b18b3110701301458k2f6a8254hea6c6db28489c38b@mail.gmail.com> p4raw-id: //depot/perl@30084
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/regexec.c b/regexec.c
index cad8f61520..6c82ba7465 100644
--- a/regexec.c
+++ b/regexec.c
@@ -498,7 +498,7 @@ Perl_re_intuit_start(pTHX_ regexp *prog, SV *sv, char *strpos,
/* end shift should be non negative here */
}
-#ifdef DEBUGGING /* 7/99: reports of failure (with the older version) */
+#ifdef QDEBUGGING /* 7/99: reports of failure (with the older version) */
if (end_shift < 0)
Perl_croak(aTHX_ "panic: end_shift: %"IVdf" pattern:\n%s\n ",
(IV)end_shift, prog->precomp);