blib/lib/Role/Declare.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 21 | 28 | 75.0 |
line | true | false | branch |
---|---|---|---|
30 | 0 | 18 | if defined $hook_slot |
42 | 0 | 10 | if @$data != 1 |
61 | 0 | 5 | unless $constraint |
66 | 1 | 10 | if not @$retval and $allow_empty |
103 | 0 | 1 | if @$data != 1 |
115 | 1 | 6 | if not defined $self and $allow_undef |
116 | 3 | 3 | if ref $self and &refaddr($self) eq $orig_self_addr |
158 | 11 | 31 | if wantarray and $val_list |
159 | 31 | 0 | if defined wantarray and $val_scalar |
170 | 0 | 3 | if $class ne 'Role::Declare' |
173 | 1 | 2 | if (defined $mode) |
174 | 1 | 0 | if ($mode eq '-lax') { } |
192 | 17 | 1 | if (defined $hooks) |
204 | 1 | 2 | if $lax |