1 files changed, 1 insertions, 1 deletions
diff --git a/regcomp.c b/regcomp.c
index 20b68762f4..7296c484a4 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -5068,7 +5068,7 @@ Perl_save_re_context(pTHX)
 
     {
 	/* Save $1..$n (#18107: UTF-8 s/(\w+)/uc($1)/e); AMS 20021106. */
-	int i;
+	U32 i;
 	GV *mgv;
 	REGEXP *rx;
 	char digits[16];