diff options
author | Yves Orton <demerphq@gmail.com> | 2006-09-19 03:37:19 +0200 |
---|---|---|
committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2006-09-19 06:56:36 +0000 |
commit | fc8cd66c26827f6c2ee1aa00ab2d3b3c320a4a28 (patch) | |
tree | b426e51c41b332c31c05ec65e7570a4cc620f20c /regexec.c | |
parent | a7ae1e4a956bbd5ffa44d286e0591bf4c0e7c341 (diff) | |
download | perl-fc8cd66c26827f6c2ee1aa00ab2d3b3c320a4a28.tar.gz |
Re: \N{...} in regular expression [PATCH]
Message-ID: <9b18b3110609181637m796d6c16o1b2741edc5f09eb2@mail.gmail.com>
p4raw-id: //depot/perl@28868
Diffstat (limited to 'regexec.c')
-rw-r--r-- | regexec.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -527,7 +527,7 @@ Perl_re_intuit_start(pTHX_ regexp *prog, SV *sv, char *strpos, DEBUG_OPTIMISE_r({ PerlIO_printf(Perl_debug_log, "fbm_instr len=%d str=<%.*s>\n", (int)(end_point - start_point), - (int)(end_point - start_point), + (int)(end_point - start_point) > 20 ? 20 : (int)(end_point - start_point), start_point); }); |