APItest.xs: Silence compiler warning

[perl5.git] / ext / XS-APItest / APItest.xs

diff --git a/ext/XS-APItest/APItest.xs b/ext/XS-APItest/APItest.xs
index d3cfadc..5d0d0e3 100644 (file)
--- a/ext/XS-APItest/APItest.xs
+++ b/ext/XS-APItest/APItest.xs
@@ -374,7 +374,7 @@ blockhook_csc_start(pTHX_ int full)
     SAVEGENERICSV(GvAV(MY_CXT.cscgv));
 
     if (cur) {
     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++) {
         AV *const new_av = newAV();
 
         for (i = 0; i < av_count(cur); i++) {