line |
true |
false |
branch |
63
|
1 |
18 |
unless $ok |
68
|
1 |
17 |
unless $ok |
71
|
1 |
16 |
unless my $iinfo = info_interface($interface_package) |
78
|
1 |
19 |
unless my $code = $package->can($fname) |
81
|
2 |
17 |
unless my $pinfo = info_params($code) |
83
|
2 |
15 |
unless my $rinfo = info_return($code) |
86
|
2 |
13 |
unless check_params($pinfo, $ifunction_info) |
88
|
2 |
11 |
unless check_return($rinfo, $ifunction_info) |
116
|
2 |
31 |
unless $ifunction_info->keyword eq $pinfo->keyword |
126
|
6 |
7 |
unless check_param($p, $ifp) |
130
|
3 |
22 |
unless $params_count == @{$ifunction_info->params;} |
136
|
4 |
9 |
unless $param |
144
|
7 |
18 |
unless @{$rinfo->types;} == @{$ifunction_info->return;} |
149
|
4 |
4 |
unless $ifr->type eq $type |
156
|
4 |
10 |
ref $package ? : |