Condition Coverage

blib/lib/CORBA/IDLtree.pm
Criterion Covered Total %
condition 122 438 27.8


and 3 conditions

line !l l&&!r l&&r condition
1209 31 0 3 $ch eq '"' and substr($str, $i - 1, 1) ne '\\'
1270 900 20 0 $out[$i] eq ':' and $out[$i + 1] eq ':'
920 0 0 $out[$i] eq '-' and $out[$i + 1] =~ /^\d/
1271 25 5 0 $out[$i + 1] eq 'double' and not $CORBA::IDLtree::long_double_supported
1294 0 0 0 $i < $#out - 1 and $out[$i + 2] eq ':'
1298 0 0 0 $prev =~ /\w$/ and not exists $keywords{$prev}
1320 951 0 0 $out[$i] =~ /^[\-\d][\d\.]*e$/i and $out[$i + 1] eq '+' || $out[$i + 1] eq '-'
1329 24 0 0 $out[$i + 1] eq '<' and $out[$i + 3] eq '>'
703 24 0 $out[$i] =~ /^w?string$/ and ($out[$i + 1] eq '<' and $out[$i + 3] eq '>')
1354 0 0 17 $tdesc >= 1 and $tdesc <= 18
0 0 0 $recurse_into_typedef and isnode($tdesc)
0 0 0 $recurse_into_typedef and isnode($tdesc) and $tdesc->[0] == 24
1365 0 0 0 $dimref and @{$dimref;}
1378 111 0 0 $CORBA::IDLtree::string_bound and $idltype =~ /^w?string$/
1398 185 0 0 $name =~ /^_/ and not $CORBA::IDLtree::leading_underscore_allowed
1668 0 0 0 isnode($type) and $type->[1] eq $component_name
1677 0 45 0 $_->[0] != 48 and $_->[1] eq $component_name
1745 107 59 0 @typestack && $typestack[$#typestack] == ANNOTATION()
1757 0 1 0 not $did_emucppmsg and $verbose
1863 0 0 0 $ord1 == 187 and $ord2 == 191
2024 226 0 0 $line =~ /\@/ and not $line =~ /\@annotation\b/
2068 0 0 0 exists $active_defines{$symbol} and $value ne $active_defines{$symbol}
2120 2 0 0 not $refscope and $p eq ''
2292 0 0 0 $lang and $lang ne 'C'
2305 0 2 0 $res and not @$res
2330 0 0 0 isnode($membertype) and $membertype->[0] == 20 || $membertype->[0] == 21
2373 0 0 0 $argref and @$argref
2380 0 0 0 @$argref and $argref->[0] eq '('
2395 0 0 0 $val =~ /^[a-z]/i and $argref->[0] eq '='
2480 97 0 0 $in_valuetype and not $CORBA::IDLtree::vt2struct
2551 201 0 0 $CORBA::IDLtree::enable_comments and @remark
2775 10 4 1 $type == 27 and is_a($struct[0], 23)
2794 0 2 1 defined $lit and not defined $lits_given{$lit}
2802 15 0 0 $CORBA::IDLtree::struct2vt and $type == 26
2935 0 0 0 isname($nxttok) and $nxttok ne 'supports'
2937 0 0 0 $anc_type->[0] != 35 and $anc_type->[0] != 37
0 0 0 $anc_type->[0] != 35 and $anc_type->[0] != 37 and $anc_type->[0] != 36
2986 0 0 0 ref $fwd and $fwd->[0] == 36
3053 2 8 0 $type == 26 and $nxt eq ':'
3056 0 0 0 isnode($parent) and $parent->[0] == 26
3072 0 0 0 $CORBA::IDLtree::struct2vt and $type == 26
3107 0 1 0 $typ > 9 and $typ != 23
1 0 0 $typ > 9 and $typ != 23 and $typ != 24
3185 0 0 0 $cmnt and $cmnt != $initial_cmnt
3220 12 0 0 $CORBA::IDLtree::enable_comments and @remark
3371 42 0 0 $in_valuetype and $kw eq 'factory'
3420 77 0 0 $rettype == 41 and $pmode != 1
3432 31 0 46 @arg and $arg[0] eq ','
3449 1 0 0 @arg and shift @arg ne ','
3478 2 0 0 $struct[$i][0] != 28 and $struct[$i][0] != 29
3493 0 0 0 $cmnt and $cmnt != $initial_cmnt
3555 2 153 7182 ref $node_ref eq 'ARRAY' and defined $node_ref->[0]
3556 0 348 6834 $node_ref->[0] >= 1 and $node_ref->[0] < 49
3558 6834 0 0 scalar @$node_ref == 5 and $verbose
3658 0 0 0 defined $root->[1] and $root->[1] eq $first
3690 0 5097 246 defined $node->[1] and $node->[1] eq $first
3712 401 0 78 defined $anc and @parts == 0
3775 0 0 67 @prev_symroots and $prev_symroots[-1] != $current_symtree_ref
3852 0 0 1 $currfile >= 0 and $currfile < scalar @infilename
3887 0 0 98 $type >= 1 and $type < 49
91 0 98 not ref $type and ($type >= 1 and $type < 49)
3977 0 0 0 $dimref and @{$dimref;}
3987 14 3 0 isnode($type) and $type->[0] == 24
3989 0 0 0 $dimref and @{$dimref;}
4002 0 0 0 isnode($type) and $type->[0] == 24
4113 0 0 0 $wantfloat and not $v =~ /\./
4123 0 0 0 $wantfloat and not $res =~ /\./
4135 0 0 0 $t >= 11 && $t <= 13
4153 0 0 0 $wantfloat and not $res =~ /\./
4208 0 0 0 @$node > 1 and $node->[1] eq $name
4209 0 0 0 $must_be_scope_node and not is_scope($node)
4234 0 0 0 is_scope($node) and $scopes[0] eq $node->[1]
4339 0 0 0 defined $scoperef and $scoperef != 0
4352 0 0 0 $recurse and not $noderef
4379 0 0 0 defined $full_interface and @{$full_interface;}
4639 0 8 5 $dimref and @{$dimref;}
4923 0 0 0 isnode($st) and $st->[0] == 23

or 3 conditions

line l !l&&r !l&&!r condition
1072 0 4 0 ref $class || $class
1274 5 5 20 $out[$i + 1] eq 'long' or $out[$i + 1] eq 'double'
1279 1 0 0 $out[$i + 1] eq 'short' or $out[$i + 1] eq 'long'
1313 0 0 0 $i == 0 or $out[$i - 1] eq '('
0 0 0 $i == 0 or $out[$i - 1] eq '(' or $out[$i - 1] eq '='
0 0 0 $i == 0 or $out[$i - 1] eq '(' or $out[$i - 1] eq '=' or $in_preprocessor
1320 0 0 0 $out[$i + 1] eq '+' || $out[$i + 1] eq '-'
1398 0 0 185 not $name =~ /^[a-z_:]/i or $name =~ /^_/ and not $CORBA::IDLtree::leading_underscore_allowed
1557 0 0 0 scalar @expr > 1 or not $expr[0] =~ /^\d/
1642 0 13 0 $nxtarg eq ',' or $nxtarg eq ';'
1676 46 7 45 $_->[0] == 28 or $_->[0] == 29
1774 0 0 0 @arg or not $symbol =~ /^\d+$/
1829 0 0 0 $directive eq 'else' or $directive eq 'endif'
1839 0 0 0 $directive eq 'if' or $directive eq 'ifdef'
0 0 0 $directive eq 'if' or $directive eq 'ifdef' or $directive eq 'ifndef'
2024 2 0 226 $line =~ /^#/ or $line =~ /\@/ and not $line =~ /\@annotation\b/
0 222 4 $line =~ /^#/ or $line =~ /\@/ and not $line =~ /\@annotation\b/ or $line =~ /[;,":{]$/
2046 0 0 2 $directive eq 'if' or $directive eq 'elif'
2223 1 1 0 $c eq 'TRUE' or $c eq 'FALSE'
2230 5 0 0 $c =~ /^'.*'$/ or $c =~ /^\d+$/
2330 0 0 0 $membertype->[0] == 20 || $membertype->[0] == 21
2564 0 0 132 $kw eq 'public' or $kw eq 'private'
8 2 122 $kw eq 'struct' or $kw eq 'exception'
16 1 100 $kw eq 'case' or $kw eq 'default'
2566 0 0 0 $directive eq 'if' or $directive eq 'ifdef'
0 0 0 $directive eq 'if' or $directive eq 'ifdef' or $directive eq 'ifndef'
0 0 0 $directive eq 'if' or $directive eq 'ifdef' or $directive eq 'ifndef' or $directive eq 'elif'
0 0 0 $directive eq 'if' or $directive eq 'ifdef' or $directive eq 'ifndef' or $directive eq 'elif' or $directive eq 'else'
0 0 0 $directive eq 'if' or $directive eq 'ifdef' or $directive eq 'ifndef' or $directive eq 'elif' or $directive eq 'else' or $directive eq 'endif'
0 0 0 $directive eq 'if' or $directive eq 'ifdef' or $directive eq 'ifndef' or $directive eq 'elif' or $directive eq 'else' or $directive eq 'endif' or $directive eq 'define'
0 0 0 $directive eq 'if' or $directive eq 'ifdef' or $directive eq 'ifndef' or $directive eq 'elif' or $directive eq 'else' or $directive eq 'endif' or $directive eq 'define' or $directive eq 'undef'
2639 0 0 1 @typestack or @scopestack
2734 0 0 0 $arg[0] eq '}' or parse_members($symbols, \@arg, \@struct) == 1
2937 0 0 0 not isnode($anc_type) or $anc_type->[0] != 35 and $anc_type->[0] != 37 and $anc_type->[0] != 36
2953 0 0 0 not isnode($anc_type) or $anc_type->[0] != 33
0 0 0 not isnode($anc_type) or $anc_type->[0] != 33 or $anc_type->[0] != 34
3068 0 0 0 $arg[0] eq '}' or parse_members($symbols, \@arg, \@struct, $cmnt) == 1
3102 0 0 4 $switchtype < 1 or $switchtype > 10
3107 0 0 1 $typ < 1 or $typ > 9 and $typ != 23 and $typ != 24
3261 1 2 69 $kw eq 'readonly' or $kw eq 'attribute'
3280 7 0 5 /^\d/ or /^\.\d/
7 0 5 /^\d/ or /^\.\d/ or /^-\d/
3281 1 1 3 /^'.*'$/ or /^".*"$/
3301 0 0 2 $id < 23 or $id > 24
3478 0 0 2 $i < 0 or $struct[$i][0] != 28 and $struct[$i][0] != 29
3579 0 0 0 $type == 32 || $type == 33 || $type == 35 || $type == 43
3590 0 0 0 $type == 19 || $type == 20 || $type == 21 || $type == 22 || $type == 23 || $type == 24 || $type == 25 || $type == 26 || $type == 27 || $type == 33 || $type == 34 || $type == 35 || $type == 36 || $type == 37
3688 0 934 5420 $nt == 48 or $nt == 42
934 76 5344 $nt == 48 or $nt == 42 or $nt == 38
3739 0 200 0 $name =~ /^CORBA::/ or not $name =~ /::/
3921 0 0 91 $node[0] == 20 or $node[0] == 21
4014 0 0 0 $type == 44 || $type == 45 || $type == 46 || $type == 47
4090 0 0 0 $dg[0] eq '-' or $dg[0] eq '+'
0 0 0 $dg[0] eq '-' or $dg[0] eq '+' or $dg[0] eq '0'
4097 0 0 0 $c lt '0' or $c gt '7'
4365 0 0 0 $nt == 43 or $nt == 32
0 0 0 $nt == 43 or $nt == 32 or $nt == 33
0 0 0 $nt == 43 or $nt == 32 or $nt == 33 or $nt == 35
4388 0 0 0 $nt == 43 or $nt == 32
0 0 0 $nt == 43 or $nt == 32 or $nt == 33
0 0 0 $nt == 43 or $nt == 32 or $nt == 33 or $nt == 35
4489 1 1 131 $type == 43 or $type == 44
4499 2 16 56 $type == 32 or $type == 33
7 5 16 $type == 26 or $type == 27
12 2 14 $type == 26 or $type == 27 or $type == 30
4521 54 0 0 scalar @last != 3 or ref $last[1]
4683 16 1 29 $type == 28 or $type == 29
4859 0 0 0 $e == 2 || $e == 5 || $e == 6 || $e == 7 || $e == 8 || $e == 9 || $e == 10
4918 0 0 0 defined $memb or $CORBA::IDLtree::union_default_null_allowed