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