← Index
NYTProf Performance Profile   « block view • line view • sub view »
For mentat.storage.mongo.pl
  Run on Tue Jun 24 09:58:41 2014
Reported on Tue Jun 24 09:59:13 2014

Filename/usr/local/lib/perl/5.14.2/Moose/Meta/Method/Accessor.pm
StatementsExecuted 836 statements in 3.03ms
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
6441609µs22.1msMoose::Meta::Method::Accessor::::_compile_codeMoose::Meta::Method::Accessor::_compile_code
6341484µs681µsMoose::Meta::Method::Accessor::::_instance_is_inlinableMoose::Meta::Method::Accessor::_instance_is_inlinable
6411296µs4.16msMoose::Meta::Method::Accessor::::_eval_environmentMoose::Meta::Method::Accessor::_eval_environment
3011147µs26.0msMoose::Meta::Method::Accessor::::_generate_accessor_methodMoose::Meta::Method::Accessor::_generate_accessor_method
2911145µs20.4msMoose::Meta::Method::Accessor::::_generate_reader_methodMoose::Meta::Method::Accessor::_generate_reader_method
3011143µs207µsMoose::Meta::Method::Accessor::::_error_throwerMoose::Meta::Method::Accessor::_error_thrower
6411105µs105µsMoose::Meta::Method::Accessor::::newMoose::Meta::Method::Accessor::new
641166µs66µsMoose::Meta::Method::Accessor::::_newMoose::Meta::Method::Accessor::_new
21124µs714µsMoose::Meta::Method::Accessor::::_generate_predicate_methodMoose::Meta::Method::Accessor::_generate_predicate_method
21118µs754µsMoose::Meta::Method::Accessor::::_generate_clearer_methodMoose::Meta::Method::Accessor::_generate_clearer_method
1118µs8µsMoose::Meta::Method::Accessor::::BEGIN@3Moose::Meta::Method::Accessor::BEGIN@3
1117µs10µsMoose::Meta::Method::Accessor::::BEGIN@10Moose::Meta::Method::Accessor::BEGIN@10
1117µs12µsMoose::Meta::Method::Accessor::::BEGIN@11Moose::Meta::Method::Accessor::BEGIN@11
1117µs38µsMoose::Meta::Method::Accessor::::BEGIN@13Moose::Meta::Method::Accessor::BEGIN@13
1117µs74µsMoose::Meta::Method::Accessor::::BEGIN@15Moose::Meta::Method::Accessor::BEGIN@15
0000s0sMoose::Meta::Method::Accessor::::__ANON__[:39]Moose::Meta::Method::Accessor::__ANON__[:39]
0000s0sMoose::Meta::Method::Accessor::::__ANON__[:47]Moose::Meta::Method::Accessor::__ANON__[:47]
0000s0sMoose::Meta::Method::Accessor::::_generate_writer_methodMoose::Meta::Method::Accessor::_generate_writer_method
0000s0sMoose::Meta::Method::Accessor::::_get_valueMoose::Meta::Method::Accessor::_get_value
0000s0sMoose::Meta::Method::Accessor::::_has_valueMoose::Meta::Method::Accessor::_has_value
0000s0sMoose::Meta::Method::Accessor::::_inline_check_coercionMoose::Meta::Method::Accessor::_inline_check_coercion
0000s0sMoose::Meta::Method::Accessor::::_inline_check_constraintMoose::Meta::Method::Accessor::_inline_check_constraint
0000s0sMoose::Meta::Method::Accessor::::_inline_check_lazyMoose::Meta::Method::Accessor::_inline_check_lazy
0000s0sMoose::Meta::Method::Accessor::::_inline_get_old_value_for_triggerMoose::Meta::Method::Accessor::_inline_get_old_value_for_trigger
0000s0sMoose::Meta::Method::Accessor::::_inline_store_valueMoose::Meta::Method::Accessor::_inline_store_value
0000s0sMoose::Meta::Method::Accessor::::_inline_tc_codeMoose::Meta::Method::Accessor::_inline_tc_code
0000s0sMoose::Meta::Method::Accessor::::_inline_triggerMoose::Meta::Method::Accessor::_inline_trigger
0000s0sMoose::Meta::Method::Accessor::::_writer_value_needs_copyMoose::Meta::Method::Accessor::_writer_value_needs_copy
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1
2package Moose::Meta::Method::Accessor;
3
# spent 8µs within Moose::Meta::Method::Accessor::BEGIN@3 which was called: # once (8µs+0s) by Moose::Meta::Attribute::BEGIN@21 at line 5
BEGIN {
415µs $Moose::Meta::Method::Accessor::AUTHORITY = 'cpan:STEVAN';
5130µs18µs}
# spent 8µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@3
6{
721µs $Moose::Meta::Method::Accessor::VERSION = '2.1005';
8}
9
10227µs214µs
# spent 10µs (7+3) within Moose::Meta::Method::Accessor::BEGIN@10 which was called: # once (7µs+3µs) by Moose::Meta::Attribute::BEGIN@21 at line 10
use strict;
# spent 10µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@10 # spent 3µs making 1 call to strict::import
11220µs217µs
# spent 12µs (7+5) within Moose::Meta::Method::Accessor::BEGIN@11 which was called: # once (7µs+5µs) by Moose::Meta::Attribute::BEGIN@21 at line 11
use warnings;
# spent 12µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@11 # spent 5µs making 1 call to warnings::import
12
13227µs269µs
# spent 38µs (7+31) within Moose::Meta::Method::Accessor::BEGIN@13 which was called: # once (7µs+31µs) by Moose::Meta::Attribute::BEGIN@21 at line 13
use Try::Tiny;
# spent 38µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@13 # spent 31µs making 1 call to Exporter::import
14
15168µs
# spent 74µs (7+68) within Moose::Meta::Method::Accessor::BEGIN@15 which was called: # once (7µs+68µs) by Moose::Meta::Attribute::BEGIN@21 at line 16
use base 'Moose::Meta::Method',
# spent 68µs making 1 call to base::import
162542µs174µs 'Class::MOP::Method::Accessor';
# spent 74µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@15
17
18# multiple inheritance is terrible
19
# spent 105µs within Moose::Meta::Method::Accessor::new which was called 64 times, avg 2µs/call: # 64 times (105µs+0s) by Class::MOP::Attribute::try {...} at line 389 of Class/MOP/Attribute.pm, avg 2µs/call
sub new {
2064218µs6462.9ms goto &Class::MOP::Method::Accessor::new;
# spent 62.9ms making 64 calls to Class::MOP::Method::Accessor::new, avg 982µs/call
21}
22
23
# spent 66µs within Moose::Meta::Method::Accessor::_new which was called 64 times, avg 1µs/call: # 64 times (66µs+0s) by Class::MOP::Method::Accessor::new at line 35 of Class/MOP/Method/Accessor.pm, avg 1µs/call
sub _new {
2464163µs6412.1ms goto &Class::MOP::Method::Accessor::_new;
# spent 12.1ms making 64 calls to Class::MOP::Method::Accessor::_new, avg 190µs/call
25}
26
27
# spent 207µs (143+64) within Moose::Meta::Method::Accessor::_error_thrower which was called 30 times, avg 7µs/call: # 30 times (143µs+64µs) by Moose::Meta::Method::_inline_throw_error at line 37 of Moose/Meta/Method.pm, avg 7µs/call
sub _error_thrower {
2860111µs my $self = shift;
296064µs return $self->associated_attribute
# spent 64µs making 60 calls to Class::MOP::Method::Accessor::associated_attribute, avg 1µs/call
30 if ref($self) && defined($self->associated_attribute);
31 return $self->SUPER::_error_thrower;
32}
33
34
# spent 22.1ms (609µs+21.5) within Moose::Meta::Method::Accessor::_compile_code which was called 64 times, avg 345µs/call: # 30 times (283µs+10.8ms) by Class::MOP::Method::Accessor::try {...} at line 112 of Class/MOP/Method/Accessor.pm, avg 371µs/call # 30 times (288µs+9.55ms) by Class::MOP::Method::Accessor::try {...} at line 142 of Class/MOP/Method/Accessor.pm, avg 328µs/call # 2 times (21µs+537µs) by Class::MOP::Method::Accessor::try {...} at line 229 of Class/MOP/Method/Accessor.pm, avg 279µs/call # 2 times (17µs+523µs) by Class::MOP::Method::Accessor::try {...} at line 204 of Class/MOP/Method/Accessor.pm, avg 270µs/call
sub _compile_code {
35192551µs my $self = shift;
36 my @args = @_;
37 try {
3864318µs6419.6ms $self->SUPER::_compile_code(@args);
# spent 19.6ms making 64 calls to Class::MOP::Method::Generated::_compile_code, avg 307µs/call
39 }
40 catch {
41 $self->throw_error(
42 'Could not create writer for '
43 . "'" . $self->associated_attribute->name . "' "
44 . 'because ' . $_,
45 error => $_,
46 );
47128182µs };
# spent 182µs making 64 calls to Try::Tiny::catch, avg 3µs/call # spent 21.3ms making 64 calls to Try::Tiny::try, avg 332µs/call, recursion: max depth 3, sum of overlapping time 21.3ms
48}
49
50
# spent 4.16ms (296µs+3.86) within Moose::Meta::Method::Accessor::_eval_environment which was called 64 times, avg 65µs/call: # 64 times (296µs+3.86ms) by Class::MOP::Method::Generated::_compile_code at line 59 of Class/MOP/Method/Generated.pm, avg 65µs/call
sub _eval_environment {
51128226µs my $self = shift;
521283.86ms return $self->associated_attribute->_eval_environment;
# spent 3.78ms making 64 calls to Moose::Meta::Attribute::_eval_environment, avg 59µs/call # spent 82µs making 64 calls to Class::MOP::Method::Accessor::associated_attribute, avg 1µs/call
53}
54
55
# spent 681µs (484+197) within Moose::Meta::Method::Accessor::_instance_is_inlinable which was called 63 times, avg 11µs/call: # 30 times (231µs+95µs) by Moose::Meta::Method::Accessor::_generate_accessor_method at line 74, avg 11µs/call # 29 times (223µs+90µs) by Moose::Meta::Method::Accessor::_generate_reader_method at line 62, avg 11µs/call # 2 times (15µs+6µs) by Moose::Meta::Method::Accessor::_generate_predicate_method at line 80, avg 11µs/call # 2 times (15µs+6µs) by Moose::Meta::Method::Accessor::_generate_clearer_method at line 86, avg 11µs/call
sub _instance_is_inlinable {
56126527µs my $self = shift;
57252197µs return $self->associated_attribute->associated_class->instance_metaclass->is_inlinable;
# spent 59µs making 63 calls to Class::MOP::Method::Accessor::associated_attribute, avg 943ns/call # spent 52µs making 63 calls to Class::MOP::Instance::is_inlinable, avg 829ns/call # spent 44µs making 63 calls to Class::MOP::Class::instance_metaclass, avg 692ns/call # spent 42µs making 63 calls to Class::MOP::Attribute::associated_class, avg 667ns/call
58}
59
60
# spent 20.4ms (145µs+20.3) within Moose::Meta::Method::Accessor::_generate_reader_method which was called 29 times, avg 703µs/call: # 29 times (145µs+20.3ms) by Class::MOP::Method::Accessor::_initialize_body at line 90 of Class/MOP/Method/Accessor.pm, avg 703µs/call
sub _generate_reader_method {
6158111µs my $self = shift;
625820.3ms $self->_instance_is_inlinable ? $self->_generate_reader_method_inline(@_)
# spent 19.9ms making 29 calls to Class::MOP::Method::Accessor::_generate_reader_method_inline, avg 688µs/call # spent 313µs making 29 calls to Moose::Meta::Method::Accessor::_instance_is_inlinable, avg 11µs/call
63 : $self->SUPER::_generate_reader_method(@_);
64}
65
66sub _generate_writer_method {
67 my $self = shift;
68 $self->_instance_is_inlinable ? $self->_generate_writer_method_inline(@_)
69 : $self->SUPER::_generate_writer_method(@_);
70}
71
72
# spent 26.0ms (147µs+25.9) within Moose::Meta::Method::Accessor::_generate_accessor_method which was called 30 times, avg 868µs/call: # 30 times (147µs+25.9ms) by Class::MOP::Method::Accessor::_initialize_body at line 90 of Class/MOP/Method/Accessor.pm, avg 868µs/call
sub _generate_accessor_method {
7360118µs my $self = shift;
746025.9ms $self->_instance_is_inlinable ? $self->_generate_accessor_method_inline(@_)
# spent 25.6ms making 30 calls to Class::MOP::Method::Accessor::_generate_accessor_method_inline, avg 852µs/call # spent 325µs making 30 calls to Moose::Meta::Method::Accessor::_instance_is_inlinable, avg 11µs/call
75 : $self->SUPER::_generate_accessor_method(@_);
76}
77
78
# spent 714µs (24+690) within Moose::Meta::Method::Accessor::_generate_predicate_method which was called 2 times, avg 357µs/call: # 2 times (24µs+690µs) by Class::MOP::Method::Accessor::_initialize_body at line 90 of Class/MOP/Method/Accessor.pm, avg 357µs/call
sub _generate_predicate_method {
79414µs my $self = shift;
804690µs $self->_instance_is_inlinable ? $self->_generate_predicate_method_inline(@_)
# spent 669µs making 2 calls to Class::MOP::Method::Accessor::_generate_predicate_method_inline, avg 334µs/call # spent 21µs making 2 calls to Moose::Meta::Method::Accessor::_instance_is_inlinable, avg 11µs/call
81 : $self->SUPER::_generate_predicate_method(@_);
82}
83
84
# spent 754µs (18+737) within Moose::Meta::Method::Accessor::_generate_clearer_method which was called 2 times, avg 377µs/call: # 2 times (18µs+737µs) by Class::MOP::Method::Accessor::_initialize_body at line 90 of Class/MOP/Method/Accessor.pm, avg 377µs/call
sub _generate_clearer_method {
85414µs my $self = shift;
864737µs $self->_instance_is_inlinable ? $self->_generate_clearer_method_inline(@_)
# spent 716µs making 2 calls to Class::MOP::Method::Accessor::_generate_clearer_method_inline, avg 358µs/call # spent 21µs making 2 calls to Moose::Meta::Method::Accessor::_instance_is_inlinable, avg 11µs/call
87 : $self->SUPER::_generate_clearer_method(@_);
88}
89
90sub _writer_value_needs_copy {
91 shift->associated_attribute->_writer_value_needs_copy(@_);
92}
93
94sub _inline_tc_code {
95 shift->associated_attribute->_inline_tc_code(@_);
96}
97
98sub _inline_check_coercion {
99 shift->associated_attribute->_inline_check_coercion(@_);
100}
101
102sub _inline_check_constraint {
103 shift->associated_attribute->_inline_check_constraint(@_);
104}
105
106sub _inline_check_lazy {
107 shift->associated_attribute->_inline_check_lazy(@_);
108}
109
110sub _inline_store_value {
111 shift->associated_attribute->_inline_instance_set(@_) . ';';
112}
113
114sub _inline_get_old_value_for_trigger {
115 shift->associated_attribute->_inline_get_old_value_for_trigger(@_);
116}
117
118sub _inline_trigger {
119 shift->associated_attribute->_inline_trigger(@_);
120}
121
122sub _get_value {
123 shift->associated_attribute->_inline_instance_get(@_);
124}
125
126sub _has_value {
127 shift->associated_attribute->_inline_instance_has(@_);
128}
129
13013µs1;
131
132# ABSTRACT: A Moose Method metaclass for accessors
133
134__END__