Add a default ->filter() to tools

[perl/modules/Test-Valgrind.git] / lib / Test / Valgrind / Tool.pm

diff --git a/lib/Test/Valgrind/Tool.pm b/lib/Test/Valgrind/Tool.pm
index 8a0675fa8b6d2084ed5281354d2a1a029e12f854..54598a596d84c0b6f6138ae653791e37254c0b85 100644 (file)
--- a/lib/Test/Valgrind/Tool.pm
+++ b/lib/Test/Valgrind/Tool.pm
@@ -118,6 +118,17 @@ Called when the C<$session> starts.
 
 Defaults to set L<Test::Valgrind::Component/started>.
 
+=head2 C<filter $session, $report>
+
+The <$session> calls this method after receiving a report from the parser and before letting the command filter it.
+You can either return a mangled C<$report> (which does not need to be a clone of the original) or C<undef> if you want the action to ignore it completely.
+
+Defaults to the identity function.
+
+=cut
+
+sub filter { $_[2] }
+
 =head2 C<finish $session>
 
 Called when the C<$session> finishes.