1 files changed, 1 insertions, 1 deletions
diff --git a/regexec.c b/regexec.c
index c51ddeec74..1dbdc59f7b 100644
--- a/regexec.c
+++ b/regexec.c
@@ -1404,7 +1404,7 @@ Perl_regexec_flags(pTHX_ register regexp *prog, char *stringarg, register char *
 	    }
 	    break;
 	default:
-	    croak("panic: unknown regstclass %d", (int)OP(c));
+	    Perl_croak(aTHX_ "panic: unknown regstclass %d", (int)OP(c));
 	    break;
 	}
     }