types: fix Test::Simple tests

Author: rurban

t/prove.t

@@ -1483,7 +1483,7 @@ for my $test (@SCHEDULE) {
 
     SKIP:
     {
-        skip $test->{skip_reason}, $test->{_planned} if $test->{skip};
+        skip "$test->{skip_reason}", int($test->{_planned}) if $test->{skip};
 
         local $ENV{HARNESS_TIMER};
 

t/source_handler.t

@@ -355,9 +355,10 @@ sub test_handler {
 
         SKIP:
         {
-            my $planned = 1;
+            %int::; # init the coretype if missing
+            my int $planned = 1;
             $planned += 1 + scalar @{ $test->{output} } if $test->{output};
-            skip $test->{skip_reason}, $planned if $test->{skip};
+            skip "$test->{skip_reason}", $planned if $test->{skip};
 
             my $source = TAP::Parser::Source->new;
             $source->raw( $test->{raw} )             if $test->{raw};