diff --git t/src/atomic.t t/src/atomic.t
index b34a0d9..cf4381d 100644
|
|
|
|
| 27 | 27 | |
| 28 | 28 | # generic tests |
| 29 | 29 | |
| 30 | | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile(qw/src parrot_config.o/); |
| | 30 | my $parrot_config = "parrot_config" . $PConfig{o}; |
| | 31 | |
| | 32 | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile("src", $parrot_config); |
| 31 | 33 | |
| 32 | 34 | plan tests => 4; |
| 33 | 35 | |
diff --git t/src/basic.t t/src/basic.t
index e90cd7f..21a972b 100644
|
|
|
|
| 6 | 6 | use lib qw( . lib ../lib ../../lib ); |
| 7 | 7 | use Test::More; |
| 8 | 8 | use Parrot::Test; |
| | 9 | use Parrot::Config; |
| 9 | 10 | use File::Spec::Functions; |
| 10 | 11 | |
| 11 | | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile(qw/src parrot_config.o/); |
| | 12 | my $parrot_config = "parrot_config" . $PConfig{o}; |
| | 13 | |
| | 14 | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile("src", $parrot_config); |
| 12 | 15 | |
| 13 | 16 | plan tests => 2; |
| 14 | 17 | |
diff --git t/src/embed.t t/src/embed.t
index f6437f6..4248b49 100644
|
|
|
|
| 9 | 9 | use Parrot::Config; |
| 10 | 10 | use File::Spec::Functions; |
| 11 | 11 | |
| 12 | | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile(qw/src parrot_config.o/); |
| | 12 | my $parrot_config = "parrot_config" . $PConfig{o}; |
| | 13 | |
| | 14 | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile("src", $parrot_config); |
| 13 | 15 | |
| 14 | 16 | plan tests => 16; |
| 15 | 17 | |
diff --git t/src/embed/api.t t/src/embed/api.t
index caaa397..abea3a2 100644
|
|
|
|
| 6 | 6 | use lib qw( . lib ../lib ../../lib ); |
| 7 | 7 | use Test::More; |
| 8 | 8 | use Parrot::Test; |
| | 9 | use Parrot::Config; |
| 9 | 10 | use File::Spec::Functions; |
| 10 | 11 | use Parrot::Test::Util 'create_tempfile'; |
| 11 | 12 | |
| 12 | | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile(qw/src parrot_config.o/); |
| | 13 | my $parrot_config = "parrot_config" . $PConfig{o}; |
| | 14 | |
| | 15 | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile("src", $parrot_config); |
| 13 | 16 | |
| 14 | 17 | plan tests => 8; |
| 15 | 18 | |
diff --git t/src/exit.t t/src/exit.t
index 2113399..d3dc0c4 100644
|
|
|
|
| 6 | 6 | use lib qw( . lib ../lib ../../lib ); |
| 7 | 7 | use Test::More; |
| 8 | 8 | use Parrot::Test; |
| | 9 | use Parrot::Config; |
| 9 | 10 | use File::Spec::Functions; |
| 10 | 11 | |
| 11 | | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile(qw/src parrot_config.o/); |
| | 12 | my $parrot_config = "parrot_config" . $PConfig{o}; |
| | 13 | |
| | 14 | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile("src", $parrot_config); |
| 12 | 15 | |
| 13 | 16 | plan tests => 1; |
| 14 | 17 | |
diff --git t/src/extend.t t/src/extend.t
index 48b8467..e7faa4c 100644
|
|
|
|
| 12 | 12 | use Parrot::Config; |
| 13 | 13 | use File::Spec::Functions; |
| 14 | 14 | |
| 15 | | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile(qw/src parrot_config.o/); |
| | 15 | my $parrot_config = "parrot_config" . $PConfig{o}; |
| | 16 | |
| | 17 | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile("src", $parrot_config); |
| 16 | 18 | |
| 17 | 19 | plan tests => 24; |
| 18 | 20 | |
diff --git t/src/extend_vtable.t t/src/extend_vtable.t
index 7142347..5d3f9e0 100644
|
|
|
|
| 6 | 6 | use lib qw( . lib ../lib ../../lib ); |
| 7 | 7 | use Test::More; |
| 8 | 8 | use Parrot::Test; |
| | 9 | use Parrot::Config; |
| 9 | 10 | use File::Spec::Functions; |
| 10 | 11 | |
| 11 | | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile(qw/src parrot_config.o/); |
| | 12 | my $parrot_config = "parrot_config" . $PConfig{o}; |
| | 13 | |
| | 14 | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile("src", $parrot_config); |
| | 15 | |
| 12 | 16 | |
| 13 | 17 | plan tests => 139; |
| 14 | 18 | |
diff --git t/src/misc.t t/src/misc.t
index 583ea04..34b92f9 100644
|
|
|
|
| 6 | 6 | use lib qw( . lib ../lib ../../lib ); |
| 7 | 7 | use Test::More; |
| 8 | 8 | use Parrot::Test; |
| | 9 | use Parrot::Config; |
| 9 | 10 | use File::Spec::Functions; |
| 10 | 11 | |
| 11 | | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile(qw/src parrot_config.o/); |
| | 12 | my $parrot_config = "parrot_config" . $PConfig{o}; |
| | 13 | |
| | 14 | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile("src", $parrot_config); |
| 12 | 15 | |
| 13 | 16 | plan tests => 4; |
| 14 | 17 | |
diff --git t/src/pointer_array.t t/src/pointer_array.t
index 72395b8..0441ef2 100644
|
|
|
|
| 11 | 11 | use Parrot::Config; |
| 12 | 12 | use File::Spec::Functions; |
| 13 | 13 | |
| 14 | | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile(qw/src parrot_config.o/); |
| | 14 | my $parrot_config = "parrot_config" . $PConfig{o}; |
| | 15 | |
| | 16 | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile("src", $parrot_config); |
| 15 | 17 | |
| 16 | 18 | =head1 NAME |
| 17 | 19 | |
diff --git t/src/warnings.t t/src/warnings.t
index 28f797c..dfc4e56 100644
|
|
|
|
| 6 | 6 | use lib qw( . lib ../lib ../../lib ); |
| 7 | 7 | use Test::More; |
| 8 | 8 | use Parrot::Test; |
| | 9 | use Parrot::Config; |
| 9 | 10 | use File::Spec::Functions; |
| 10 | 11 | |
| 11 | | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile(qw/src parrot_config.o/); |
| | 12 | my $parrot_config = "parrot_config" . $PConfig{o}; |
| | 13 | |
| | 14 | plan skip_all => 'src/parrot_config.o does not exist' unless -e catfile("src", $parrot_config); |
| 12 | 15 | |
| 13 | 16 | plan tests => 2; |
| 14 | 17 | |