Profile of Moose/Meta/Role/Method.pm

← Index
NYTProf Performance Profile «line view»
For script/ponapi
Run on Wed Feb 10 15:51:26 2016
Reported on Thu Feb 11 09:43:11 2016

Filename | /usr/local/lib/perl/5.18.2/Moose/Meta/Role/Method.pm
Statements | Executed 8 statements in 109µs

Subroutines
Calls | P | F | Exclusive Time | Inclusive Time | Subroutine
--- | --- | --- | --- | --- | ---
1 | 1 | 1 | 9µs | 20µs | Moose::Meta::Role::Method::::BEGIN@4Moose::Meta::Role::Method::BEGIN@4
1 | 1 | 1 | 7µs | 11µs | Moose::Meta::Role::Method::::BEGIN@5Moose::Meta::Role::Method::BEGIN@5
1 | 1 | 1 | 6µs | 28µs | Moose::Meta::Role::Method::::BEGIN@7Moose::Meta::Role::Method::BEGIN@7
0 | 0 | 0 | 0s | 0s | Moose::Meta::Role::Method::::_make_compatible_withMoose::Meta::Role::Method::_make_compatible_with

Call graph for these subroutines as a Graphviz dot language file.

Line | State ments | Time on line | Calls | Time in subs | Code
--- | --- | --- | --- | --- | ---
1 |  |  |  |  | package Moose::Meta::Role::Method;
2 | 1 | 500ns |  |  | our $VERSION = '2.1604';
3 |  |  |  |  |
4 | 2 | 21µs | 2 | 32µs | # spent 20µs (9+11) within Moose::Meta::Role::Method::BEGIN@4 which was called: # once (9µs+11µs) by Moose::Meta::Role::BEGIN@12 at line 4 use strict; # spent 20µs making 1 call to Moose::Meta::Role::Method::BEGIN@4 # spent 11µs making 1 call to strict::import
5 | 2 | 24µs | 2 | 15µs | # spent 11µs (7+4) within Moose::Meta::Role::Method::BEGIN@5 which was called: # once (7µs+4µs) by Moose::Meta::Role::BEGIN@12 at line 5 use warnings; # spent 11µs making 1 call to Moose::Meta::Role::Method::BEGIN@5 # spent 4µs making 1 call to warnings::import
6 |  |  |  |  |
7 | 2 | 60µs | 2 | 49µs | # spent 28µs (6+22) within Moose::Meta::Role::Method::BEGIN@7 which was called: # once (6µs+22µs) by Moose::Meta::Role::BEGIN@12 at line 7 use parent 'Moose::Meta::Method'; # spent 28µs making 1 call to Moose::Meta::Role::Method::BEGIN@7 # spent 22µs making 1 call to parent::import
8 |  |  |  |  |
9 |  |  |  |  | sub _make_compatible_with {
10 |  |  |  |  | my $self = shift;
11 |  |  |  |  | my ($other) = @_;
12 |  |  |  |  |
13 |  |  |  |  | # XXX: this is pretty gross. the issue here is blah blah blah
14 |  |  |  |  | # see the comments in CMOP::Method::Meta and CMOP::Method::Wrapped
15 |  |  |  |  | return $self unless $other->_is_compatible_with($self->_real_ref_name);
16 |  |  |  |  |
17 |  |  |  |  | return $self->SUPER::_make_compatible_with(@_);
18 |  |  |  |  | }
19 |  |  |  |  |
20 | 1 | 2µs |  |  | 1;
21 |  |  |  |  |
22 |  |  |  |  | # ABSTRACT: A Moose Method metaclass for Roles
23 |  |  |  |  |
24 |  |  |  |  | __END__