This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
APItest.xs: Silence compiler warning
[perl5.git] / ext / XS-APItest / APItest.xs
index d3cfadc..5d0d0e3 100644 (file)
@@ -374,7 +374,7 @@ blockhook_csc_start(pTHX_ int full)
     SAVEGENERICSV(GvAV(MY_CXT.cscgv));
 
     if (cur) {
-        I32 i;
+        Size_t i;
         AV *const new_av = newAV();
 
         for (i = 0; i < av_count(cur); i++) {