1 files changed, 2 insertions, 2 deletions
diff --git a/regcomp.h b/regcomp.h
index 61726bba6f..7bddc1b051 100644
--- a/regcomp.h
+++ b/regcomp.h
@@ -241,14 +241,14 @@ struct regnode_2 {
 #define	FAIL(m) \
     STMT_START {							\
 	if (!SIZE_ONLY)							\
-	    SAVEDESTRUCTOR(S_clear_re,(void*)PL_regcomp_rx);		\
+	    SAVEDESTRUCTOR(clear_re,(void*)PL_regcomp_rx);		\
 	Perl_croak(aTHX_ "/%.127s/: %s",  PL_regprecomp,m);		\
     } STMT_END
 
 #define	FAIL2(pat,m) \
     STMT_START {							\
 	if (!SIZE_ONLY)							\
-	    SAVEDESTRUCTOR(S_clear_re,(void*)PL_regcomp_rx);		\
+	    SAVEDESTRUCTOR(clear_re,(void*)PL_regcomp_rx);		\
 	S_re_croak2(aTHX_ "/%.127s/: ",pat,PL_regprecomp,m);		\
     } STMT_END