line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package Test::Builder::TodoDiag; |
2
|
162
|
|
|
162
|
|
1213
|
use strict; |
|
162
|
|
|
|
|
355
|
|
|
162
|
|
|
|
|
4936
|
|
3
|
162
|
|
|
162
|
|
819
|
use warnings; |
|
162
|
|
|
|
|
320
|
|
|
162
|
|
|
|
|
9727
|
|
4
|
|
|
|
|
|
|
|
5
|
|
|
|
|
|
|
our $VERSION = '1.302180'; |
6
|
|
|
|
|
|
|
|
7
|
162
|
|
|
162
|
|
1021
|
BEGIN { require Test2::Event::Diag; our @ISA = qw(Test2::Event::Diag) } |
|
162
|
|
|
|
|
18110
|
|
8
|
|
|
|
|
|
|
|
9
|
0
|
|
|
0
|
1
|
0
|
sub diagnostics { 0 } |
10
|
|
|
|
|
|
|
|
11
|
|
|
|
|
|
|
sub facet_data { |
12
|
610
|
|
|
610
|
1
|
995
|
my $self = shift; |
13
|
610
|
|
|
|
|
1492
|
my $out = $self->SUPER::facet_data(); |
14
|
610
|
|
|
|
|
1105
|
$out->{info}->[0]->{debug} = 0; |
15
|
610
|
|
|
|
|
1375
|
return $out; |
16
|
|
|
|
|
|
|
} |
17
|
|
|
|
|
|
|
|
18
|
|
|
|
|
|
|
1; |
19
|
|
|
|
|
|
|
|
20
|
|
|
|
|
|
|
__END__ |