In perl.git, the branch khw/ebcdic has been updated <http://perl5.git.perl.org/perl.git/commitdiff/9660de07c83a94a28518909a10e7cfc8e709f9e5?hp=a26ef6e968d2e164bb2de800780de9a2fd8ed0cf>
- Log ----------------------------------------------------------------- commit 9660de07c83a94a28518909a10e7cfc8e709f9e5 Author: Karl Williamson <[email protected]> Date: Sun Mar 17 17:40:12 2013 -0600 XXX regcomp.c: Try 256 instead of 128 to see what happens M regcomp.c commit 5f949c0345621cf9ca7a849439ef0795255cd465 Author: Karl Williamson <[email protected]> Date: Sun Mar 17 17:39:33 2013 -0600 XXX makedepend.SH: Why does 255 work and 250 not? M makedepend.SH ----------------------------------------------------------------------- Summary of changes: makedepend.SH | 2 +- regcomp.c | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/makedepend.SH b/makedepend.SH index 5bdd3b1..d53cd78 100755 --- a/makedepend.SH +++ b/makedepend.SH @@ -173,7 +173,7 @@ for file in `$cat .clist`; do -e '/^[ ]*#/{' \ -e 's|[ ]*/\*[^*].*$||' \ -e 's|[ ]*/\*\*[^/].*$||' \ - -e 's/.\{250\}/&\\\n/g' \ + -e 's/.\{255\}/&\\\n/g' \ -e p \ -e '}' ) >UU/$file.c diff --git a/regcomp.c b/regcomp.c index 43b896e..8768f83 100644 --- a/regcomp.c +++ b/regcomp.c @@ -4213,7 +4213,7 @@ PerlIO_printf(Perl_debug_log, "LHS=%d RHS=%d\n", -counted * deltanext + (minnext (struct regnode_charclass_class*)scan); break; case POSIXA: - loop_max = 128; + loop_max = 256; /* FALL THROUGH */ case POSIXL: case POSIXD: @@ -4247,7 +4247,7 @@ PerlIO_printf(Perl_debug_log, "LHS=%d RHS=%d\n", -counted * deltanext + (minnext } break; case NPOSIXA: - loop_max = 128; + loop_max = 256; /* FALL THROUGH */ case NPOSIXL: case NPOSIXU: -- Perl5 Master Repository
