← 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:04:48 2010

Filename/home/doy/coding/src/Moose/blib/lib//Moose/Meta/Method.pm
StatementsExecuted 219 statements in 4.75ms
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
101223.07ms3.07msMoose::Meta::Method::::_inline_throw_errorMoose::Meta::Method::_inline_throw_error
11163µs79µsMoose::Meta::Method::::BEGIN@3Moose::Meta::Method::BEGIN@3
11156µs311µsMoose::Meta::Method::::BEGIN@12Moose::Meta::Method::BEGIN@12
11153µs120µsMoose::Meta::Method::::BEGIN@4Moose::Meta::Method::BEGIN@4
11124µs24µsMoose::Meta::Method::::BEGIN@10Moose::Meta::Method::BEGIN@10
0000s0sMoose::Meta::Method::::_error_throwerMoose::Meta::Method::_error_thrower
0000s0sMoose::Meta::Method::::throw_errorMoose::Meta::Method::throw_error
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package Moose::Meta::Method;
2
33108µs295µs
# spent 79µs (63+16) within Moose::Meta::Method::BEGIN@3 which was called: # once (63µs+16µs) by base::import at line 3
use strict;
# spent 79µs making 1 call to Moose::Meta::Method::BEGIN@3 # spent 16µs making 1 call to strict::import
43192µs2186µs
# spent 120µs (53+66) within Moose::Meta::Method::BEGIN@4 which was called: # once (53µs+66µs) by base::import at line 4
use warnings;
# spent 120µs making 1 call to Moose::Meta::Method::BEGIN@4 # spent 66µs making 1 call to warnings::import
5
614µsour $VERSION = '1.19';
7157µs$VERSION = eval $VERSION;
# spent 10µs executing statements in string eval
814µsour $AUTHORITY = 'cpan:STEVAN';
9
103132µs124µs
# spent 24µs within Moose::Meta::Method::BEGIN@10 which was called: # once (24µs+0s) by base::import at line 10
use Class::MOP::MiniTrait;
# spent 24µs making 1 call to Moose::Meta::Method::BEGIN@10
11
123634µs2311µs
# spent 311µs (56+254) within Moose::Meta::Method::BEGIN@12 which was called: # once (56µs+254µs) by base::import at line 12
use base 'Class::MOP::Method';
# spent 311µs making 1 call to Moose::Meta::Method::BEGIN@12 # spent 254µs making 1 call to base::import, recursion: max depth 1, sum of overlapping time 254µs
13
14114µs110.6msClass::MOP::MiniTrait::apply(__PACKAGE__, 'Moose::Meta::Object::Trait');
# spent 10.6ms making 1 call to Class::MOP::MiniTrait::apply
15
16sub _error_thrower {
17 my $self = shift;
18 ( ref $self && $self->associated_metaclass ) || "Moose::Meta::Class";
19}
20
21sub throw_error {
22 my $self = shift;
23 my $inv = $self->_error_thrower;
24 unshift @_, "message" if @_ % 2 == 1;
25 unshift @_, method => $self if ref $self;
26 unshift @_, $inv;
27 my $handler = $inv->can("throw_error");
28 goto $handler; # to avoid incrementing depth by 1
29}
30
31
# spent 3.07ms within Moose::Meta::Method::_inline_throw_error which was called 101 times, avg 30µs/call: # 97 times (3.00ms+0s) by Class::MOP::Method::Accessor::__ANON__[/home/doy/coding/src/Class-MOP/blib/lib//Class/MOP/Method/Accessor.pm:152] at line 140 of Class/MOP/Method/Accessor.pm, avg 31µs/call # 4 times (70µs+0s) by Moose::Meta::Method::Accessor::Native::_inline_check_argument_count at line 79 of Moose/Meta/Method/Accessor/Native.pm, avg 17µs/call
sub _inline_throw_error {
322023.58ms my ( $self, $msg, $args ) = @_;
33 "\$meta->throw_error($msg" . ($args ? ", $args" : "") . ")"; # FIXME makes deparsing *REALLY* hard
34}
35
36121µs1;
37
38__END__