12 skip 'Not implemented', 2;
13 use_ok( 'SDL::Time' );
14 can_ok ('SDL::Time', @done);
24 my $why = '[Percentage Completion] '.int( 100 * $#done / ($#done + $#left) ) ."\% implementation. $#done / ".($#done+$#left);
29 pass "\nThe following functions:\n".join ",", @left;
31 if( $done[0] eq 'none'){ diag '0% done 0/'.$#left } else { diag $why}
34 pass 'Are we still alive? Checking for segfaults';