| Filename | /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/Markdent/Role/BalancedEvent.pm |
| Statements | Executed 49 statements in 2.40ms |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 8 | 1 | 1 | 544µs | 7.84ms | Markdent::Role::BalancedEvent::__ANON__[:41] |
| 1 | 1 | 1 | 94µs | 926µs | Markdent::Role::BalancedEvent::BEGIN@11 |
| 1 | 1 | 1 | 76µs | 16.4ms | Markdent::Role::BalancedEvent::BEGIN@10 |
| 1 | 1 | 1 | 51µs | 51µs | Markdent::Role::BalancedEvent::BEGIN@2 |
| 1 | 1 | 1 | 44µs | 222µs | Markdent::Role::BalancedEvent::BEGIN@13 |
| 1 | 1 | 1 | 43µs | 22.2ms | Markdent::Role::BalancedEvent::BEGIN@14 |
| 1 | 1 | 1 | 39µs | 106µs | Markdent::Role::BalancedEvent::BEGIN@7 |
| 1 | 1 | 1 | 39µs | 56µs | Markdent::Role::BalancedEvent::BEGIN@6 |
| 1 | 1 | 1 | 39µs | 215µs | Markdent::Role::BalancedEvent::BEGIN@9 |
| 0 | 0 | 0 | 0s | 0s | Markdent::Role::BalancedEvent::__ANON__[:37] |
| 0 | 0 | 0 | 0s | 0s | Markdent::Role::BalancedEvent::__ANON__[:40] |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package Markdent::Role::BalancedEvent; | ||||
| 2 | # spent 51µs within Markdent::Role::BalancedEvent::BEGIN@2 which was called:
# once (51µs+0s) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 4 | ||||
| 3 | 1 | 30µs | $Markdent::Role::BalancedEvent::VERSION = '0.17'; | ||
| 4 | 1 | 76µs | 1 | 51µs | } # spent 51µs making 1 call to Markdent::Role::BalancedEvent::BEGIN@2 |
| 5 | |||||
| 6 | 3 | 93µs | 2 | 73µs | # spent 56µs (39+17) within Markdent::Role::BalancedEvent::BEGIN@6 which was called:
# once (39µs+17µs) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 6 # spent 56µs making 1 call to Markdent::Role::BalancedEvent::BEGIN@6
# spent 17µs making 1 call to strict::import |
| 7 | 3 | 106µs | 2 | 173µs | # spent 106µs (39+67) within Markdent::Role::BalancedEvent::BEGIN@7 which was called:
# once (39µs+67µs) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 7 # spent 106µs making 1 call to Markdent::Role::BalancedEvent::BEGIN@7
# spent 67µs making 1 call to warnings::import |
| 8 | |||||
| 9 | 3 | 124µs | 2 | 391µs | # spent 215µs (39+176) within Markdent::Role::BalancedEvent::BEGIN@9 which was called:
# once (39µs+176µs) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 9 # spent 215µs making 1 call to Markdent::Role::BalancedEvent::BEGIN@9
# spent 176µs making 1 call to Exporter::import |
| 10 | 3 | 190µs | 2 | 32.7ms | # spent 16.4ms (76µs+16.3) within Markdent::Role::BalancedEvent::BEGIN@10 which was called:
# once (76µs+16.3ms) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 10 # spent 16.4ms making 1 call to Markdent::Role::BalancedEvent::BEGIN@10
# spent 16.3ms making 1 call to MooseX::Types::Combine::import |
| 11 | 3 | 143µs | 2 | 1.76ms | # spent 926µs (94+832) within Markdent::Role::BalancedEvent::BEGIN@11 which was called:
# once (94µs+832µs) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 11 # spent 926µs making 1 call to Markdent::Role::BalancedEvent::BEGIN@11
# spent 832µs making 1 call to Sub::Exporter::__ANON__[Sub/Exporter.pm:756] |
| 12 | |||||
| 13 | 3 | 107µs | 2 | 400µs | # spent 222µs (44+178) within Markdent::Role::BalancedEvent::BEGIN@13 which was called:
# once (44µs+178µs) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 13 # spent 222µs making 1 call to Markdent::Role::BalancedEvent::BEGIN@13
# spent 178µs making 1 call to namespace::autoclean::import |
| 14 | 3 | 852µs | 2 | 44.4ms | # spent 22.2ms (43µs+22.2) within Markdent::Role::BalancedEvent::BEGIN@14 which was called:
# once (43µs+22.2ms) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 14 # spent 22.2ms making 1 call to Markdent::Role::BalancedEvent::BEGIN@14
# spent 22.2ms making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:456] |
| 15 | |||||
| 16 | 1 | 34µs | 3 | 31.9ms | parameter compare => ( # spent 26.4ms making 1 call to MooseX::Role::Parameterized::parameter
# spent 5.14ms making 1 call to __TYPE__::ArrayRef
# spent 370µs making 1 call to __TYPE__::Str |
| 17 | isa => ArrayRef[Str], | ||||
| 18 | ); | ||||
| 19 | |||||
| 20 | # spent 7.84ms (544µs+7.29) within Markdent::Role::BalancedEvent::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/Markdent/Role/BalancedEvent.pm:41] which was called 8 times, avg 980µs/call:
# 8 times (544µs+7.29ms) by MooseX::Role::Parameterized::Meta::Role::Parameterizable::generate_role at line 94 of MooseX/Role/Parameterized/Meta/Role/Parameterizable.pm, avg 980µs/call | ||||
| 21 | 24 | 486µs | my $p = shift; | ||
| 22 | |||||
| 23 | 8 | 114µs | my @compare = @{ $p->compare() || [] }; # spent 114µs making 8 calls to Class::MOP::Class::__ANON__::SERIAL::14::compare, avg 14µs/call | ||
| 24 | |||||
| 25 | method balances_event => sub { | ||||
| 26 | my $self = shift; | ||||
| 27 | my ($other) = pos_validated_list( \@_, { does => 'Markdent::Role::Event' } ); | ||||
| 28 | |||||
| 29 | return 0 unless $self->name() eq $other->name(); | ||||
| 30 | |||||
| 31 | return 0 | ||||
| 32 | unless ( $self->is_start() && $other->is_end() ) | ||||
| 33 | || ( $self->is_end() && $other->is_start() ); | ||||
| 34 | |||||
| 35 | return 1 unless @compare; | ||||
| 36 | |||||
| 37 | return all { $self->$_() eq $other->$_() } @compare; | ||||
| 38 | |||||
| 39 | return 0; | ||||
| 40 | 8 | 7.18ms | }; # spent 7.18ms making 8 calls to MooseX::Role::Parameterized::method, avg 897µs/call | ||
| 41 | 1 | 22µs | 1 | 145µs | }; # spent 145µs making 1 call to MooseX::Role::Parameterized::role |
| 42 | |||||
| 43 | 1 | 78µs | 1; | ||
| 44 | |||||
| 45 | # ABSTRACT: A parameterized role for events which can check if they match balance another event | ||||
| 46 | |||||
| - - | |||||
| 49 | =pod | ||||
| 50 | |||||
| - - | |||||
| 106 | 1 | 60µs | 1 | 27.2ms | __END__ # spent 27.2ms making 1 call to B::Hooks::EndOfScope::__ANON__[B/Hooks/EndOfScope.pm:26] |