]> git.vpit.fr Git - perl/modules/Test-Valgrind.git/blobdiff - gen.pl
Use clean Suppressions.pm and perlTestValgrind.supp when building a dist
[perl/modules/Test-Valgrind.git] / gen.pl
diff --git a/gen.pl b/gen.pl
index 65726b04656f45027738ed801a9fbed5305fcce5..eb751e417ff9f62136cd0fa0ef99112e685edb2b 100755 (executable)
--- a/gen.pl
+++ b/gen.pl
@@ -13,13 +13,18 @@ eval {
 if ($@) {
  plan skip_all => 'Test::Valgrind is required to run test your distribution with valgrind';
 } else {
- eval {
+ eval "
+  use lib qw{blib/arch};
   require XSLoader;
-  XSLoader::load('Test::Valgrind', $Test::Valgrind::VERSION);
};
+  XSLoader::load('Test::Valgrind', \$Test::Valgrind::VERSION);
";
  unless ($@) {
   Test::Valgrind::notleak("valgrind it!");
+ } else {
+  diag $@;
  }
+ plan tests => 1;
+ fail('fake');
 }
 
 1;