1 files changed, 1 insertions, 1 deletions
diff --git a/regexec.c b/regexec.c
index da451a81a0..40f33d493a 100644
--- a/regexec.c
+++ b/regexec.c
@@ -856,7 +856,7 @@ Perl_re_intuit_start(pTHX_ regexp *prog, SV *sv, char *strpos,
 	    PL_regdata = prog->data;
 	    PL_bostr = startpos;
 	}
-	S_cache_re(prog);
+	cache_re(prog);
 	s = find_byclass(prog, prog->regstclass, s, endpos, startpos, 1);
 	if (!s) {
 #ifdef DEBUGGING