X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/069ff81018d18e16be47e2329c5b0914531ebb6c..4e3e027a77ba070985c4006b111360ea9bf0f2a1:/ext/XS-APItest/APItest.xs?ds=sidebyside

diff --git a/ext/XS-APItest/APItest.xs b/ext/XS-APItest/APItest.xs
index d3cfadc..5d0d0e3 100644
--- 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) {
-        I32 i;
+        Size_t i;
         AV *const new_av = newAV();
 
         for (i = 0; i < av_count(cur); i++) {