Filename | /usr/local/lib/perl/5.14.2/Moose/Meta/Method/Meta.pm |
Statements | Executed 34 statements in 262µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
12 | 1 | 1 | 51µs | 3.68ms | wrap | Moose::Meta::Method::Meta::
1 | 1 | 1 | 10µs | 10µs | BEGIN@3 | Moose::Meta::Method::Meta::
1 | 1 | 1 | 7µs | 10µs | BEGIN@10 | Moose::Meta::Method::Meta::
1 | 1 | 1 | 6µs | 11µs | BEGIN@11 | Moose::Meta::Method::Meta::
1 | 1 | 1 | 6µs | 70µs | BEGIN@13 | Moose::Meta::Method::Meta::
0 | 0 | 0 | 0s | 0s | _is_caller_mop_internal | Moose::Meta::Method::Meta::
0 | 0 | 0 | 0s | 0s | _make_compatible_with | Moose::Meta::Method::Meta::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | |||||
2 | package Moose::Meta::Method::Meta; | ||||
3 | # spent 10µs within Moose::Meta::Method::Meta::BEGIN@3 which was called:
# once (10µs+0s) by Moose::Meta::Class::BEGIN@27 at line 5 | ||||
4 | 1 | 5µs | $Moose::Meta::Method::Meta::AUTHORITY = 'cpan:STEVAN'; | ||
5 | 1 | 29µs | 1 | 10µs | } # spent 10µs making 1 call to Moose::Meta::Method::Meta::BEGIN@3 |
6 | { | ||||
7 | 2 | 1µs | $Moose::Meta::Method::Meta::VERSION = '2.1005'; | ||
8 | } | ||||
9 | |||||
10 | 2 | 21µs | 2 | 13µs | # spent 10µs (7+3) within Moose::Meta::Method::Meta::BEGIN@10 which was called:
# once (7µs+3µs) by Moose::Meta::Class::BEGIN@27 at line 10 # spent 10µs making 1 call to Moose::Meta::Method::Meta::BEGIN@10
# spent 3µs making 1 call to strict::import |
11 | 2 | 30µs | 2 | 16µs | # spent 11µs (6+5) within Moose::Meta::Method::Meta::BEGIN@11 which was called:
# once (6µs+5µs) by Moose::Meta::Class::BEGIN@27 at line 11 # spent 11µs making 1 call to Moose::Meta::Method::Meta::BEGIN@11
# spent 5µs making 1 call to warnings::import |
12 | |||||
13 | 1 | 4µs | 1 | 64µs | # spent 70µs (6+64) within Moose::Meta::Method::Meta::BEGIN@13 which was called:
# once (6µs+64µs) by Moose::Meta::Class::BEGIN@27 at line 14 # spent 64µs making 1 call to base::import |
14 | 1 | 118µs | 1 | 70µs | 'Class::MOP::Method::Meta'; # spent 70µs making 1 call to Moose::Meta::Method::Meta::BEGIN@13 |
15 | |||||
16 | sub _is_caller_mop_internal { | ||||
17 | my $self = shift; | ||||
18 | my ($caller) = @_; | ||||
19 | return 1 if $caller =~ /^Moose(?:::|$)/; | ||||
20 | return $self->SUPER::_is_caller_mop_internal($caller); | ||||
21 | } | ||||
22 | |||||
23 | # XXX: ugh multiple inheritance | ||||
24 | # spent 3.68ms (51µs+3.63) within Moose::Meta::Method::Meta::wrap which was called 12 times, avg 307µs/call:
# 12 times (51µs+3.63ms) by Class::MOP::Mixin::HasMethods::_add_meta_method at line 33 of Class/MOP/Mixin/HasMethods.pm, avg 307µs/call | ||||
25 | 12 | 3µs | my $class = shift; | ||
26 | 12 | 49µs | 12 | 3.63ms | return $class->Class::MOP::Method::Meta::wrap(@_); # spent 3.63ms making 12 calls to Class::MOP::Method::Meta::wrap, avg 302µs/call |
27 | } | ||||
28 | |||||
29 | sub _make_compatible_with { | ||||
30 | my $self = shift; | ||||
31 | return $self->Class::MOP::Method::Meta::_make_compatible_with(@_); | ||||
32 | } | ||||
33 | |||||
34 | 1 | 3µs | 1; | ||
35 | |||||
36 | # ABSTRACT: A Moose Method metaclass for C<meta> methods | ||||
37 | |||||
38 | __END__ |