summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
inline | side by side (from parent 1:
60c3814)
This will make it easier to debug test failures (like if the child dies).
eval {
require Test::Valgrind;
eval {
require Test::Valgrind;
- Test::Valgrind->import;
+ Test::Valgrind->import(diag => 1);
-fail 'should not be seen';
+fail 'dummy test in the child, should not interfere with the actual TAP stream';
eval {
require Test::Valgrind;
eval {
require Test::Valgrind;
- Test::Valgrind->import(action => 'Test::Valgrind::Test::Action');
+ Test::Valgrind->import(
+ action => 'Test::Valgrind::Test::Action',
+ );
if ($@) {
diag $@;
} else {
if ($@) {
diag $@;
} else {
+ diag "leaking some bytes!";
Test::Valgrind::leak();
}
Test::Valgrind::leak();
}
-sub new { shift->SUPER::new(extra_tests => $extra_tests) }
+sub new {
+ my $class = shift;
+
+ $class->SUPER::new(
+ diag => 1,
+ extra_tests => $extra_tests,
+ );
+}