← Index
NYTProf Performance Profile   « block view • line view • sub view »
For -e
  Run on Wed Nov 17 21:45:08 2010
Reported on Wed Nov 17 22:14:47 2010

Filename/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Moose/Meta/Method/Accessor/Native/Reader.pm
StatementsExecuted 108 statements in 2.89ms
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
411581µs2.21msMoose::Meta::Method::Accessor::Native::Reader::::_reader_coreMoose::Meta::Method::Accessor::Native::Reader::_reader_core
411458µs5.67msMoose::Meta::Method::Accessor::Native::Reader::::_generate_methodMoose::Meta::Method::Accessor::Native::Reader::_generate_method
411148µs220µsMoose::Meta::Method::Accessor::Native::Reader::::_inline_return_valueMoose::Meta::Method::Accessor::Native::Reader::_inline_return_value
11179µs97µsMoose::Meta::Method::Accessor::Native::Reader::::BEGIN@3Moose::Meta::Method::Accessor::Native::Reader::BEGIN@3
11148µs766µsMoose::Meta::Method::Accessor::Native::Reader::::BEGIN@63Moose::Meta::Method::Accessor::Native::Reader::BEGIN@63
11145µs14.9msMoose::Meta::Method::Accessor::Native::Reader::::BEGIN@10Moose::Meta::Method::Accessor::Native::Reader::BEGIN@10
11139µs107µsMoose::Meta::Method::Accessor::Native::Reader::::BEGIN@4Moose::Meta::Method::Accessor::Native::Reader::BEGIN@4
41136µs36µsMoose::Meta::Method::Accessor::Native::Reader::::_inline_process_argumentsMoose::Meta::Method::Accessor::Native::Reader::_inline_process_arguments
21115µs15µsMoose::Meta::Method::Accessor::Native::Reader::::_inline_check_argumentsMoose::Meta::Method::Accessor::Native::Reader::_inline_check_arguments
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package Moose::Meta::Method::Accessor::Native::Reader;
2
33103µs2115µs
# spent 97µs (79+18) within Moose::Meta::Method::Accessor::Native::Reader::BEGIN@3 which was called: # once (79µs+18µs) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 3
use strict;
# spent 97µs making 1 call to Moose::Meta::Method::Accessor::Native::Reader::BEGIN@3 # spent 18µs making 1 call to strict::import
43225µs2176µs
# spent 107µs (39+69) within Moose::Meta::Method::Accessor::Native::Reader::BEGIN@4 which was called: # once (39µs+69µs) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 4
use warnings;
# spent 107µs making 1 call to Moose::Meta::Method::Accessor::Native::Reader::BEGIN@4 # spent 68µs making 1 call to warnings::import
5
614µsour $VERSION = '1.19';
7182µs$VERSION = eval $VERSION;
# spent 11µs executing statements in string eval
814µsour $AUTHORITY = 'cpan:STEVAN';
9
1031.19ms229.8ms
# spent 14.9ms (45µs+14.9) within Moose::Meta::Method::Accessor::Native::Reader::BEGIN@10 which was called: # once (45µs+14.9ms) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 10
use Moose::Role;
11
12119µs114.1mswith 'Moose::Meta::Method::Accessor::Native';
# spent 14.1ms making 1 call to Moose::Role::with
13
14112µs1326µsrequires '_return_value';
# spent 326µs making 1 call to Moose::Role::requires
15
16
# spent 5.67ms (458µs+5.21) within Moose::Meta::Method::Accessor::Native::Reader::_generate_method which was called 4 times, avg 1.42ms/call: # 4 times (458µs+5.21ms) by Moose::Meta::Method::Accessor::Native::_initialize_body at line 48 of Moose/Meta/Method/Accessor/Native.pm, avg 1.42ms/call
sub _generate_method {
17413µs my $self = shift;
18
19412µs my $inv = '$self';
20
21411µs my $code = 'sub {';
22494µs436µs $code .= "\n" . $self->_inline_pre_body(@_);
# spent 36µs making 4 calls to Moose::Meta::Method::Accessor::_inline_pre_body, avg 9µs/call
23
24412µs $code .= "\n" . 'my $self = shift;';
25
26453µs4214µs $code .= "\n" . $self->_inline_curried_arguments;
# spent 214µs making 4 calls to Moose::Meta::Method::Accessor::Native::_inline_curried_arguments, avg 53µs/call
27
28459µs42.75ms my $slot_access = $self->_inline_get($inv);
# spent 1.78ms making 2 calls to Class::MOP::Class::__ANON__::SERIAL::6::_inline_get, avg 892µs/call # spent 491µs making 1 call to Class::MOP::Class::__ANON__::SERIAL::16::_inline_get # spent 475µs making 1 call to Class::MOP::Class::__ANON__::SERIAL::22::_inline_get
29
30471µs42.21ms $code .= "\n" . $self->_reader_core( $inv, $slot_access, @_ );
# spent 2.21ms making 4 calls to Moose::Meta::Method::Accessor::Native::Reader::_reader_core, avg 553µs/call
31
32410µs $code .= "\n}";
33
34467µs return $code;
35}
36
37
# spent 2.21ms (581µs+1.63) within Moose::Meta::Method::Accessor::Native::Reader::_reader_core which was called 4 times, avg 553µs/call: # 4 times (581µs+1.63ms) by Moose::Meta::Method::Accessor::Native::Reader::_generate_method at line 30, avg 553µs/call
sub _reader_core {
38425µs my ( $self, $inv, $slot_access, @extra ) = @_;
39
40411µs my $code = q{};
41
42457µs4831µs $code .= "\n" . $self->_inline_check_argument_count;
# spent 831µs making 4 calls to Moose::Meta::Method::Accessor::Native::_inline_check_argument_count, avg 208µs/call
43450µs436µs $code .= "\n" . $self->_inline_process_arguments( $inv, $slot_access );
# spent 36µs making 4 calls to Moose::Meta::Method::Accessor::Native::Reader::_inline_process_arguments, avg 9µs/call
44451µs4232µs $code .= "\n" . $self->_inline_check_arguments;
# spent 217µs making 2 calls to Moose::Meta::Method::Accessor::Native::Hash::get::_inline_check_arguments, avg 109µs/call # spent 15µs making 2 calls to Moose::Meta::Method::Accessor::Native::Reader::_inline_check_arguments, avg 8µs/call
45
46483µs4275µs $code .= "\n" . $self->_inline_check_lazy($inv);
# spent 275µs making 4 calls to Moose::Meta::Method::Accessor::_inline_check_lazy, avg 69µs/call
47498µs436µs $code .= "\n" . $self->_inline_post_body(@extra);
# spent 36µs making 4 calls to Moose::Meta::Method::Accessor::_inline_post_body, avg 9µs/call
48452µs4220µs $code .= "\n" . $self->_inline_return_value($slot_access);
# spent 220µs making 4 calls to Moose::Meta::Method::Accessor::Native::Reader::_inline_return_value, avg 55µs/call
49
50459µs return $code;
51}
52
53452µs
# spent 36µs within Moose::Meta::Method::Accessor::Native::Reader::_inline_process_arguments which was called 4 times, avg 9µs/call: # 4 times (36µs+0s) by Moose::Meta::Method::Accessor::Native::Reader::_reader_core at line 43, avg 9µs/call
sub _inline_process_arguments {q{}}
54
55230µs
# spent 15µs within Moose::Meta::Method::Accessor::Native::Reader::_inline_check_arguments which was called 2 times, avg 8µs/call: # 2 times (15µs+0s) by Moose::Meta::Method::Accessor::Native::Reader::_reader_core at line 44, avg 8µs/call
sub _inline_check_arguments {q{}}
56
57
# spent 220µs (148+72) within Moose::Meta::Method::Accessor::Native::Reader::_inline_return_value which was called 4 times, avg 55µs/call: # 4 times (148µs+72µs) by Moose::Meta::Method::Accessor::Native::Reader::_reader_core at line 48, avg 55µs/call
sub _inline_return_value {
58415µs my ( $self, $slot_access ) = @_;
59
60495µs472µs 'return ' . $self->_return_value($slot_access) . ';';
61}
62
633119µs21.48ms
# spent 766µs (48+718) within Moose::Meta::Method::Accessor::Native::Reader::BEGIN@63 which was called: # once (48µs+718µs) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 63
no Moose::Role;
64
65147µs1;