5 use Test::More tests => 2;
7 use lib qw{blib/archpub};
8 use Test::Valgrind::Suppressions qw/supp_path VG_PATH/;
10 my $path = supp_path();
11 like($path, qr!Test/Valgrind/perlTestValgrind\.supp$!,
12 'supppath() returns the path to the suppression file');
14 isnt(VG_PATH, undef, 'VG_PATH is defined');