| Filename | /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/MooseX/Role/Parameterized/Meta/Parameter.pm |
| Statements | Executed 16 statements in 834µs |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 77µs | 22.8ms | MooseX::Role::Parameterized::Meta::Parameter::BEGIN@2 |
| 1 | 1 | 1 | 46µs | 605µs | MooseX::Role::Parameterized::Meta::Parameter::BEGIN@27 |
| 0 | 0 | 0 | 0s | 0s | MooseX::Role::Parameterized::Meta::Parameter::__ANON__[:20] |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package MooseX::Role::Parameterized::Meta::Parameter; | ||||
| 2 | 3 | 533µs | 2 | 45.5ms | # spent 22.8ms (77µs+22.7) within MooseX::Role::Parameterized::Meta::Parameter::BEGIN@2 which was called:
# once (77µs+22.7ms) by MooseX::Role::Parameterized::Meta::Role::Parameterizable::BEGIN@8 at line 2 # spent 22.8ms making 1 call to MooseX::Role::Parameterized::Meta::Parameter::BEGIN@2
# spent 22.7ms making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:456] |
| 3 | 1 | 12µs | 1 | 5.36ms | extends 'Moose::Meta::Attribute'; # spent 5.36ms making 1 call to Moose::extends |
| 4 | |||||
| 5 | 1 | 4µs | our $VERSION = '0.19'; | ||
| 6 | |||||
| 7 | # This doesn't actually do anything because _process_options does not consult | ||||
| 8 | # the default value of "is". hrm. | ||||
| 9 | 1 | 12µs | 1 | 5.45ms | has '+is' => ( # spent 5.45ms making 1 call to Moose::has |
| 10 | default => 'ro', | ||||
| 11 | ); | ||||
| 12 | |||||
| 13 | around _process_options => sub { | ||||
| 14 | 1 | 4µs | my $orig = shift; | ||
| 15 | 1 | 5µs | my ($class, $name, $options) = @_; | ||
| 16 | |||||
| 17 | 1 | 6µs | $options->{is} ||= 'ro'; | ||
| 18 | |||||
| 19 | 1 | 21µs | 1 | 571µs | $orig->(@_); # spent 571µs making 1 call to Moose::Meta::Attribute::_process_options |
| 20 | 1 | 24µs | 1 | 2.09ms | }; # spent 2.09ms making 1 call to Moose::around |
| 21 | |||||
| 22 | 1 | 25µs | 2 | 32.7ms | __PACKAGE__->meta->make_immutable( # spent 32.6ms making 1 call to Class::MOP::Class::make_immutable
# spent 94µs making 1 call to MooseX::Role::Parameterized::Meta::Parameter::meta |
| 23 | inline_constructor => 1, | ||||
| 24 | replace_constructor => 1, | ||||
| 25 | constructor_name => "_new", | ||||
| 26 | ); | ||||
| 27 | 3 | 113µs | 2 | 1.16ms | # spent 605µs (46+559) within MooseX::Role::Parameterized::Meta::Parameter::BEGIN@27 which was called:
# once (46µs+559µs) by MooseX::Role::Parameterized::Meta::Role::Parameterizable::BEGIN@8 at line 27 # spent 605µs making 1 call to MooseX::Role::Parameterized::Meta::Parameter::BEGIN@27
# spent 559µs making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:557] |
| 28 | |||||
| 29 | 1 | 76µs | 1; | ||
| 30 | |||||
| 31 | __END__ |