gen.pl

   1 #!perl
   2
   3 use strict;
   4 use warnings;
   5
   6 use Test::More;
   7 eval <<'EOD';
   8 use Test::Valgrind diag => 1,
   9                    no_test => 1,
  10                    no_supp => 1,
  11                    extra => [
  12                     q{--show-reachable=yes},
  13                     q{--gen-suppressions=all},
  14 #                    q{--log-fd=1}
  15                    ]
  16 EOD
  17 plan skip_all => 'Test::Valgrind is required to run test your distribution with valgrind' if $@;
  18
  19 1;
  20