| blib/lib/FSM/Tiny.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 28 | 57.1 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 0 | 1 | $_[1] ? : |
| 27 | 0 | 0 | if (my $r = ref $s) { } |
| 28 | 0 | 0 | if ($r eq 'ARRAY') { } |
| 0 | 0 | elsif ($r eq 'CODE') { } | |
| 43 | 0 | 44 | if $DEBUG |
| 48 | 1 | 2 | unless $self->current |
| 65 | 0 | 42 | unless my $st = $self->rules->{$self->current} |
| 67 | 1 | 41 | unless my $next = $st->next($self->context) |
| 75 | 1 | 0 | unless $_[0] |
| 79 | 1 | 41 | unless (@{$self->rules->{$self->current}{'guards'};}) |
| 83 | 0 | 41 | unless $self->step |
| 95 | 0 | 3 | unless $args{'guards'} |
| 101 | 1 | 2 | (ref $code || '') ne 'CODE' ? : |
| 111 | 41 | 1 | if $guard->check($context) |