In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/e85dc376c2772268b837317689ee75b525ef19e0?hp=73e4395489b3af4945ee03565112cf8d41d7d349>
- Log ----------------------------------------------------------------- commit e85dc376c2772268b837317689ee75b525ef19e0 Author: Hugo van der Sanden <[email protected]> Date: Tue Mar 10 08:48:44 2015 +0000 fix XXX comment for regcomp.c:S_reg It actually does do the right thing: /(?(R0))/ and /(?(R00))/ both fall through to give an appropriate error 'Switch condition not recognized' ----------------------------------------------------------------------- Summary of changes: regcomp.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/regcomp.c b/regcomp.c index 4cbcf36..998d0c3 100644 --- a/regcomp.c +++ b/regcomp.c @@ -10318,7 +10318,7 @@ S_reg(pTHX_ RExC_state_t *pRExC_state, I32 paren, I32 *flagp,U32 depth) parno = (I32)uv; RExC_parse = (char*)endptr; } - /* XXX else what? */ + /* else "Switch condition not recognized" below */ } else if (RExC_parse[0] == '&') { SV *sv_dat; RExC_parse++; -- Perl5 Master Repository
