| Filename | /home/doy/coding/src/Class-MOP/blib/lib//Class/MOP/Class/Immutable/Trait.pm |
| Statements | Executed 4960 statements in 41.6ms |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 62 | 1 | 1 | 890µs | 890µs | Class::MOP::Class::Immutable::Trait::_get_mutable_metaclass_name |
| 1 | 1 | 1 | 73µs | 91µs | Class::MOP::Class::Immutable::Trait::BEGIN@3 |
| 1 | 1 | 1 | 64µs | 161µs | Class::MOP::Class::Immutable::Trait::BEGIN@36 |
| 1 | 1 | 1 | 46µs | 118µs | Class::MOP::Class::Immutable::Trait::BEGIN@4 |
| 1 | 1 | 1 | 38µs | 201µs | Class::MOP::Class::Immutable::Trait::BEGIN@8 |
| 1 | 1 | 1 | 38µs | 228µs | Class::MOP::Class::Immutable::Trait::BEGIN@9 |
| 1 | 1 | 1 | 23µs | 23µs | Class::MOP::Class::Immutable::Trait::BEGIN@6 |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::__ANON__[:37] |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::_immutable_cannot_call |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::_immutable_metaclass |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::_method_map |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::class_precedence_list |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::get_all_attributes |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::get_all_method_names |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::get_all_methods |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::get_meta_instance |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::is_immutable |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::is_mutable |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::linearized_isa |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Class::Immutable::Trait::superclasses |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package Class::MOP::Class::Immutable::Trait; | ||||
| 2 | |||||
| 3 | 3 | 112µs | 2 | 109µs | # spent 91µs (73+18) within Class::MOP::Class::Immutable::Trait::BEGIN@3 which was called:
# once (73µs+18µs) by Class::MOP::__ANON__[/home/doy/coding/src/Class-MOP/blib/lib//Class/MOP.pm:118] at line 3 # spent 91µs making 1 call to Class::MOP::Class::Immutable::Trait::BEGIN@3
# spent 18µs making 1 call to strict::import |
| 4 | 3 | 104µs | 2 | 190µs | # spent 118µs (46+72) within Class::MOP::Class::Immutable::Trait::BEGIN@4 which was called:
# once (46µs+72µs) by Class::MOP::__ANON__[/home/doy/coding/src/Class-MOP/blib/lib//Class/MOP.pm:118] at line 4 # spent 118µs making 1 call to Class::MOP::Class::Immutable::Trait::BEGIN@4
# spent 72µs making 1 call to warnings::import |
| 5 | |||||
| 6 | 3 | 123µs | 1 | 23µs | # spent 23µs within Class::MOP::Class::Immutable::Trait::BEGIN@6 which was called:
# once (23µs+0s) by Class::MOP::__ANON__[/home/doy/coding/src/Class-MOP/blib/lib//Class/MOP.pm:118] at line 6 # spent 23µs making 1 call to Class::MOP::Class::Immutable::Trait::BEGIN@6 |
| 7 | |||||
| 8 | 3 | 110µs | 2 | 363µs | # spent 201µs (38+163) within Class::MOP::Class::Immutable::Trait::BEGIN@8 which was called:
# once (38µs+163µs) by Class::MOP::__ANON__[/home/doy/coding/src/Class-MOP/blib/lib//Class/MOP.pm:118] at line 8 # spent 201µs making 1 call to Class::MOP::Class::Immutable::Trait::BEGIN@8
# spent 163µs making 1 call to Exporter::import |
| 9 | 3 | 988µs | 2 | 418µs | # spent 228µs (38+190) within Class::MOP::Class::Immutable::Trait::BEGIN@9 which was called:
# once (38µs+190µs) by Class::MOP::__ANON__[/home/doy/coding/src/Class-MOP/blib/lib//Class/MOP.pm:118] at line 9 # spent 228µs making 1 call to Class::MOP::Class::Immutable::Trait::BEGIN@9
# spent 190µs making 1 call to Exporter::import |
| 10 | |||||
| 11 | 1 | 5µs | our $VERSION = '1.11'; | ||
| 12 | 1 | 65µs | $VERSION = eval $VERSION; # spent 12µs executing statements in string eval | ||
| 13 | 1 | 3µs | our $AUTHORITY = 'cpan:STEVAN'; | ||
| 14 | |||||
| 15 | # the original class of the metaclass instance | ||||
| 16 | 62 | 1.02ms | # spent 890µs within Class::MOP::Class::Immutable::Trait::_get_mutable_metaclass_name which was called 62 times, avg 14µs/call:
# 62 times (890µs+0s) by Class::MOP::Class::_real_ref_name at line 126 of Class/MOP/Class.pm, avg 14µs/call | ||
| 17 | |||||
| 18 | sub is_mutable { 0 } | ||||
| 19 | 62 | 791µs | sub is_immutable { 1 } | ||
| 20 | |||||
| 21 | sub _immutable_metaclass { ref $_[1] } | ||||
| 22 | |||||
| 23 | sub superclasses { | ||||
| 24 | 72 | 407µs | my $orig = shift; | ||
| 25 | my $self = shift; | ||||
| 26 | confess "This method is read-only" if @_; | ||||
| 27 | 18 | 1.73ms | $self->$orig; # spent 1.73ms making 18 calls to Class::MOP::Class::superclasses, avg 96µs/call | ||
| 28 | } | ||||
| 29 | |||||
| 30 | sub _immutable_cannot_call { | ||||
| 31 | my $name = shift; | ||||
| 32 | Carp::confess "The '$name' method cannot be called on an immutable instance"; | ||||
| 33 | } | ||||
| 34 | |||||
| 35 | 1 | 7µs | for my $name (qw/add_method alias_method remove_method add_attribute remove_attribute remove_package_symbol add_package_symbol/) { | ||
| 36 | 3 | 1.62ms | 2 | 259µs | # spent 161µs (64+98) within Class::MOP::Class::Immutable::Trait::BEGIN@36 which was called:
# once (64µs+98µs) by Class::MOP::__ANON__[/home/doy/coding/src/Class-MOP/blib/lib//Class/MOP.pm:118] at line 36 # spent 161µs making 1 call to Class::MOP::Class::Immutable::Trait::BEGIN@36
# spent 98µs making 1 call to strict::unimport |
| 37 | 7 | 136µs | *{__PACKAGE__."::$name"} = sub { _immutable_cannot_call($name) }; | ||
| 38 | } | ||||
| 39 | |||||
| 40 | sub class_precedence_list { | ||||
| 41 | 219 | 2.01ms | my $orig = shift; | ||
| 42 | my $self = shift; | ||||
| 43 | 18 | 0s | @{ $self->{__immutable}{class_precedence_list} # spent 15.1ms making 18 calls to Class::MOP::Class::class_precedence_list, avg 837µs/call, recursion: max depth 4, sum of overlapping time 15.1ms | ||
| 44 | ||= [ $self->$orig ] }; | ||||
| 45 | } | ||||
| 46 | |||||
| 47 | sub linearized_isa { | ||||
| 48 | 237 | 2.22ms | my $orig = shift; | ||
| 49 | my $self = shift; | ||||
| 50 | 18 | 873µs | @{ $self->{__immutable}{linearized_isa} ||= [ $self->$orig ] }; # spent 873µs making 18 calls to Class::MOP::Class::linearized_isa, avg 49µs/call | ||
| 51 | } | ||||
| 52 | |||||
| 53 | sub get_all_methods { | ||||
| 54 | my $orig = shift; | ||||
| 55 | my $self = shift; | ||||
| 56 | @{ $self->{__immutable}{get_all_methods} ||= [ $self->$orig ] }; | ||||
| 57 | } | ||||
| 58 | |||||
| 59 | sub get_all_method_names { | ||||
| 60 | my $orig = shift; | ||||
| 61 | my $self = shift; | ||||
| 62 | @{ $self->{__immutable}{get_all_method_names} ||= [ $self->$orig ] }; | ||||
| 63 | } | ||||
| 64 | |||||
| 65 | sub get_all_attributes { | ||||
| 66 | 747 | 6.85ms | my $orig = shift; | ||
| 67 | my $self = shift; | ||||
| 68 | 18 | 9.29ms | @{ $self->{__immutable}{get_all_attributes} ||= [ $self->$orig ] }; # spent 9.29ms making 18 calls to Class::MOP::Class::get_all_attributes, avg 516µs/call | ||
| 69 | } | ||||
| 70 | |||||
| 71 | sub get_meta_instance { | ||||
| 72 | 1758 | 12.3ms | my $orig = shift; | ||
| 73 | my $self = shift; | ||||
| 74 | 24 | 13.0ms | $self->{__immutable}{get_meta_instance} ||= $self->$orig; # spent 13.0ms making 24 calls to Class::MOP::Class::get_meta_instance, avg 540µs/call | ||
| 75 | } | ||||
| 76 | |||||
| 77 | sub _method_map { | ||||
| 78 | 1773 | 12.7ms | my $orig = shift; | ||
| 79 | my $self = shift; | ||||
| 80 | 31 | 774µs | $self->{__immutable}{_method_map} ||= $self->$orig; # spent 726µs making 22 calls to Class::MOP::Mixin::HasMethods::_method_map, avg 33µs/call
# spent 48µs making 9 calls to Class::MOP::Method::body, avg 5µs/call | ||
| 81 | } | ||||
| 82 | |||||
| 83 | 1 | 18µs | 1; | ||
| 84 | |||||
| 85 | __END__ |