PATCH: gh#17218 memory leak

Indeed, a variable's ref count was not getting decremented.
Perl · Nov 15, 2019 · 0463f3a · 0463f3a
1 parent 81a306d
commit 0463f3a
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/regcomp.c b/regcomp.c
@@ -18180,6 +18180,7 @@ S_regclass(pTHX_ RExC_state_t *pRExC_state, I32 *flagp, U32 depth,
 
                 /* Likewise for 'posixes' */
                 _invlist_union(posixes, cp_list, &cp_list);
+                SvREFCNT_dec(posixes);
 
                 /* Likewise for anything else in the range that matched only
                  * under UTF-8 */