Change 30753 forgot to remove 2 now unused variables.

p4raw-id: //depot/perl@30756

1 files changed, 0 insertions, 2 deletions

diff --git a/regcomp.c b/regcomp.c
index 0bead353b2..4c1ae51815 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -8723,8 +8723,6 @@ Perl_reg_temp_copy (pTHX_ struct regexp *r) {
     ret->endp = ret->startp + npar;
     ret->refcnt = 1;
     if (r->substrs) {
-        struct reg_substr_datum *s;
-        I32 i;
         Newx(ret->substrs, 1, struct reg_substr_data);
 	StructCopy(r->substrs, ret->substrs, struct reg_substr_data);