Remove unused variable (thanks to Andy's lint)

p4raw-id: //depot/perl@24737

1 files changed, 0 insertions, 1 deletions

diff --git a/mg.c b/mg.c
index 7a5c1cfd9a..e7f3b2107b 100644
--- a/mg.c
+++ b/mg.c
@@ -494,7 +494,6 @@ Perl_magic_len(pTHX_ SV *sv, MAGIC *mg)
 	      getlen:
 		if (i > 0 && RX_MATCH_UTF8(rx)) {
 		    char *s    = rx->subbeg + s1;
-		    char *send = rx->subbeg + t1;
 		    const U8 *ep;
 		    STRLEN el;