X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FTest%2FValgrind%2FTool%2Fmemcheck.pm;h=9064b5d90e6e25d5fa695f368e8a003f307ce9a2;hb=8a3289dfc8449aed2d53e35c52c269009630293e;hp=542ff9ddff7a3d5adb9526ad151e05ae940f6e7a;hpb=b34179155630f5f4cbea1749af4054a746ded9a4;p=perl%2Fmodules%2FTest-Valgrind.git diff --git a/lib/Test/Valgrind/Tool/memcheck.pm b/lib/Test/Valgrind/Tool/memcheck.pm index 542ff9d..9064b5d 100644 --- a/lib/Test/Valgrind/Tool/memcheck.pm +++ b/lib/Test/Valgrind/Tool/memcheck.pm @@ -9,11 +9,11 @@ Test::Valgrind::Tool::memcheck - Run an analysis through the memcheck tool. =head1 VERSION -Version 1.17 +Version 1.18 =cut -our $VERSION = '1.17'; +our $VERSION = '1.18'; =head1 DESCRIPTION @@ -137,7 +137,7 @@ sub args { '--error-limit=yes', ); - push @args, '--track-origins=yes' if $sess->version ge '3.4.0' + push @args, '--track-origins=yes' if $sess->version >= '3.4.0' and not $sess->do_suppressions; push @args, $self->SUPER::args(@_); @@ -180,7 +180,7 @@ package Test::Valgrind::Tool::memcheck::Report; use base qw; -our $VERSION = '1.17'; +our $VERSION = '1.18'; my @kinds = qw< InvalidFree