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(
  13   diag           => 1,
  14   regen_def_supp => 1,
  15  );
  16 };
  17 if ($@) {
  18  diag $@;
  19  plan skip_all
  20         => 'Test::Valgrind is required to test your distribution with valgrind';
  21 }
  22
  23 {
  24  package Test::Valgrind::Test::Fake;
  25
  26  use base qw<strict>;
  27 }
  28
  29 plan tests => 1;
  30 fail 'dummy test in the child, should not interfere with the actual TAP stream';