summaryrefslogtreecommitdiff
path: root/regcomp.h
diff options
context:
space:
mode:
Diffstat (limited to 'regcomp.h')
-rw-r--r--regcomp.h8
1 files changed, 4 insertions, 4 deletions
diff --git a/regcomp.h b/regcomp.h
index 1a139c5b77..1538f8ab58 100644
--- a/regcomp.h
+++ b/regcomp.h
@@ -188,15 +188,15 @@ struct regnode_2 {
#define FAIL(m) \
STMT_START { \
- /*if (!SIZE_ONLY) \
- ReREFCNT_dec(PL_regcomp_rx);*/ \
+ if (!SIZE_ONLY) \
+ SAVEDESTRUCTOR(clear_re,(void*)PL_regcomp_rx); \
croak ("/%.127s/: %s", PL_regprecomp,m); \
} STMT_END
#define FAIL2(pat,m) \
STMT_START { \
- /*if (!SIZE_ONLY) \
- ReREFCNT_dec(PL_regcomp_rx);*/ \
+ if (!SIZE_ONLY) \
+ SAVEDESTRUCTOR(clear_re,(void*)PL_regcomp_rx); \
re_croak2("/%.127s/: ",pat,PL_regprecomp,m); \
} STMT_END