]> git.vpit.fr Git - perl/modules/Test-Valgrind.git/blob - t/20-good.t
Output what we got when t/30-bad.t fails
[perl/modules/Test-Valgrind.git] / t / 20-good.t
1 #!perl
2
3 use strict;
4 use warnings;
5
6 use Test::More;
7 use lib qw{blib/archpub};
8 eval 'use Test::Valgrind';
9 if ($@) {
10  diag $@;
11  plan skip_all => 'Test::Valgrind is required to run test your distribution with valgrind';
12 }
13
14 plan tests => 1;
15 fail('bogus failure, don\'t worry');