Filename | /opt/perl-5.18.1/lib/site_perl/5.18.1/darwin-thread-multi-2level/Moose.pm |
Statements | Executed 138 statements in 8.37ms |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 5.62ms | 30.6ms | BEGIN@27 | Moose::
1 | 1 | 1 | 4.77ms | 122ms | BEGIN@18 | Moose::
1 | 1 | 1 | 4.47ms | 27.0ms | BEGIN@35 | Moose::
1 | 1 | 1 | 3.15ms | 15.9ms | BEGIN@28 | Moose::
1 | 1 | 1 | 1.98ms | 3.10ms | BEGIN@38 | Moose::
1 | 1 | 1 | 1.60ms | 24.7ms | BEGIN@15 | Moose::
1 | 1 | 1 | 1.59ms | 7.54ms | BEGIN@39 | Moose::
1 | 1 | 1 | 1.19ms | 1.85ms | BEGIN@40 | Moose::
1 | 1 | 1 | 1.17ms | 4.13ms | BEGIN@33 | Moose::
1 | 1 | 1 | 1.13ms | 3.07ms | BEGIN@36 | Moose::
1 | 1 | 1 | 951µs | 152ms | BEGIN@29 | Moose::
1 | 1 | 1 | 855µs | 2.24ms | BEGIN@37 | Moose::
1 | 1 | 1 | 560µs | 1.71ms | BEGIN@41 | Moose::
1 | 1 | 1 | 455µs | 2.09ms | BEGIN@46 | Moose::
1 | 1 | 1 | 298µs | 1.74ms | BEGIN@31 | Moose::
1 | 1 | 1 | 296µs | 296µs | bootstrap (xsub) | Moose::
1 | 1 | 1 | 289µs | 3.02ms | BEGIN@17 | Moose::
1 | 1 | 1 | 64µs | 3.98ms | init_meta | Moose::
2 | 2 | 2 | 38µs | 17.9ms | has | Moose::
1 | 1 | 1 | 15µs | 15µs | BEGIN@11 | Moose::
1 | 1 | 1 | 14µs | 100µs | BEGIN@13 | Moose::
1 | 1 | 1 | 10µs | 10µs | BEGIN@2 | Moose::
1 | 1 | 1 | 10µs | 1.74ms | BEGIN@43 | Moose::
1 | 1 | 1 | 10µs | 60µs | BEGIN@14 | Moose::
1 | 1 | 1 | 9µs | 16µs | BEGIN@9 | Moose::
1 | 1 | 1 | 8µs | 25µs | BEGIN@8 | Moose::
1 | 1 | 1 | 6µs | 6µs | BEGIN@30 | Moose::
1 | 1 | 1 | 6µs | 6µs | BEGIN@20 | Moose::
1 | 1 | 1 | 5µs | 5µs | BEGIN@44 | Moose::
1 | 1 | 1 | 4µs | 4µs | BEGIN@22 | Moose::
0 | 0 | 0 | 0s | 0s | _get_caller | Moose::
0 | 0 | 0 | 0s | 0s | after | Moose::
0 | 0 | 0 | 0s | 0s | around | Moose::
0 | 0 | 0 | 0s | 0s | augment | Moose::
0 | 0 | 0 | 0s | 0s | before | Moose::
0 | 0 | 0 | 0s | 0s | extends | Moose::
0 | 0 | 0 | 0s | 0s | inner | Moose::
0 | 0 | 0 | 0s | 0s | override | Moose::
0 | 0 | 0 | 0s | 0s | super | Moose::
0 | 0 | 0 | 0s | 0s | throw_error | Moose::
0 | 0 | 0 | 0s | 0s | with | Moose::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package Moose; | ||||
2 | # spent 10µs within Moose::BEGIN@2 which was called:
# once (10µs+0s) by Foo::Moose::BEGIN@91 at line 4 | ||||
3 | 1 | 10µs | $Moose::AUTHORITY = 'cpan:STEVAN'; | ||
4 | 1 | 38µs | 1 | 10µs | } # spent 10µs making 1 call to Moose::BEGIN@2 |
5 | { | ||||
6 | 2 | 1µs | $Moose::VERSION = '2.1005'; | ||
7 | } | ||||
8 | 2 | 29µs | 2 | 42µs | # spent 25µs (8+17) within Moose::BEGIN@8 which was called:
# once (8µs+17µs) by Foo::Moose::BEGIN@91 at line 8 # spent 25µs making 1 call to Moose::BEGIN@8
# spent 17µs making 1 call to strict::import |
9 | 2 | 30µs | 2 | 23µs | # spent 16µs (9+7) within Moose::BEGIN@9 which was called:
# once (9µs+7µs) by Foo::Moose::BEGIN@91 at line 9 # spent 16µs making 1 call to Moose::BEGIN@9
# spent 7µs making 1 call to warnings::import |
10 | |||||
11 | 2 | 58µs | 1 | 15µs | # spent 15µs within Moose::BEGIN@11 which was called:
# once (15µs+0s) by Foo::Moose::BEGIN@91 at line 11 # spent 15µs making 1 call to Moose::BEGIN@11 |
12 | |||||
13 | 2 | 47µs | 2 | 187µs | # spent 100µs (14+87) within Moose::BEGIN@13 which was called:
# once (14µs+87µs) by Foo::Moose::BEGIN@91 at line 13 # spent 100µs making 1 call to Moose::BEGIN@13
# spent 87µs making 1 call to Exporter::import |
14 | 2 | 34µs | 2 | 110µs | # spent 60µs (10+50) within Moose::BEGIN@14 which was called:
# once (10µs+50µs) by Foo::Moose::BEGIN@91 at line 14 # spent 60µs making 1 call to Moose::BEGIN@14
# spent 50µs making 1 call to Exporter::import |
15 | 2 | 148µs | 2 | 24.8ms | # spent 24.7ms (1.60+23.1) within Moose::BEGIN@15 which was called:
# once (1.60ms+23.1ms) by Foo::Moose::BEGIN@91 at line 15 # spent 24.7ms making 1 call to Moose::BEGIN@15
# spent 45µs making 1 call to Exporter::import |
16 | |||||
17 | 2 | 138µs | 2 | 3.03ms | # spent 3.02ms (289µs+2.73) within Moose::BEGIN@17 which was called:
# once (289µs+2.73ms) by Foo::Moose::BEGIN@91 at line 17 # spent 3.02ms making 1 call to Moose::BEGIN@17
# spent 6µs making 1 call to Package::DeprecationManager::__ANON__[Package/DeprecationManager.pm:61] |
18 | 2 | 132µs | 2 | 122ms | # spent 122ms (4.77+117) within Moose::BEGIN@18 which was called:
# once (4.77ms+117ms) by Foo::Moose::BEGIN@91 at line 18 # spent 122ms making 1 call to Moose::BEGIN@18
# spent 37µs making 1 call to Moose::Exporter::import |
19 | |||||
20 | 2 | 58µs | 1 | 6µs | # spent 6µs within Moose::BEGIN@20 which was called:
# once (6µs+0s) by Foo::Moose::BEGIN@91 at line 20 # spent 6µs making 1 call to Moose::BEGIN@20 |
21 | |||||
22 | # spent 4µs within Moose::BEGIN@22 which was called:
# once (4µs+0s) by Foo::Moose::BEGIN@91 at line 25 | ||||
23 | 1 | 5µs | die "Class::MOP version $Moose::VERSION required--this is version $Class::MOP::VERSION" | ||
24 | if $Moose::VERSION && $Class::MOP::VERSION ne $Moose::VERSION; | ||||
25 | 1 | 26µs | 1 | 4µs | } # spent 4µs making 1 call to Moose::BEGIN@22 |
26 | |||||
27 | 2 | 138µs | 1 | 30.6ms | # spent 30.6ms (5.62+25.0) within Moose::BEGIN@27 which was called:
# once (5.62ms+25.0ms) by Foo::Moose::BEGIN@91 at line 27 # spent 30.6ms making 1 call to Moose::BEGIN@27 |
28 | 2 | 154µs | 1 | 15.9ms | # spent 15.9ms (3.15+12.7) within Moose::BEGIN@28 which was called:
# once (3.15ms+12.7ms) by Foo::Moose::BEGIN@91 at line 28 # spent 15.9ms making 1 call to Moose::BEGIN@28 |
29 | 2 | 152µs | 1 | 152ms | # spent 152ms (951µs+152) within Moose::BEGIN@29 which was called:
# once (951µs+152ms) by Foo::Moose::BEGIN@91 at line 29 # spent 152ms making 1 call to Moose::BEGIN@29 |
30 | 2 | 30µs | 1 | 6µs | # spent 6µs within Moose::BEGIN@30 which was called:
# once (6µs+0s) by Foo::Moose::BEGIN@91 at line 30 # spent 6µs making 1 call to Moose::BEGIN@30 |
31 | 2 | 148µs | 1 | 1.74ms | # spent 1.74ms (298µs+1.44) within Moose::BEGIN@31 which was called:
# once (298µs+1.44ms) by Foo::Moose::BEGIN@91 at line 31 # spent 1.74ms making 1 call to Moose::BEGIN@31 |
32 | |||||
33 | 2 | 142µs | 1 | 4.13ms | # spent 4.13ms (1.17+2.95) within Moose::BEGIN@33 which was called:
# once (1.17ms+2.95ms) by Foo::Moose::BEGIN@91 at line 33 # spent 4.13ms making 1 call to Moose::BEGIN@33 |
34 | |||||
35 | 2 | 138µs | 1 | 27.0ms | # spent 27.0ms (4.47+22.5) within Moose::BEGIN@35 which was called:
# once (4.47ms+22.5ms) by Foo::Moose::BEGIN@91 at line 35 # spent 27.0ms making 1 call to Moose::BEGIN@35 |
36 | 2 | 143µs | 1 | 3.07ms | # spent 3.07ms (1.13+1.94) within Moose::BEGIN@36 which was called:
# once (1.13ms+1.94ms) by Foo::Moose::BEGIN@91 at line 36 # spent 3.07ms making 1 call to Moose::BEGIN@36 |
37 | 2 | 134µs | 1 | 2.24ms | # spent 2.24ms (855µs+1.39) within Moose::BEGIN@37 which was called:
# once (855µs+1.39ms) by Foo::Moose::BEGIN@91 at line 37 # spent 2.24ms making 1 call to Moose::BEGIN@37 |
38 | 2 | 140µs | 1 | 3.10ms | # spent 3.10ms (1.98+1.12) within Moose::BEGIN@38 which was called:
# once (1.98ms+1.12ms) by Foo::Moose::BEGIN@91 at line 38 # spent 3.10ms making 1 call to Moose::BEGIN@38 |
39 | 2 | 4.37ms | 1 | 7.54ms | # spent 7.54ms (1.59+5.94) within Moose::BEGIN@39 which was called:
# once (1.59ms+5.94ms) by Foo::Moose::BEGIN@91 at line 39 # spent 7.54ms making 1 call to Moose::BEGIN@39 |
40 | 2 | 145µs | 1 | 1.85ms | # spent 1.85ms (1.19+663µs) within Moose::BEGIN@40 which was called:
# once (1.19ms+663µs) by Foo::Moose::BEGIN@91 at line 40 # spent 1.85ms making 1 call to Moose::BEGIN@40 |
41 | 2 | 140µs | 1 | 1.71ms | # spent 1.71ms (560µs+1.15) within Moose::BEGIN@41 which was called:
# once (560µs+1.15ms) by Foo::Moose::BEGIN@91 at line 41 # spent 1.71ms making 1 call to Moose::BEGIN@41 |
42 | |||||
43 | 2 | 38µs | 2 | 3.48ms | # spent 1.74ms (10µs+1.73) within Moose::BEGIN@43 which was called:
# once (10µs+1.73ms) by Foo::Moose::BEGIN@91 at line 43 # spent 1.74ms making 1 call to Moose::BEGIN@43
# spent 1.73ms making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:519] |
44 | 2 | 28µs | 1 | 5µs | # spent 5µs within Moose::BEGIN@44 which was called:
# once (5µs+0s) by Foo::Moose::BEGIN@91 at line 44 # spent 5µs making 1 call to Moose::BEGIN@44 |
45 | |||||
46 | 2 | 1.30ms | 1 | 2.09ms | # spent 2.09ms (455µs+1.64) within Moose::BEGIN@46 which was called:
# once (455µs+1.64ms) by Foo::Moose::BEGIN@91 at line 46 # spent 2.09ms making 1 call to Moose::BEGIN@46 |
47 | |||||
48 | sub throw_error { | ||||
49 | # FIXME This | ||||
50 | shift; | ||||
51 | goto \&confess | ||||
52 | } | ||||
53 | |||||
54 | sub extends { | ||||
55 | my $meta = shift; | ||||
56 | |||||
57 | Moose->throw_error("Must derive at least one class") unless @_; | ||||
58 | |||||
59 | # this checks the metaclass to make sure | ||||
60 | # it is correct, sometimes it can get out | ||||
61 | # of sync when the classes are being built | ||||
62 | $meta->superclasses(@_); | ||||
63 | } | ||||
64 | |||||
65 | sub with { | ||||
66 | Moose::Util::apply_all_roles(shift, @_); | ||||
67 | } | ||||
68 | |||||
69 | # spent 17.9ms (38µs+17.9) within Moose::has which was called 2 times, avg 8.97ms/call:
# once (13µs+8.97ms) by main::RUNTIME at line 92 of fastest.pl
# once (25µs+8.93ms) by Moose::has at line 409 of Moose/Exporter.pm | ||||
70 | 1 | 400ns | my $meta = shift; | ||
71 | 1 | 500ns | my $name = shift; | ||
72 | |||||
73 | 1 | 1µs | Moose->throw_error('Usage: has \'name\' => ( key => value, ... )') | ||
74 | if @_ % 2 == 1; | ||||
75 | |||||
76 | 1 | 3µs | 1 | 11µs | my %context = Moose::Util::_caller_info; # spent 11µs making 1 call to Moose::Util::_caller_info |
77 | 1 | 800ns | $context{context} = 'has declaration'; | ||
78 | 1 | 700ns | $context{type} = 'class'; | ||
79 | 1 | 3µs | my %options = ( definition_context => \%context, @_ ); | ||
80 | 1 | 2µs | my $attrs = ( ref($name) eq 'ARRAY' ) ? $name : [ ($name) ]; | ||
81 | 1 | 11µs | 1 | 8.92ms | $meta->add_attribute( $_, %options ) for @$attrs; # spent 8.92ms making 1 call to Moose::Meta::Class::add_attribute |
82 | } | ||||
83 | |||||
84 | sub before { | ||||
85 | Moose::Util::add_method_modifier(shift, 'before', \@_); | ||||
86 | } | ||||
87 | |||||
88 | sub after { | ||||
89 | Moose::Util::add_method_modifier(shift, 'after', \@_); | ||||
90 | } | ||||
91 | |||||
92 | sub around { | ||||
93 | Moose::Util::add_method_modifier(shift, 'around', \@_); | ||||
94 | } | ||||
95 | |||||
96 | 1 | 100ns | our $SUPER_PACKAGE; | ||
97 | 1 | 0s | our $SUPER_BODY; | ||
98 | 1 | 200ns | our @SUPER_ARGS; | ||
99 | |||||
100 | sub super { | ||||
101 | if (@_) { | ||||
102 | carp 'Arguments passed to super() are ignored'; | ||||
103 | } | ||||
104 | |||||
105 | # This check avoids a recursion loop - see | ||||
106 | # t/bugs/super_recursion.t | ||||
107 | return if defined $SUPER_PACKAGE && $SUPER_PACKAGE ne caller(); | ||||
108 | return unless $SUPER_BODY; $SUPER_BODY->(@SUPER_ARGS); | ||||
109 | } | ||||
110 | |||||
111 | sub override { | ||||
112 | my $meta = shift; | ||||
113 | my ( $name, $method ) = @_; | ||||
114 | $meta->add_override_method_modifier( $name => $method ); | ||||
115 | } | ||||
116 | |||||
117 | sub inner { | ||||
118 | my $pkg = caller(); | ||||
119 | our ( %INNER_BODY, %INNER_ARGS ); | ||||
120 | |||||
121 | if ( my $body = $INNER_BODY{$pkg} ) { | ||||
122 | my @args = @{ $INNER_ARGS{$pkg} }; | ||||
123 | local $INNER_ARGS{$pkg}; | ||||
124 | local $INNER_BODY{$pkg}; | ||||
125 | return $body->(@args); | ||||
126 | } else { | ||||
127 | return; | ||||
128 | } | ||||
129 | } | ||||
130 | |||||
131 | sub augment { | ||||
132 | my $meta = shift; | ||||
133 | my ( $name, $method ) = @_; | ||||
134 | $meta->add_augment_method_modifier( $name => $method ); | ||||
135 | } | ||||
136 | |||||
137 | 1 | 10µs | 1 | 940µs | Moose::Exporter->setup_import_methods( # spent 940µs making 1 call to Moose::Exporter::setup_import_methods |
138 | with_meta => [ | ||||
139 | qw( extends with has before after around override augment ) | ||||
140 | ], | ||||
141 | as_is => [ | ||||
142 | qw( super inner ), | ||||
143 | \&Carp::confess, | ||||
144 | \&Scalar::Util::blessed, | ||||
145 | ], | ||||
146 | ); | ||||
147 | |||||
148 | # spent 3.98ms (64µs+3.91) within Moose::init_meta which was called:
# once (64µs+3.91ms) by Moose::Exporter::__ANON__[/opt/perl-5.18.1/lib/site_perl/5.18.1/darwin-thread-multi-2level/Moose/Exporter.pm:519] at line 474 of Moose/Exporter.pm | ||||
149 | 1 | 200ns | shift; | ||
150 | 1 | 2µs | my %args = @_; | ||
151 | |||||
152 | 1 | 700ns | my $class = $args{for_class} | ||
153 | or Moose->throw_error("Cannot call init_meta without specifying a for_class"); | ||||
154 | 1 | 800ns | my $base_class = $args{base_class} || 'Moose::Object'; | ||
155 | 1 | 600ns | my $metaclass = $args{metaclass} || 'Moose::Meta::Class'; | ||
156 | 1 | 1µs | my $meta_name = exists $args{meta_name} ? $args{meta_name} : 'meta'; | ||
157 | |||||
158 | 1 | 1µs | 1 | 50µs | Moose->throw_error("The Metaclass $metaclass must be loaded. (Perhaps you forgot to 'use $metaclass'?)") # spent 50µs making 1 call to Class::Load::PP::is_class_loaded |
159 | unless is_class_loaded($metaclass); | ||||
160 | |||||
161 | 1 | 6µs | 1 | 2µs | Moose->throw_error("The Metaclass $metaclass must be a subclass of Moose::Meta::Class.") # spent 2µs making 1 call to UNIVERSAL::isa |
162 | unless $metaclass->isa('Moose::Meta::Class'); | ||||
163 | |||||
164 | # make a subtype for each Moose class | ||||
165 | 1 | 4µs | 2 | 908µs | class_type($class) # spent 887µs making 1 call to Moose::Util::TypeConstraints::class_type
# spent 21µs making 1 call to Moose::Util::TypeConstraints::find_type_constraint |
166 | unless find_type_constraint($class); | ||||
167 | |||||
168 | 1 | 200ns | my $meta; | ||
169 | |||||
170 | 1 | 2µs | 1 | 2µs | if ( $meta = Class::MOP::get_metaclass_by_name($class) ) { # spent 2µs making 1 call to Class::MOP::get_metaclass_by_name |
171 | unless ( $meta->isa("Moose::Meta::Class") ) { | ||||
172 | my $error_message = "$class already has a metaclass, but it does not inherit $metaclass ($meta)."; | ||||
173 | if ( $meta->isa('Moose::Meta::Role') ) { | ||||
174 | Moose->throw_error($error_message . ' You cannot make the same thing a role and a class. Remove either Moose or Moose::Role.'); | ||||
175 | } else { | ||||
176 | Moose->throw_error($error_message); | ||||
177 | } | ||||
178 | } | ||||
179 | } else { | ||||
180 | # no metaclass | ||||
181 | |||||
182 | # now we check whether our ancestors have metaclass, and if so borrow that | ||||
183 | 1 | 8µs | 1 | 4µs | my ( undef, @isa ) = @{ mro::get_linear_isa($class) }; # spent 4µs making 1 call to mro::get_linear_isa |
184 | |||||
185 | 1 | 1µs | foreach my $ancestor ( @isa ) { | ||
186 | my $ancestor_meta = Class::MOP::get_metaclass_by_name($ancestor) || next; | ||||
187 | |||||
188 | my $ancestor_meta_class = $ancestor_meta->_real_ref_name; | ||||
189 | |||||
190 | # if we have an ancestor metaclass that inherits $metaclass, we use | ||||
191 | # that. This is like _fix_metaclass_incompatibility, but we can do it now. | ||||
192 | |||||
193 | # the case of having an ancestry is not very common, but arises in | ||||
194 | # e.g. Reaction | ||||
195 | unless ( $metaclass->isa( $ancestor_meta_class ) ) { | ||||
196 | if ( $ancestor_meta_class->isa($metaclass) ) { | ||||
197 | $metaclass = $ancestor_meta_class; | ||||
198 | } | ||||
199 | } | ||||
200 | } | ||||
201 | |||||
202 | 1 | 3µs | 1 | 865µs | $meta = $metaclass->initialize($class); # spent 865µs making 1 call to Moose::Meta::Class::initialize |
203 | } | ||||
204 | |||||
205 | 1 | 1µs | if (defined $meta_name) { | ||
206 | # also check for inherited non moose 'meta' method? | ||||
207 | 1 | 2µs | 1 | 30µs | my $existing = $meta->get_method($meta_name); # spent 30µs making 1 call to Class::MOP::Mixin::HasMethods::get_method |
208 | 1 | 200ns | if ($existing && !$existing->isa('Class::MOP::Method::Meta')) { | ||
209 | Carp::cluck "Moose is overwriting an existing method named " | ||||
210 | . "$meta_name in class $class with a method " | ||||
211 | . "which returns the class's metaclass. If this is " | ||||
212 | . "actually what you want, you should remove the " | ||||
213 | . "existing method, otherwise, you should rename or " | ||||
214 | . "disable this generated method using the " | ||||
215 | . "'-meta_name' option to 'use Moose'."; | ||||
216 | } | ||||
217 | 1 | 2µs | 1 | 670µs | $meta->_add_meta_method($meta_name); # spent 670µs making 1 call to Class::MOP::Mixin::HasMethods::_add_meta_method |
218 | } | ||||
219 | |||||
220 | # make sure they inherit from Moose::Object | ||||
221 | 1 | 3µs | 2 | 1.38ms | $meta->superclasses($base_class) # spent 1.38ms making 2 calls to Moose::Meta::Class::superclasses, avg 692µs/call |
222 | unless $meta->superclasses(); | ||||
223 | |||||
224 | 1 | 6µs | return $meta; | ||
225 | } | ||||
226 | |||||
227 | # This may be used in some older MooseX extensions. | ||||
228 | sub _get_caller { | ||||
229 | goto &Moose::Exporter::_get_caller; | ||||
230 | } | ||||
231 | |||||
232 | ## make 'em all immutable | ||||
233 | |||||
234 | 21 | 15µs | 21 | 14µs | $_->make_immutable( # spent 14µs making 21 calls to Class::MOP::Class::is_mutable, avg 643ns/call |
235 | inline_constructor => 1, | ||||
236 | constructor_name => "_new", | ||||
237 | # these are Class::MOP accessors, so they need inlining | ||||
238 | inline_accessors => 1 | ||||
239 | 22 | 125µs | 42 | 100.0ms | ) for grep { $_->is_mutable } # spent 97.8ms making 21 calls to Class::MOP::Class::make_immutable, avg 4.66ms/call
# spent 2.05ms making 9 calls to Class::MOP::Object::meta, avg 228µs/call
# spent 22µs making 2 calls to Moose::Meta::Role::Method::Required::meta, avg 11µs/call
# spent 22µs making 1 call to Moose::Meta::Role::Application::RoleSummation::meta
# spent 13µs making 1 call to Moose::Meta::TypeCoercion::Union::meta
# spent 13µs making 1 call to Moose::Meta::Role::Application::ToRole::meta
# spent 12µs making 1 call to Moose::Meta::Role::meta
# spent 11µs making 1 call to Moose::Meta::TypeCoercion::meta
# spent 11µs making 1 call to Moose::Meta::Role::Application::ToInstance::meta
# spent 10µs making 1 call to Class::MOP::Mixin::meta
# spent 10µs making 1 call to Moose::Meta::Role::Application::ToClass::meta
# spent 9µs making 1 call to Moose::Meta::Role::Application::meta
# spent 9µs making 1 call to Moose::Meta::Role::Composite::meta |
240 | map { $_->meta } | ||||
241 | qw( | ||||
242 | Moose::Meta::Attribute | ||||
243 | Moose::Meta::Class | ||||
244 | Moose::Meta::Instance | ||||
245 | |||||
246 | Moose::Meta::TypeCoercion | ||||
247 | Moose::Meta::TypeCoercion::Union | ||||
248 | |||||
249 | Moose::Meta::Method | ||||
250 | Moose::Meta::Method::Constructor | ||||
251 | Moose::Meta::Method::Destructor | ||||
252 | Moose::Meta::Method::Overridden | ||||
253 | Moose::Meta::Method::Augmented | ||||
254 | |||||
255 | Moose::Meta::Role | ||||
256 | Moose::Meta::Role::Attribute | ||||
257 | Moose::Meta::Role::Method | ||||
258 | Moose::Meta::Role::Method::Required | ||||
259 | Moose::Meta::Role::Method::Conflicting | ||||
260 | |||||
261 | Moose::Meta::Role::Composite | ||||
262 | |||||
263 | Moose::Meta::Role::Application | ||||
264 | Moose::Meta::Role::Application::RoleSummation | ||||
265 | Moose::Meta::Role::Application::ToClass | ||||
266 | Moose::Meta::Role::Application::ToRole | ||||
267 | Moose::Meta::Role::Application::ToInstance | ||||
268 | ); | ||||
269 | |||||
270 | 3 | 3µs | 3 | 2µs | $_->make_immutable( # spent 2µs making 3 calls to Class::MOP::Class::is_mutable, avg 733ns/call |
271 | inline_constructor => 0, | ||||
272 | constructor_name => undef, | ||||
273 | # these are Class::MOP accessors, so they need inlining | ||||
274 | inline_accessors => 1 | ||||
275 | 4 | 27µs | 6 | 11.1ms | ) for grep { $_->is_mutable } # spent 10.6ms making 3 calls to Class::MOP::Class::make_immutable, avg 3.52ms/call
# spent 576µs making 2 calls to Class::MOP::Object::meta, avg 288µs/call
# spent 14µs making 1 call to Class::MOP::Mixin::meta |
276 | map { $_->meta } | ||||
277 | qw( | ||||
278 | Moose::Meta::Method::Accessor | ||||
279 | Moose::Meta::Method::Delegation | ||||
280 | Moose::Meta::Mixin::AttributeCore | ||||
281 | ); | ||||
282 | |||||
283 | 1 | 26µs | 1; | ||
284 | |||||
285 | # ABSTRACT: A postmodern object system for Perl 5 | ||||
286 | |||||
287 | __END__ | ||||
# spent 296µs within Moose::bootstrap which was called:
# once (296µs+0s) by DynaLoader::bootstrap at line 217 of DynaLoader.pm |