]> git.vpit.fr Git - perl/modules/Test-Valgrind.git/blob - t/10-good.t
0d5696759d2c944fe892aff9dc40e9f60c84c960
[perl/modules/Test-Valgrind.git] / t / 10-good.t
1 #!perl
2
3 use strict;
4 use warnings;
5
6 use Test::More;
7
8 use lib 't/lib';
9
10 eval {
11  require Test::Valgrind;
12  Test::Valgrind->import(diag => 1);
13 };
14 if ($@) {
15  diag $@;
16  plan skip_all
17         => 'Test::Valgrind is required to test your distribution with valgrind';
18 }
19
20 {
21  package Test::Valgrind::Test::Fake;
22
23  use base qw<strict>;
24 }
25
26 plan tests => 1;
27 fail 'dummy test in the child, should not interfere with the actual TAP stream';