summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2018-10-14 15:12:41 -0600
committerKarl Williamson <khw@cpan.org>2018-10-20 00:09:55 -0600
commit0c5db32cd0e258d37a6406a3c4449f53cc6ac3ea (patch)
tree6b67fe5890129c4075c7a8a61789ca689fb6e335
parentdaca87b169fc14e32828c7d4c4eaf36c6e1bb5df (diff)
downloadperl-0c5db32cd0e258d37a6406a3c4449f53cc6ac3ea.tar.gz
regcomp.c: Use SvREFCNT_inc_NN()
We know this is non-null as it panics a little ways above unless that's the case.
-rw-r--r--regcomp.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/regcomp.c b/regcomp.c
index f4387efee1..91928d3329 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -11234,7 +11234,7 @@ S_reg(pTHX_ RExC_state_t *pRExC_state, I32 paren, I32 *flagp, U32 depth)
/* Yes this does cause a memory leak in debugging Perls
* */
if (!av_store(RExC_paren_name_list,
- RExC_npar, SvREFCNT_inc(svname)))
+ RExC_npar, SvREFCNT_inc_NN(svname)))
SvREFCNT_dec_NN(svname);
#endif