diff options
Diffstat (limited to 'ext')
-rw-r--r-- | ext/POSIX/t/is.t | 2 | ||||
-rw-r--r-- | ext/POSIX/t/posix.t | 8 |
2 files changed, 7 insertions, 3 deletions
diff --git a/ext/POSIX/t/is.t b/ext/POSIX/t/is.t index cb36fb5692..a0f5a45bd6 100644 --- a/ext/POSIX/t/is.t +++ b/ext/POSIX/t/is.t @@ -70,7 +70,7 @@ foreach my $s (keys %classes) { # Expected number of tests is one each for every combination of a # known is<xxx> function and string listed above. -require '../../t/test.pl'; +use Test::More; plan(tests => keys(%classes) * keys(%functions)); diff --git a/ext/POSIX/t/posix.t b/ext/POSIX/t/posix.t index 0800f914b5..32382e82d5 100644 --- a/ext/POSIX/t/posix.t +++ b/ext/POSIX/t/posix.t @@ -8,13 +8,17 @@ BEGIN { } } -BEGIN { require "../../t/test.pl"; } -plan(tests => 66); +use Test::More tests => 66; use POSIX qw(fcntl_h signal_h limits_h _exit getcwd open read strftime write errno); use strict 'subs'; +sub next_test { + my $builder = Test::More->builder; + $builder->current_test($builder->current_test() + 1); +} + $| = 1; $Is_W32 = $^O eq 'MSWin32'; |