Less unused ones.

p4raw-id: //depot/perl@13989

1 files changed, 0 insertions, 3 deletions

diff --git a/regexec.c b/regexec.c
index cf33abb51d..3aed549382 100644
--- a/regexec.c
+++ b/regexec.c
@@ -2350,7 +2350,6 @@ S_regmatch(pTHX_ regnode *prog)
 	    {
 		char *l = locinput;
 		char *e = s + ln;
-		U8 tmpbuf[UTF8_MAXLEN_FOLD+1];
 
 		if (do_utf8 != (UTF!=0)) {
 		     /* The target and the pattern have differing utf8ness. */
@@ -2403,8 +2402,6 @@ S_regmatch(pTHX_ regnode *prog)
 
 		if (do_utf8 && UTF) {
 		     /* Both the target and the pattern are utf8. */
-		     STRLEN ulen;
-		     
 		     while (s < e) {
 			  if (l >= PL_regeol)
 			       sayNO;