X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=gen.pl;h=9376b5c39f05d69fc084254ee32c3a4006d94c40;hb=66686a5cd7b12c4d529afd82273bd81cacf1ee6d;hp=99d5ca5cbf196d17b7af18e2f876b243056f87f7;hpb=0e72be5f3401932cb010b7069470e9ee999ff287;p=perl%2Fmodules%2FTest-Valgrind.git diff --git a/gen.pl b/gen.pl index 99d5ca5..9376b5c 100755 --- a/gen.pl +++ b/gen.pl @@ -1,5 +1,3 @@ -#!perl - use strict; use warnings; @@ -15,12 +13,15 @@ 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 $@; } }