summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2021-01-08 22:02:39 -0700
committerKarl Williamson <khw@cpan.org>2021-01-20 06:51:50 -0700
commita44b2be795f4c5f94384c6f6010860588e144b3c (patch)
tree29222a81d00b0f896d050060718c9debf4343584 /regcomp.c
parent12abe3c415ac316306426490edddd357e2cac4d3 (diff)
downloadperl-a44b2be795f4c5f94384c6f6010860588e144b3c.tar.gz
perlre: Note the other forms of \k<name>
Not all three synonyms were documented. This also fixes up related comments in regcomp.c to correspond
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/regcomp.c b/regcomp.c
index 2f938fb1c8..ac959e3766 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -13907,8 +13907,8 @@ S_regatom(pTHX_ RExC_state_t *pRExC_state, I32 *flagp, U32 depth)
RExC_parse = parse_start;
goto defchar;
- case 'k': /* Handle \k<NAME> and \k'NAME' */
- parse_named_seq:
+ case 'k': /* Handle \k<NAME> and \k'NAME' and \k{NAME} */
+ parse_named_seq: /* Also handle non-numeric \g{...} */
{
char ch;
if ( RExC_parse >= RExC_end - 1