← Index
NYTProf Performance Profile   « line view »
For t/bug-md-11.t
  Run on Fri Mar 8 13:27:24 2024
Reported on Fri Mar 8 13:30:23 2024

Filename/home/micha/.plenv/versions/5.38.2/lib/perl5/site_perl/5.38.2/Test2/Event/Exception.pm
StatementsExecuted 10 statements in 197µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11110µs11µsTest2::Event::Exception::::BEGIN@2Test2::Event::Exception::BEGIN@2
1117µs7µsTest2::Event::Exception::::BEGIN@8Test2::Event::Exception::BEGIN@8
1115µs59µsTest2::Event::Exception::::BEGIN@9Test2::Event::Exception::BEGIN@9
1113µs25µsTest2::Event::Exception::::BEGIN@3Test2::Event::Exception::BEGIN@3
0000s0sTest2::Event::Exception::::causes_failTest2::Event::Exception::causes_fail
0000s0sTest2::Event::Exception::::diagnosticsTest2::Event::Exception::diagnostics
0000s0sTest2::Event::Exception::::facet_dataTest2::Event::Exception::facet_data
0000s0sTest2::Event::Exception::::initTest2::Event::Exception::init
0000s0sTest2::Event::Exception::::summaryTest2::Event::Exception::summary
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package Test2::Event::Exception;
2218µs213µs
# spent 11µs (10+2) within Test2::Event::Exception::BEGIN@2 which was called: # once (10µs+2µs) by Test2::API::BEGIN@97 at line 2
use strict;
# spent 11µs making 1 call to Test2::Event::Exception::BEGIN@2 # spent 2µs making 1 call to strict::import
3239µs247µs
# spent 25µs (3+22) within Test2::Event::Exception::BEGIN@3 which was called: # once (3µs+22µs) by Test2::API::BEGIN@97 at line 3
use warnings;
# spent 25µs making 1 call to Test2::Event::Exception::BEGIN@3 # spent 22µs making 1 call to warnings::import
4
51300nsour $VERSION = '1.302198';
6
7
8223µs17µs
# spent 7µs within Test2::Event::Exception::BEGIN@8 which was called: # once (7µs+0s) by Test2::API::BEGIN@97 at line 8
BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
# spent 7µs making 1 call to Test2::Event::Exception::BEGIN@8
92115µs2113µs
# spent 59µs (5+54) within Test2::Event::Exception::BEGIN@9 which was called: # once (5µs+54µs) by Test2::API::BEGIN@97 at line 9
use Test2::Util::HashBase qw{error};
# spent 59µs making 1 call to Test2::Event::Exception::BEGIN@9 # spent 54µs making 1 call to Test2::Util::HashBase::import
10
11sub init {
12 my $self = shift;
13 $self->{+ERROR} = "$self->{+ERROR}";
14}
15
16sub causes_fail { 1 }
17
18sub summary {
19 my $self = shift;
20 chomp(my $msg = "Exception: " . $self->{+ERROR});
21 return $msg;
22}
23
24sub diagnostics { 1 }
25
26sub facet_data {
27 my $self = shift;
28 my $out = $self->common_facet_data;
29
30 $out->{errors} = [
31 {
32 tag => 'ERROR',
33 fail => 1,
34 details => $self->{+ERROR},
35 }
36 ];
37
38 return $out;
39}
40
41
4212µs1;
43
44__END__