← Index
NYTProf Performance Profile   « line view »
For t/optimization.t
  Run on Thu Jan 8 22:47:42 2015
Reported on Thu Jan 8 22:48:06 2015

Filename/home/ss5/perl5/perlbrew/perls/tapper-perl/lib/site_perl/5.16.3/Test/Deep/Blessed.pm
StatementsExecuted 25 statements in 305µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
21123µs119µsTest::Deep::Blessed::::descendTest::Deep::Blessed::descend
11122µs38µsTest::Deep::::BEGIN@1.20 Test::Deep::BEGIN@1.20
11111µs17µsTest::Deep::::BEGIN@2.21 Test::Deep::BEGIN@2.21
11111µs45µsTest::Deep::Blessed::::BEGIN@8Test::Deep::Blessed::BEGIN@8
11111µs28µsTest::Deep::Blessed::::BEGIN@6Test::Deep::Blessed::BEGIN@6
2116µs6µsTest::Deep::Blessed::::initTest::Deep::Blessed::init
0000s0sTest::Deep::Blessed::::renderGotTest::Deep::Blessed::renderGot
0000s0sTest::Deep::Blessed::::render_stackTest::Deep::Blessed::render_stack
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1231µs255µs
# spent 38µs (22+17) within Test::Deep::BEGIN@1.20 which was called: # once (22µs+17µs) by Test::Deep::__ANON__[/home/ss5/perl5/perlbrew/perls/tapper-perl/lib/site_perl/5.16.3/Test/Deep.pm:81] at line 1
use strict;
# spent 38µs making 1 call to Test::Deep::BEGIN@1.20 # spent 17µs making 1 call to strict::import
2235µs223µs
# spent 17µs (11+6) within Test::Deep::BEGIN@2.21 which was called: # once (11µs+6µs) by Test::Deep::__ANON__[/home/ss5/perl5/perlbrew/perls/tapper-perl/lib/site_perl/5.16.3/Test/Deep.pm:81] at line 2
use warnings;
# spent 17µs making 1 call to Test::Deep::BEGIN@2.21 # spent 6µs making 1 call to warnings::import
3
4package Test::Deep::Blessed;
5
6230µs245µs
# spent 28µs (11+17) within Test::Deep::Blessed::BEGIN@6 which was called: # once (11µs+17µs) by Test::Deep::__ANON__[/home/ss5/perl5/perlbrew/perls/tapper-perl/lib/site_perl/5.16.3/Test/Deep.pm:81] at line 6
use Test::Deep::Cmp;
# spent 28µs making 1 call to Test::Deep::Blessed::BEGIN@6 # spent 17µs making 1 call to Test::Deep::Cmp::import
7
82176µs279µs
# spent 45µs (11+34) within Test::Deep::Blessed::BEGIN@8 which was called: # once (11µs+34µs) by Test::Deep::__ANON__[/home/ss5/perl5/perlbrew/perls/tapper-perl/lib/site_perl/5.16.3/Test/Deep.pm:81] at line 8
use Scalar::Util qw( blessed );
# spent 45µs making 1 call to Test::Deep::Blessed::BEGIN@8 # spent 34µs making 1 call to Exporter::import
9
10sub init
11
# spent 6µs within Test::Deep::Blessed::init which was called 2 times, avg 3µs/call: # 2 times (6µs+0s) by Test::Deep::Cmp::new at line 33 of Test/Deep/Cmp.pm, avg 3µs/call
{
122700ns my $self = shift;
13
142600ns my $val = shift;
15
16210µs $self->{val} = $val;
17}
18
19sub descend
20
# spent 119µs (23+96) within Test::Deep::Blessed::descend which was called 2 times, avg 60µs/call: # 2 times (23µs+96µs) by Test::Deep::descend at line 344 of Test/Deep.pm, avg 60µs/call
{
212900ns my $self = shift;
222500ns my $got = shift;
23
2422µs my $exp = $self->{val};
2527µs21µs my $blessed = blessed($got);
# spent 1µs making 2 calls to Scalar::Util::blessed, avg 550ns/call
26
27210µs428µs return Test::Deep::descend($blessed, Test::Deep::shallow($exp));
# spent 28µs making 2 calls to Test::Deep::__ANON__[Test/Deep.pm:81], avg 14µs/call # spent 67µs making 2 calls to Test::Deep::descend, avg 34µs/call, recursion: max depth 3, sum of overlapping time 67µs
28}
29
30sub render_stack
31{
32 my $self = shift;
33 my $var = shift;
34
35 return "blessed($var)"
36}
37
38sub renderGot
39{
40 my $self = shift;
41
42 my $got = shift;
43
44 $self->SUPER::renderGot(blessed($got));
45}
46
4712µs1;