fix signed/unsigned mismatch warning from change#18266
Gurusamy Sarathy [Sat, 28 Dec 2002 02:08:23 +0000 (02:08 +0000)]
p4raw-link: @18266 on //depot/perl: ada6e8a992d3696f2a5e84c5e93d2fce8998ecfb

p4raw-id: //depot/perl@18356

regcomp.c

index 20b6876..7296c48 100644 (file)
--- 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];