Filename | /usr/local/lib/perl/5.14.2/Moose/Meta/Method/Accessor.pm |
Statements | Executed 836 statements in 3.03ms |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
64 | 4 | 1 | 609µs | 22.1ms | _compile_code | Moose::Meta::Method::Accessor::
63 | 4 | 1 | 484µs | 681µs | _instance_is_inlinable | Moose::Meta::Method::Accessor::
64 | 1 | 1 | 296µs | 4.16ms | _eval_environment | Moose::Meta::Method::Accessor::
30 | 1 | 1 | 147µs | 26.0ms | _generate_accessor_method | Moose::Meta::Method::Accessor::
29 | 1 | 1 | 145µs | 20.4ms | _generate_reader_method | Moose::Meta::Method::Accessor::
30 | 1 | 1 | 143µs | 207µs | _error_thrower | Moose::Meta::Method::Accessor::
64 | 1 | 1 | 105µs | 105µs | new | Moose::Meta::Method::Accessor::
64 | 1 | 1 | 66µs | 66µs | _new | Moose::Meta::Method::Accessor::
2 | 1 | 1 | 24µs | 714µs | _generate_predicate_method | Moose::Meta::Method::Accessor::
2 | 1 | 1 | 18µs | 754µs | _generate_clearer_method | Moose::Meta::Method::Accessor::
1 | 1 | 1 | 8µs | 8µs | BEGIN@3 | Moose::Meta::Method::Accessor::
1 | 1 | 1 | 7µs | 10µs | BEGIN@10 | Moose::Meta::Method::Accessor::
1 | 1 | 1 | 7µs | 12µs | BEGIN@11 | Moose::Meta::Method::Accessor::
1 | 1 | 1 | 7µs | 38µs | BEGIN@13 | Moose::Meta::Method::Accessor::
1 | 1 | 1 | 7µs | 74µs | BEGIN@15 | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | __ANON__[:39] | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | __ANON__[:47] | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | _generate_writer_method | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | _get_value | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | _has_value | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | _inline_check_coercion | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | _inline_check_constraint | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | _inline_check_lazy | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | _inline_get_old_value_for_trigger | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | _inline_store_value | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | _inline_tc_code | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | _inline_trigger | Moose::Meta::Method::Accessor::
0 | 0 | 0 | 0s | 0s | _writer_value_needs_copy | Moose::Meta::Method::Accessor::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | |||||
2 | package 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 | ||||
4 | 1 | 5µs | $Moose::Meta::Method::Accessor::AUTHORITY = 'cpan:STEVAN'; | ||
5 | 1 | 30µs | 1 | 8µs | } # spent 8µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@3 |
6 | { | ||||
7 | 2 | 1µs | $Moose::Meta::Method::Accessor::VERSION = '2.1005'; | ||
8 | } | ||||
9 | |||||
10 | 2 | 27µs | 2 | 14µ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 # spent 10µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@10
# spent 3µs making 1 call to strict::import |
11 | 2 | 20µs | 2 | 17µ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 # spent 12µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@11
# spent 5µs making 1 call to warnings::import |
12 | |||||
13 | 2 | 27µs | 2 | 69µ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 # spent 38µs making 1 call to Moose::Meta::Method::Accessor::BEGIN@13
# spent 31µs making 1 call to Exporter::import |
14 | |||||
15 | 1 | 68µ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 # spent 68µs making 1 call to base::import | ||
16 | 2 | 542µs | 1 | 74µ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 | ||||
20 | 64 | 218µs | 64 | 62.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 | ||||
24 | 64 | 163µs | 64 | 12.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 | ||||
28 | 60 | 111µs | my $self = shift; | ||
29 | 60 | 64µ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 | ||||
35 | 192 | 551µs | my $self = shift; | ||
36 | my @args = @_; | ||||
37 | try { | ||||
38 | 64 | 318µs | 64 | 19.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 | ); | ||||
47 | 128 | 182µ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 | ||||
51 | 128 | 226µs | my $self = shift; | ||
52 | 128 | 3.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 | ||||
56 | 126 | 527µs | my $self = shift; | ||
57 | 252 | 197µ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 | ||||
61 | 58 | 111µs | my $self = shift; | ||
62 | 58 | 20.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 | |||||
66 | sub _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 | ||||
73 | 60 | 118µs | my $self = shift; | ||
74 | 60 | 25.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 | ||||
79 | 4 | 14µs | my $self = shift; | ||
80 | 4 | 690µ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 | ||||
85 | 4 | 14µs | my $self = shift; | ||
86 | 4 | 737µ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 | |||||
90 | sub _writer_value_needs_copy { | ||||
91 | shift->associated_attribute->_writer_value_needs_copy(@_); | ||||
92 | } | ||||
93 | |||||
94 | sub _inline_tc_code { | ||||
95 | shift->associated_attribute->_inline_tc_code(@_); | ||||
96 | } | ||||
97 | |||||
98 | sub _inline_check_coercion { | ||||
99 | shift->associated_attribute->_inline_check_coercion(@_); | ||||
100 | } | ||||
101 | |||||
102 | sub _inline_check_constraint { | ||||
103 | shift->associated_attribute->_inline_check_constraint(@_); | ||||
104 | } | ||||
105 | |||||
106 | sub _inline_check_lazy { | ||||
107 | shift->associated_attribute->_inline_check_lazy(@_); | ||||
108 | } | ||||
109 | |||||
110 | sub _inline_store_value { | ||||
111 | shift->associated_attribute->_inline_instance_set(@_) . ';'; | ||||
112 | } | ||||
113 | |||||
114 | sub _inline_get_old_value_for_trigger { | ||||
115 | shift->associated_attribute->_inline_get_old_value_for_trigger(@_); | ||||
116 | } | ||||
117 | |||||
118 | sub _inline_trigger { | ||||
119 | shift->associated_attribute->_inline_trigger(@_); | ||||
120 | } | ||||
121 | |||||
122 | sub _get_value { | ||||
123 | shift->associated_attribute->_inline_instance_get(@_); | ||||
124 | } | ||||
125 | |||||
126 | sub _has_value { | ||||
127 | shift->associated_attribute->_inline_instance_has(@_); | ||||
128 | } | ||||
129 | |||||
130 | 1 | 3µs | 1; | ||
131 | |||||
132 | # ABSTRACT: A Moose Method metaclass for accessors | ||||
133 | |||||
134 | __END__ |