Use a native int for iterating

it might be a bit faster
niner · Sep 26, 2014 · 964a9cb · 964a9cb
1 parent 6a57058
commit 964a9cb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Inline/Perl5.pm6 b/lib/Inline/Perl5.pm6
@@ -287,7 +287,7 @@ method p5_array_to_p6_array(OpaquePointer $sv) {
     my $av_len = p5_av_top_index($!p5, $av);
 
     my $arr = [];
-    loop (my $i = 0; $i <= $av_len; $i++) {
+    loop (my int $i = 0; $i <= $av_len; $i = $i + 1) {
         $arr.push(self.p5_to_p6(p5_av_fetch($!p5, $av, $i)));
     }
     return $arr;