← Index
NYTProf Performance Profile   « block view • line view • sub view »
For -e
  Run on Wed Nov 17 21:42:38 2010
Reported on Wed Nov 17 22:07:43 2010

Filename/home/doy/coding/src/Moose/blib/lib//Moose/Meta/Object/Trait.pm
StatementsExecuted 7 statements in 641µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11178µs245µsMoose::Meta::Object::Trait::::BEGIN@4Moose::Meta::Object::Trait::BEGIN@4
0000s0sMoose::Meta::Object::Trait::::_get_compatible_metaclassMoose::Meta::Object::Trait::_get_compatible_metaclass
0000s0sMoose::Meta::Object::Trait::::_get_compatible_metaclass_by_role_reconciliationMoose::Meta::Object::Trait::_get_compatible_metaclass_by_role_reconciliation
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::Object::Trait;
3
43565µs2412µs
# spent 245µs (78+167) within Moose::Meta::Object::Trait::BEGIN@4 which was called: # once (78µs+167µs) by Class::MOP::__ANON__[/home/doy/coding/src/Class-MOP/blib/lib//Class/MOP.pm:118] at line 4
use Scalar::Util qw(blessed);
# spent 245µs making 1 call to Moose::Meta::Object::Trait::BEGIN@4 # spent 167µs making 1 call to Exporter::import
5
614µsour $VERSION = '1.19';
7158µs$VERSION = eval $VERSION;
# spent 10µs executing statements in string eval
814µsour $AUTHORITY = 'cpan:STEVAN';
9
10sub _get_compatible_metaclass {
11 my $orig = shift;
12 my $self = shift;
13 return $self->$orig(@_)
14 || $self->_get_compatible_metaclass_by_role_reconciliation(@_);
15}
16
17sub _get_compatible_metaclass_by_role_reconciliation {
18 my $self = shift;
19 my ($other_name) = @_;
20 my $meta_name = blessed($self) ? $self->_real_ref_name : $self;
21
22 return unless Moose::Util::_classes_differ_by_roles_only(
23 $meta_name, $other_name
24 );
25
26 return Moose::Util::_reconcile_roles_for_metaclass(
27 $meta_name, $other_name
28 );
29}
30
31111µs1;
32
33__END__