← Index
NYTProf Performance Profile   « block view • line view • sub view »
For xt/tapper-mcp-scheduler-with-db-longrun.t
  Run on Tue May 22 17:18:39 2012
Reported on Tue May 22 17:22:48 2012

Filename/2home/ss5/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/x86_64-linux/Moose/Meta/Method/Accessor.pm
StatementsExecuted 126 statements in 1.22ms
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
921133µs4.03msMoose::Meta::Method::Accessor::::_compile_codeMoose::Meta::Method::Accessor::_compile_code
821126µs162µsMoose::Meta::Method::Accessor::::_instance_is_inlinableMoose::Meta::Method::Accessor::_instance_is_inlinable
911106µs3.72msMoose::Meta::Method::Accessor::::__ANON__[:39]Moose::Meta::Method::Accessor::__ANON__[:39]
61163µs7.09msMoose::Meta::Method::Accessor::::_generate_accessor_methodMoose::Meta::Method::Accessor::_generate_accessor_method
91160µs769µsMoose::Meta::Method::Accessor::::_eval_environmentMoose::Meta::Method::Accessor::_eval_environment
91142µs42µsMoose::Meta::Method::Accessor::::newMoose::Meta::Method::Accessor::new
21127µs2.00msMoose::Meta::Method::Accessor::::_generate_reader_methodMoose::Meta::Method::Accessor::_generate_reader_method
31126µs32µsMoose::Meta::Method::Accessor::::_error_throwerMoose::Meta::Method::Accessor::_error_thrower
91118µs18µsMoose::Meta::Method::Accessor::::_newMoose::Meta::Method::Accessor::_new
1119µs9µsMoose::Meta::Method::Accessor::::BEGIN@3Moose::Meta::Method::Accessor::BEGIN@3
1118µs26µsMoose::Meta::Method::Accessor::::BEGIN@11Moose::Meta::Method::Accessor::BEGIN@11
1118µs14µsMoose::Meta::Method::Accessor::::BEGIN@10Moose::Meta::Method::Accessor::BEGIN@10
1118µs136µsMoose::Meta::Method::Accessor::::BEGIN@15Moose::Meta::Method::Accessor::BEGIN@15
1117µs35µsMoose::Meta::Method::Accessor::::BEGIN@13Moose::Meta::Method::Accessor::BEGIN@13
0000s0sMoose::Meta::Method::Accessor::::__ANON__[:47]Moose::Meta::Method::Accessor::__ANON__[:47]
0000s0sMoose::Meta::Method::Accessor::::_generate_clearer_methodMoose::Meta::Method::Accessor::_generate_clearer_method
0000s0sMoose::Meta::Method::Accessor::::_generate_predicate_methodMoose::Meta::Method::Accessor::_generate_predicate_method
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 9µs within Moose::Meta::Method::Accessor::BEGIN@3 which was called: # once (9µs+0s) by Moose::Meta::Attribute::BEGIN@21 at line 5
BEGIN {
414µs $Moose::Meta::Method::Accessor::AUTHORITY = 'cpan:STEVAN';
5123µs19µs}
# spent 9µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@3
6{
721µs $Moose::Meta::Method::Accessor::VERSION = '2.0602';
8}
9
10318µs219µs
# spent 14µs (8+5) within Moose::Meta::Method::Accessor::BEGIN@10 which was called: # once (8µs+5µs) by Moose::Meta::Attribute::BEGIN@21 at line 10
use strict;
# spent 14µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@10 # spent 6µs making 1 call to strict::import
11323µs244µs
# spent 26µs (8+18) within Moose::Meta::Method::Accessor::BEGIN@11 which was called: # once (8µs+18µs) by Moose::Meta::Attribute::BEGIN@21 at line 11
use warnings;
# spent 26µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@11 # spent 18µs making 1 call to warnings::import
12
13320µs262µs
# spent 35µs (7+28) within Moose::Meta::Method::Accessor::BEGIN@13 which was called: # once (7µs+28µs) by Moose::Meta::Attribute::BEGIN@21 at line 13
use Try::Tiny;
# spent 35µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@13 # spent 28µs making 1 call to Exporter::import
14
151129µs
# spent 136µs (8+129) within Moose::Meta::Method::Accessor::BEGIN@15 which was called: # once (8µs+129µs) by Moose::Meta::Attribute::BEGIN@21 at line 16
use base 'Moose::Meta::Method',
# spent 129µs making 1 call to base::import
163521µs1136µs 'Class::MOP::Method::Accessor';
# spent 136µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@15
17
18# multiple inheritance is terrible
19
# spent 42µs within Moose::Meta::Method::Accessor::new which was called 9 times, avg 5µs/call: # 9 times (42µs+0s) by Class::MOP::Attribute::__ANON__[/2home/ss5/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/x86_64-linux/Class/MOP/Attribute.pm:398] at line 389 of Class/MOP/Attribute.pm, avg 5µs/call
sub new {
20962µs914.2ms goto &Class::MOP::Method::Accessor::new;
# spent 14.2ms making 9 calls to Class::MOP::Method::Accessor::new, avg 1.58ms/call
21}
22
23
# spent 18µs within Moose::Meta::Method::Accessor::_new which was called 9 times, avg 2µs/call: # 9 times (18µs+0s) by Class::MOP::Method::Accessor::new at line 35 of Class/MOP/Method/Accessor.pm, avg 2µs/call
sub _new {
24938µs93.83ms goto &Class::MOP::Method::Accessor::_new;
# spent 3.83ms making 9 calls to Class::MOP::Method::Accessor::_new, avg 426µs/call
25}
26
27
# spent 32µs (26+6) within Moose::Meta::Method::Accessor::_error_thrower which was called 3 times, avg 11µs/call: # 3 times (26µs+6µs) by Moose::Meta::Method::_inline_throw_error at line 37 of Moose/Meta/Method.pm, avg 11µs/call
sub _error_thrower {
28619µs my $self = shift;
2966µs return $self->associated_attribute
# spent 6µs making 6 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 4.03ms (133µs+3.89) within Moose::Meta::Method::Accessor::_compile_code which was called 9 times, avg 447µs/call: # 6 times (80µs+2.75ms) by Class::MOP::Method::Accessor::__ANON__[/2home/ss5/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/x86_64-linux/Class/MOP/Method/Accessor.pm:120] at line 112 of Class/MOP/Method/Accessor.pm, avg 472µs/call # 3 times (53µs+1.14ms) by Class::MOP::Method::Accessor::__ANON__[/2home/ss5/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/x86_64-linux/Class/MOP/Method/Accessor.pm:154] at line 142 of Class/MOP/Method/Accessor.pm, avg 398µs/call
sub _compile_code {
3527124µs my $self = shift;
36 my @args = @_;
37
# spent 3.72ms (106µs+3.62) within Moose::Meta::Method::Accessor::__ANON__[/2home/ss5/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/x86_64-linux/Moose/Meta/Method/Accessor.pm:39] which was called 9 times, avg 414µs/call: # 9 times (106µs+3.62ms) by Try::Tiny::try at line 71 of Try/Tiny.pm, avg 414µs/call
try {
389110µs93.62ms $self->SUPER::_compile_code(@args);
# spent 3.62ms making 9 calls to Class::MOP::Method::Generated::_compile_code, avg 402µ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 );
471828µs };
# spent 28µs making 9 calls to Try::Tiny::catch, avg 3µs/call # spent 3.86ms making 9 calls to Try::Tiny::try, avg 429µs/call, recursion: max depth 3, sum of overlapping time 3.86ms
48}
49
50
# spent 769µs (60+709) within Moose::Meta::Method::Accessor::_eval_environment which was called 9 times, avg 85µs/call: # 9 times (60µs+709µs) by Class::MOP::Method::Generated::_compile_code at line 59 of Class/MOP/Method/Generated.pm, avg 85µs/call
sub _eval_environment {
511850µs my $self = shift;
5218709µs return $self->associated_attribute->_eval_environment;
# spent 696µs making 9 calls to Moose::Meta::Attribute::_eval_environment, avg 77µs/call # spent 13µs making 9 calls to Class::MOP::Method::Accessor::associated_attribute, avg 1µs/call
53}
54
55
# spent 162µs (126+35) within Moose::Meta::Method::Accessor::_instance_is_inlinable which was called 8 times, avg 20µs/call: # 6 times (94µs+27µs) by Moose::Meta::Method::Accessor::_generate_accessor_method at line 74, avg 20µs/call # 2 times (32µs+8µs) by Moose::Meta::Method::Accessor::_generate_reader_method at line 62, avg 20µs/call
sub _instance_is_inlinable {
5616126µs my $self = shift;
573235µs return $self->associated_attribute->associated_class->instance_metaclass->is_inlinable;
# spent 12µs making 8 calls to Class::MOP::Instance::is_inlinable, avg 1µs/call # spent 12µs making 8 calls to Class::MOP::Method::Accessor::associated_attribute, avg 1µs/call # spent 7µs making 8 calls to Class::MOP::Class::instance_metaclass, avg 837ns/call # spent 5µs making 8 calls to Class::MOP::Attribute::associated_class, avg 650ns/call
58}
59
60
# spent 2.00ms (27µs+1.97) within Moose::Meta::Method::Accessor::_generate_reader_method which was called 2 times, avg 1.00ms/call: # 2 times (27µs+1.97ms) by Class::MOP::Method::Accessor::_initialize_body at line 90 of Class/MOP/Method/Accessor.pm, avg 1.00ms/call
sub _generate_reader_method {
61425µs my $self = shift;
6241.97ms $self->_instance_is_inlinable ? $self->_generate_reader_method_inline(@_)
# spent 1.93ms making 2 calls to Class::MOP::Method::Accessor::_generate_reader_method_inline, avg 967µs/call # spent 40µs making 2 calls to Moose::Meta::Method::Accessor::_instance_is_inlinable, avg 20µ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 7.09ms (63µs+7.03) within Moose::Meta::Method::Accessor::_generate_accessor_method which was called 6 times, avg 1.18ms/call: # 6 times (63µs+7.03ms) by Class::MOP::Method::Accessor::_initialize_body at line 90 of Class/MOP/Method/Accessor.pm, avg 1.18ms/call
sub _generate_accessor_method {
731257µs my $self = shift;
74127.03ms $self->_instance_is_inlinable ? $self->_generate_accessor_method_inline(@_)
# spent 6.91ms making 6 calls to Class::MOP::Method::Accessor::_generate_accessor_method_inline, avg 1.15ms/call # spent 121µs making 6 calls to Moose::Meta::Method::Accessor::_instance_is_inlinable, avg 20µs/call
75 : $self->SUPER::_generate_accessor_method(@_);
76}
77
78sub _generate_predicate_method {
79 my $self = shift;
80 $self->_instance_is_inlinable ? $self->_generate_predicate_method_inline(@_)
81 : $self->SUPER::_generate_predicate_method(@_);
82}
83
84sub _generate_clearer_method {
85 my $self = shift;
86 $self->_instance_is_inlinable ? $self->_generate_clearer_method_inline(@_)
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
13012µs1;
131
132# ABSTRACT: A Moose Method metaclass for accessors
133
- -
136=pod
137
138=head1 NAME
139
140Moose::Meta::Method::Accessor - A Moose Method metaclass for accessors
141
142=head1 VERSION
143
144version 2.0602
145
146=head1 DESCRIPTION
147
148This class is a subclass of L<Class::MOP::Method::Accessor> that
149provides additional Moose-specific functionality, all of which is
150private.
151
152To understand this class, you should read the the
153L<Class::MOP::Method::Accessor> documentation.
154
155=head1 BUGS
156
157See L<Moose/BUGS> for details on reporting bugs.
158
159=head1 AUTHOR
160
161Moose is maintained by the Moose Cabal, along with the help of many contributors. See L<Moose/CABAL> and L<Moose/CONTRIBUTORS> for details.
162
163=head1 COPYRIGHT AND LICENSE
164
165This software is copyright (c) 2012 by Infinity Interactive, Inc..
166
167This is free software; you can redistribute it and/or modify it under
168the same terms as the Perl 5 programming language system itself.
169
170=cut
171
172
173__END__