| line |
true |
false |
branch |
|
825
|
0 |
0 |
if /: *(\S+)/ |
|
1094
|
43 |
0 |
if ($value) |
|
1095
|
1 |
42 |
if (exists $this->{'_cache'}{$name}) |
|
1097
|
1 |
0 |
if ($existing != $value) |
|
1100
|
0 |
1 |
if $CORBA::IDLtree::verbose |
|
1117
|
66 |
311 |
if (exists $this->{'_cache'}{$name}) |
|
1187
|
0 |
0 |
if (-e $fqn) |
|
1207
|
34 |
6100 |
if ($in_string) { } |
|
|
3 |
6097 |
elsif ($ch eq '"') { } |
|
|
6 |
6091 |
elsif ($ch eq q[']) { } |
|
|
4921 |
1170 |
elsif ($ch =~ /[a-z_0-9\.]/i) { } |
|
|
694 |
476 |
elsif ($in_lit) { } |
|
|
247 |
229 |
elsif (not $ch =~ /\s/) { } |
|
1209
|
3 |
31 |
if ($ch eq '"' and substr($str, $i - 1, 1) ne '\\') |
|
1217
|
0 |
6 |
if ($endx < $i + 2) |
|
1225
|
694 |
4227 |
unless ($in_lit) |
|
1233
|
0 |
694 |
if (exists $active_defines{$out[$ondx]}) |
|
1235
|
0 |
0 |
if ("$value" ne '') |
|
1242
|
236 |
458 |
unless ($ch =~ /\s/) |
|
1249
|
0 |
224 |
if ($in_lit) |
|
1251
|
0 |
0 |
if (exists $active_defines{$out[$ondx]}) |
|
1253
|
0 |
0 |
if ("$value" ne '') |
|
1270
|
30 |
921 |
if ($out[$i] eq 'long') { } |
|
|
1 |
920 |
elsif ($out[$i] eq 'unsigned') { } |
|
|
0 |
920 |
elsif ($out[$i] eq ':' and $out[$i + 1] eq ':') { } |
|
|
0 |
1840 |
elsif ($out[$i] eq '-' and $out[$i + 1] =~ /^\d/) { } |
|
1271
|
0 |
30 |
if ($out[$i + 1] eq 'double' and not $CORBA::IDLtree::long_double_supported) |
|
1274
|
10 |
20 |
if ($out[$i + 1] eq 'long' or $out[$i + 1] eq 'double') |
|
1279
|
1 |
0 |
if ($out[$i + 1] eq 'short' or $out[$i + 1] eq 'long') |
|
1282
|
0 |
1 |
if ($out[$i + 1] eq 'long') |
|
1294
|
0 |
0 |
unless ($i < $#out - 1 and $out[$i + 2] eq ':') |
|
1296
|
0 |
0 |
if ($i > 0) |
|
1298
|
0 |
0 |
if ($prev =~ /\w$/ and not exists $keywords{$prev}) |
|
1299
|
0 |
0 |
if ($out[$i - 1] eq 'CORBA') { } |
|
1313
|
0 |
0 |
if ($i == 0 or $out[$i - 1] eq '(' or $out[$i - 1] eq '=' or $in_preprocessor) |
|
1320
|
0 |
0 |
if ($out[$i] =~ /^[\-\d][\d\.]*e$/i and $out[$i + 1] eq '+' || $out[$i + 1] eq '-') |
|
1329
|
0 |
24 |
if ($out[$i] =~ /^w?string$/ and ($out[$i + 1] eq '<' and $out[$i + 3] eq '>')) |
|
1344
|
0 |
17 |
unless (defined $tdesc) |
|
1350
|
0 |
17 |
if (@_) |
|
1354
|
17 |
0 |
if ($tdesc >= 1 and $tdesc <= 18) { } |
|
|
0 |
0 |
elsif ($recurse_into_typedef and isnode($tdesc) and $tdesc->[0] == 24) { } |
|
1365
|
0 |
0 |
unless ($dimref and @{$dimref;}) |
|
1377
|
111 |
6404 |
if ($idltype eq $predef_types[$i]) |
|
1378
|
0 |
111 |
if ($CORBA::IDLtree::string_bound and $idltype =~ /^w?string$/) { } |
|
1386
|
0 |
110 |
if ($idltype =~ /^(w?string)\s*<(\d+)\s*>/) |
|
1388
|
0 |
0 |
$1 eq 'wstring' ? : |
|
1398
|
0 |
185 |
if (not $name =~ /^[a-z_:]/i or $name =~ /^_/ and not $CORBA::IDLtree::leading_underscore_allowed) |
|
1407
|
81 |
88 |
if (@_) |
|
1410
|
0 |
169 |
unless (is_valid_identifier($name)) |
|
1411
|
0 |
0 |
unless ($name =~ /^w?string<.*>$/) |
|
1415
|
0 |
169 |
if (exists $keywords{lc $name}) |
|
1416
|
0 |
0 |
if ($CORBA::IDLtree::permissive) { } |
|
1424
|
169 |
0 |
unless ($CORBA::IDLtree::leading_underscore_allowed > 1) |
|
1433
|
13 |
0 |
if (@_) |
|
1436
|
0 |
13 |
unless (is_valid_identifier($name)) |
|
1437
|
0 |
0 |
unless ($name =~ /^w?string<.*>$/) |
|
1442
|
0 |
13 |
ref $pt ? : |
|
|
13 |
0 |
if ((ref $pt ? $pt->[0] : $pt) < 24) |
|
1446
|
0 |
0 |
if (exists $keywords{lc $name}) |
|
1447
|
0 |
0 |
if ($CORBA::IDLtree::permissive) { } |
|
1464
|
5 |
140 |
$#scopestack < 0 ? : |
|
1469
|
0 |
183 |
if (@annotations) |
|
1478
|
0 |
236 |
if (@post_comment) |
|
1489
|
0 |
8 |
if (shift @{$argref;} ne '<') |
|
1495
|
3 |
5 |
if (not $type) { } |
|
|
0 |
5 |
elsif ($type == 22) { } |
|
1497
|
0 |
3 |
unless ($type) |
|
1506
|
2 |
6 |
if ($nxtarg eq ',') |
|
1510
|
0 |
8 |
if ($nxtarg ne '>') |
|
1521
|
0 |
88 |
if ($typename eq 'fixed') { } |
|
|
0 |
88 |
elsif ($typename =~ /^(w?string)<([\w:]+)>$/) { } |
|
|
8 |
80 |
elsif ($typename eq 'sequence') { } |
|
1522
|
0 |
0 |
if (shift @{$argref;} ne '<') |
|
1527
|
0 |
0 |
if ($digits =~ /\D/) |
|
1531
|
0 |
0 |
if (shift @{$argref;} ne ',') |
|
1536
|
0 |
0 |
if ($scale =~ /\D/) |
|
1540
|
0 |
0 |
if (shift @{$argref;} ne '>') |
|
1548
|
0 |
0 |
$1 eq 'wstring' ? : |
|
1550
|
0 |
0 |
unless ($bound =~ /^\d/) |
|
1552
|
0 |
0 |
if (isnode($boundtype)) { } |
|
1554
|
0 |
0 |
if ($node[0] == 31) { } |
|
1557
|
0 |
0 |
if (scalar @expr > 1 or not $expr[0] =~ /^\d/) |
|
1596
|
30 |
0 |
if (ref $structref_or_vt_access) { } |
|
1603
|
0 |
30 |
if ($first_thing eq '}') |
|
1607
|
0 |
30 |
unless ($component_type) |
|
1611
|
0 |
30 |
if (&in_annotation_def()) |
|
1614
|
0 |
0 |
if (@arg) |
|
1616
|
0 |
0 |
if ($next eq 'default') |
|
1621
|
0 |
0 |
if (@arg) |
|
1623
|
0 |
0 |
unless ($next eq ';') |
|
1630
|
0 |
30 |
unless (is_type($component_type)) |
|
1636
|
0 |
30 |
if $component_name eq '}' |
|
1642
|
0 |
13 |
if ($nxtarg eq '[') { } |
|
|
13 |
0 |
elsif ($nxtarg eq ',' or $nxtarg eq ';') { } |
|
1644
|
0 |
0 |
if (shift @arg ne ']') |
|
1657
|
0 |
30 |
if (@dimensions) |
|
1659
|
0 |
0 |
unless ($CORBA::IDLtree::permissive) |
|
1665
|
0 |
30 |
if ($value_member_flag) { } |
|
1668
|
0 |
0 |
if (isnode($type) and $type->[1] eq $component_name) |
|
1675
|
15 |
98 |
unless ref $_ |
|
1676
|
53 |
45 |
if $_->[0] == 28 or $_->[0] == 29 |
|
1677
|
0 |
45 |
if ($_->[0] != 48 and $_->[1] eq $component_name) |
|
1683
|
0 |
30 |
if ($name_found) |
|
1687
|
15 |
15 |
unless (defined $comment) |
|
1692
|
0 |
30 |
if ($value_member_flag) { } |
|
1697
|
13 |
17 |
if $nxtarg eq ';' |
|
1749
|
0 |
0 |
if (@_) { } |
|
1757
|
0 |
1 |
if (not $did_emucppmsg and $verbose) |
|
1770
|
0 |
0 |
if ($symbol eq 'defined') { } |
|
|
0 |
0 |
elsif ($symbol =~ /^[A-z]/) { } |
|
|
0 |
0 |
elsif (not $symbol =~ /^\d+$/) { } |
|
1771
|
0 |
0 |
if $arg[0] eq '(' |
|
1773
|
0 |
0 |
if $arg[0] eq ')' |
|
1774
|
0 |
0 |
if (@arg or not $symbol =~ /^\d+$/) |
|
1798
|
0 |
0 |
if ($in_comment) |
|
1799
|
0 |
0 |
if ($l =~ m[\*/]) |
|
1805
|
0 |
0 |
if ($cstart >= 0) |
|
1807
|
0 |
0 |
if ($cstop > $cstart) { } |
|
1809
|
0 |
0 |
if ($cstart > 0) |
|
1814
|
0 |
0 |
if ($cstop < length $l) |
|
1823
|
0 |
0 |
unless $l =~ /^\s*#/ |
|
1828
|
0 |
0 |
if ($count == 0) |
|
1829
|
0 |
0 |
if ($directive eq 'else' or $directive eq 'endif') |
|
1832
|
0 |
0 |
if ($directive eq 'elif') |
|
1833
|
0 |
0 |
if (eval_preproc_expr(@arg)) |
|
1839
|
0 |
0 |
if ($directive eq 'if' or $directive eq 'ifdef' or $directive eq 'ifndef') { } |
|
|
0 |
0 |
elsif ($directive eq 'endif') { } |
|
1855
|
21 |
1 |
if (length $line > 2) |
|
1858
|
0 |
21 |
if ($ord0 == 65279) { } |
|
|
0 |
21 |
elsif ($ord0 == 239) { } |
|
1863
|
0 |
0 |
if ($ord1 == 187 and $ord2 == 191) |
|
1874
|
204 |
25 |
if (@_) |
|
1878
|
2 |
227 |
if (@global_items) |
|
1897
|
22 |
281 |
if ($firstline) |
|
1901
|
0 |
303 |
if ($l =~ /[^\t\f[:print:]]/) |
|
1903
|
0 |
0 |
unless (ref $decoder) |
|
1905
|
0 |
0 |
if ($decoder =~ /No appropriate encodings found/) { } |
|
1913
|
43 |
260 |
if ($l =~ /^\s*$/) |
|
1914
|
0 |
43 |
if ($in_comment) |
|
1915
|
0 |
0 |
if ($seen_token) { } |
|
1923
|
21 |
239 |
if ($in_comment) |
|
1924
|
0 |
21 |
if ($l =~ m[/\*]) |
|
1927
|
1 |
20 |
if ($l =~ m[\*/]) { } |
|
1934
|
0 |
1 |
if ($seen_token) { } |
|
1941
|
0 |
1 |
if ($seen_token) |
|
1942
|
0 |
0 |
unless ($l =~ /^\s*$/) |
|
1947
|
1 |
0 |
if $l =~ /^\s*$/ |
|
1949
|
0 |
20 |
if ($seen_token) { } |
|
1957
|
10 |
229 |
if ($l =~ m[^\s*//(.*)]) |
|
1959
|
6 |
4 |
unless (@remark) |
|
1969
|
0 |
1 |
if ($cend > 0) { } |
|
1993
|
0 |
1 |
unless (defined $line_number[$currfile]) |
|
1996
|
1 |
0 |
if ($l =~ /^\s*$/) { } |
|
2005
|
0 |
228 |
if ($l =~ m[//(.*)$]) |
|
2007
|
0 |
0 |
unless ($cmnt =~ /^\s*$/) |
|
2008
|
0 |
0 |
unless (defined $line_number[$currfile]) |
|
2018
|
224 |
4 |
if ($first) { } |
|
2024
|
222 |
4 |
if ($line =~ /^#/ or $line =~ /\@/ and not $line =~ /\@annotation\b/ or $line =~ /[;,":{]$/) |
|
2028
|
224 |
0 |
unless $in_comment |
|
2031
|
0 |
227 |
if ($in_comment) |
|
2035
|
3 |
224 |
unless ($line) |
|
2041
|
222 |
2 |
if ($tmp[0] ne '#') |
|
2046
|
0 |
2 |
if ($directive eq 'if' or $directive eq 'elif') { } |
|
|
0 |
2 |
elsif ($directive eq 'ifdef') { } |
|
|
0 |
2 |
elsif ($directive eq 'ifndef') { } |
|
|
0 |
2 |
elsif ($directive eq 'define') { } |
|
|
0 |
2 |
elsif ($directive eq 'undef') { } |
|
|
0 |
2 |
elsif ($directive eq 'else') { } |
|
|
0 |
2 |
elsif ($directive eq 'endif') { } |
|
2048
|
0 |
0 |
unless eval_preproc_expr(@tmp) |
|
2053
|
0 |
0 |
unless $symbol =~ /^\d/ |
|
2058
|
0 |
0 |
if $symbol =~ /^\d/ |
|
2064
|
0 |
0 |
if (@tmp) |
|
2066
|
0 |
0 |
if $verbose |
|
2068
|
0 |
0 |
if (exists $active_defines{$symbol} and $value ne $active_defines{$symbol}) |
|
2070
|
0 |
0 |
if ($CORBA::IDLtree::cache_trees) { } |
|
2082
|
0 |
0 |
if (exists $active_defines{$symbol}) |
|
2083
|
0 |
0 |
if ($CORBA::IDLtree::cache_trees) |
|
2118
|
2 |
0 |
if (@parts == 0) |
|
2120
|
0 |
2 |
if (not $refscope and $p eq '') |
|
2126
|
2 |
0 |
if $scope == $s |
|
2137
|
0 |
0 |
if $is_abs |
|
2140
|
0 |
0 |
if join('::', @parts) eq $p |
|
2142
|
0 |
0 |
unless ($is_abs) |
|
2145
|
0 |
0 |
if join('::', (@anc, @parts)) eq $p |
|
2160
|
0 |
6 |
unless (ref $enum_subordinate) |
|
2166
|
0 |
21 |
unless (ref $elem eq 'ARRAY') |
|
2171
|
0 |
21 |
if $elem->[0] =~ /^\d/ |
|
2184
|
2 |
0 |
unless defined $refscope |
|
2190
|
2 |
0 |
if (defined $s) |
|
2192
|
2 |
2 |
if $_ eq $e |
|
2202
|
1 |
16 |
if ($case->[0] == 29) { } |
|
2204
|
1 |
2 |
if $i++ == 0 |
|
2205
|
0 |
2 |
if ($_->[0] == 29) |
|
2213
|
2 |
14 |
if (is_a($type, 23)) { } |
|
|
2 |
12 |
elsif (is_a($type, 1)) { } |
|
|
4 |
8 |
elsif (is_a($type, 3)) { } |
|
2216
|
0 |
2 |
unless (check_enum_literal($type, $c)) |
|
2223
|
0 |
2 |
unless ($c eq 'TRUE' or $c eq 'FALSE') |
|
2230
|
0 |
5 |
unless ($c =~ /^'.*'$/ or $c =~ /^\d+$/) |
|
2238
|
0 |
9 |
unless ($c =~ /^[-+]?\d+$/) |
|
2240
|
0 |
0 |
unless ($resolved_const =~ /^[-+]?\d+$/) |
|
2248
|
16 |
70 |
if $i++ == 0 |
|
2249
|
41 |
29 |
unless $_->[0] == 28 |
|
2252
|
0 |
38 |
if ($c eq $_) |
|
2266
|
0 |
2 |
if ($CORBA::IDLtree::cache_trees) { } |
|
2268
|
0 |
0 |
if ($incfile_contents_ref) |
|
2288
|
1 |
1 |
unless ($locale_was_determined) |
|
2290
|
0 |
3 |
if (exists $ENV{$env}) |
|
2292
|
0 |
0 |
if ($lang and $lang ne 'C') |
|
2301
|
0 |
2 |
if ($CORBA::IDLtree::cache_statistics) |
|
2305
|
0 |
2 |
if ($res and not @$res) { } |
|
|
0 |
2 |
elsif ($CORBA::IDLtree::cache_trees) { } |
|
2322
|
0 |
0 |
unless $node->[0] == 26 |
|
2327
|
0 |
0 |
if ($membertype == 48) { } |
|
2330
|
0 |
0 |
if (isnode($membertype) and $membertype->[0] == 20 || $membertype->[0] == 21) |
|
2363
|
0 |
0 |
unless (defined $index) |
|
2371
|
0 |
0 |
if (@adef) |
|
2373
|
0 |
0 |
unless ($argref and @$argref) |
|
2380
|
0 |
0 |
if (@$argref and $argref->[0] eq '(') |
|
2381
|
0 |
0 |
unless (@adef) |
|
2390
|
0 |
0 |
if ($val eq ')') |
|
2394
|
0 |
0 |
if $val eq ',' |
|
2395
|
0 |
0 |
if ($val =~ /^[a-z]/i and $argref->[0] eq '=') { } |
|
2398
|
0 |
0 |
unless (@$argref) |
|
2404
|
0 |
0 |
if ($adef[$ai][1] eq $parname) |
|
2409
|
0 |
0 |
unless (defined $param_index) |
|
2415
|
0 |
0 |
if (exists $annoEnum{$type}) |
|
2417
|
0 |
0 |
unless (grep {$_ eq $val;} @{$enumvalues;}) |
|
2425
|
0 |
0 |
if (exists $annoEnum{$type}) |
|
2427
|
0 |
0 |
unless (grep {$_ eq $val;} @{$enumvalues;}) |
|
2437
|
0 |
0 |
unless ($closing_parenth_seen) |
|
2442
|
0 |
0 |
if (@adef) |
|
2444
|
0 |
0 |
unless (defined $anargs[$i]) |
|
2447
|
0 |
0 |
if (defined $default) { } |
|
2459
|
0 |
0 |
if (@$argref) |
|
2469
|
0 |
4 |
if ($members[$i][0] == 29) |
|
2480
|
0 |
97 |
if ($in_valuetype and not $CORBA::IDLtree::vt2struct) { } |
|
2494
|
3 |
19 |
if ($file) { } |
|
|
19 |
0 |
elsif ("$input_filehandle") { } |
|
2495
|
0 |
3 |
unless -e "$file" |
|
2503
|
0 |
3 |
unless ($emucpp) |
|
2507
|
0 |
0 |
if (locate_executable('cpp')) { } |
|
|
0 |
0 |
elsif (locate_executable('gcc')) { } |
|
2515
|
3 |
0 |
if ($emucpp) { } |
|
2516
|
0 |
3 |
unless open $in, '<', $file |
|
2525
|
0 |
0 |
unless open $in, "$cppcmd $cpp_args $file |" |
|
2528
|
0 |
3 |
if $verbose |
|
2535
|
20 |
2 |
if ($symb) { } |
|
2547
|
0 |
201 |
if ($verbose > 1) |
|
2551
|
0 |
201 |
if ($CORBA::IDLtree::enable_comments and @remark) |
|
2553
|
0 |
0 |
if (@typestack) { } |
|
2564
|
2 |
199 |
if ($kw eq '#') { } |
|
|
0 |
199 |
elsif ($kw eq '@') { } |
|
|
34 |
165 |
elsif ($kw eq '}') { } |
|
|
3 |
162 |
elsif ($kw eq 'module') { } |
|
|
30 |
132 |
elsif ($kw eq 'interface') { } |
|
|
0 |
132 |
elsif ($kw eq 'local') { } |
|
|
0 |
132 |
elsif ($kw eq 'abstract') { } |
|
|
0 |
132 |
elsif ($kw eq 'custom') { } |
|
|
0 |
132 |
elsif ($kw eq 'valuetype') { } |
|
|
0 |
132 |
elsif ($kw eq 'public' or $kw eq 'private') { } |
|
|
10 |
122 |
elsif ($kw eq 'struct' or $kw eq 'exception') { } |
|
|
5 |
117 |
elsif ($kw eq 'union') { } |
|
|
17 |
100 |
elsif ($kw eq 'case' or $kw eq 'default') { } |
|
|
3 |
97 |
elsif ($kw eq 'enum') { } |
|
2566
|
1 |
1 |
if ($directive eq 'pragma') { } |
|
|
1 |
0 |
elsif ($directive eq 'include') { } |
|
|
0 |
0 |
elsif ($directive =~ /^\d/) { } |
|
|
0 |
0 |
elsif ($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') { } |
|
2569
|
1 |
0 |
if ($directive eq 'prefix') { } |
|
|
0 |
0 |
elsif ($directive eq 'version') { } |
|
|
0 |
0 |
elsif (uc $directive eq 'ID') { } |
|
2571
|
0 |
1 |
if (substr($prefix, 0, 1) ne '"') { } |
|
2575
|
0 |
1 |
if (substr($prefix, length($prefix) - 1) ne '"') { } |
|
2602
|
0 |
1 |
if ($filename eq '<') |
|
2608
|
0 |
0 |
if ($t eq '>') |
|
2615
|
0 |
1 |
if (substr($filename, 0, 1) ne '"') { } |
|
2619
|
0 |
1 |
if (substr($filename, length($filename) - 1) ne '"') { } |
|
2627
|
1 |
0 |
unless (-e "$filename") |
|
2630
|
1 |
0 |
if (-e "$_/$filename") |
|
2637
|
0 |
1 |
unless $found |
|
2639
|
0 |
1 |
if (@typestack or @scopestack) |
|
2644
|
0 |
1 |
if ($incfile_contents_ref) { } |
|
2656
|
0 |
1 |
unless Parse_File_i($filename, undef, $incfile_contents_ref) |
|
2660
|
1 |
0 |
if $in_global_scope |
|
2662
|
0 |
1 |
unless ($in_global_scope) |
|
2680
|
0 |
0 |
if ($filename eq $infilename[$currfile]) |
|
2687
|
0 |
0 |
if ($filename eq $infilename[$i]) |
|
2694
|
0 |
0 |
if $seen_file |
|
2700
|
0 |
0 |
unless $incfile_contents_ref |
|
2724
|
0 |
0 |
if ($ann eq 'annotation') { } |
|
2728
|
0 |
0 |
if (shift @arg ne '{') |
|
2733
|
0 |
0 |
if (@arg) |
|
2734
|
0 |
0 |
if ($arg[0] eq '}' or parse_members($symbols, \@arg, \@struct) == 1) |
|
2749
|
0 |
34 |
if (shift @arg ne ';') |
|
2752
|
19 |
15 |
unless (@typestack) |
|
2753
|
19 |
0 |
if (@scopestack) { } |
|
2760
|
0 |
15 |
if ($in_valuetype) |
|
2764
|
0 |
15 |
if (&in_annotation_def()) |
|
2775
|
1 |
14 |
if ($type == 27 and is_a($struct[0], 23)) |
|
2779
|
1 |
0 |
unless (has_default_branch(\@struct)) |
|
2784
|
2 |
3 |
if ($umember->[0] == 28) |
|
2793
|
0 |
3 |
ref $_ ? : |
|
2794
|
1 |
2 |
if (defined $lit and not defined $lits_given{$lit}) |
|
2802
|
0 |
15 |
if ($CORBA::IDLtree::struct2vt and $type == 26) |
|
2811
|
0 |
3 |
if shift @arg ne '{' |
|
2820
|
1 |
2 |
if ($module) |
|
2831
|
0 |
3 |
unless Parse_File_i('', $in, $subord) |
|
2832
|
0 |
3 |
unless ($module) |
|
2841
|
14 |
16 |
if ($lasttok eq ';') { } |
|
|
0 |
16 |
elsif ($lasttok ne '{') { } |
|
2847
|
0 |
0 |
unless (require_end_of_stmt(\@arg, $in, '{')) |
|
2853
|
14 |
2 |
if ($fwd) |
|
2854
|
0 |
14 |
if ($fwd->[0] != 34) |
|
2861
|
5 |
11 |
if (@arg) |
|
2862
|
0 |
5 |
if (shift @arg ne ':') { } |
|
|
0 |
5 |
elsif (not @arg) { } |
|
2873
|
0 |
6 |
unless ($ancestor_node) |
|
2878
|
1 |
5 |
if ($i < $#arg) |
|
2879
|
0 |
1 |
if ($arg[++$i] ne ',') |
|
2891
|
0 |
16 |
unless Parse_File_i('', $in, $subord) |
|
2913
|
0 |
0 |
if ($CORBA::IDLtree::vt2struct) { } |
|
2923
|
0 |
0 |
if ($nxttok eq ';') |
|
2930
|
0 |
0 |
if ($nxttok eq ':') |
|
2931
|
0 |
0 |
if (($nxttok = shift @arg) eq 'truncatable') |
|
2937
|
0 |
0 |
if (not isnode($anc_type) or $anc_type->[0] != 35 and $anc_type->[0] != 37 and $anc_type->[0] != 36) { } |
|
2945
|
0 |
0 |
unless ($nxttok = shift @arg) eq ',' |
|
2950
|
0 |
0 |
if ($nxttok eq 'supports') |
|
2953
|
0 |
0 |
if (not $anc_type) { } |
|
|
0 |
0 |
elsif (not isnode($anc_type) or $anc_type->[0] != 33 or $anc_type->[0] != 34) { } |
|
2962
|
0 |
0 |
unless ($nxttok = shift @arg) eq ',' |
|
2966
|
0 |
0 |
if ($seen_ancestors) { } |
|
|
0 |
0 |
elsif (isname($nxttok)) { } |
|
|
0 |
0 |
elsif ($nxttok ne '{') { } |
|
2967
|
0 |
0 |
if ($nxttok ne '{') |
|
2974
|
0 |
0 |
if ($type) { } |
|
2986
|
0 |
0 |
if (ref $fwd and $fwd->[0] == 36) |
|
2990
|
0 |
0 |
unless ($CORBA::IDLtree::vt2struct) |
|
2996
|
0 |
0 |
unless Parse_File_i('', $in, $declarations, 1) |
|
3005
|
0 |
0 |
unless ($in_valuetype) |
|
3009
|
0 |
0 |
if ($abstract) |
|
3013
|
0 |
0 |
if ($CORBA::IDLtree::vt2struct) { } |
|
3014
|
0 |
0 |
if (parse_members($symbols, \@arg, \@struct) == 1) |
|
3025
|
0 |
0 |
if ($kw eq 'public') { } |
|
3030
|
0 |
0 |
if (parse_members($symbols, \@arg, $vt_access, $cmnt) == 1) |
|
3032
|
0 |
0 |
if (@scopestack) { } |
|
3044
|
8 |
2 |
$kw eq 'struct' ? : |
|
3053
|
0 |
10 |
if ($type == 26 and $nxt eq ':') |
|
3056
|
0 |
0 |
if (isnode($parent) and $parent->[0] == 26) { } |
|
3063
|
0 |
10 |
if ($nxt ne '{') |
|
3067
|
0 |
10 |
if (@arg) |
|
3068
|
0 |
0 |
if ($arg[0] eq '}' or parse_members($symbols, \@arg, \@struct, $cmnt) == 1) |
|
3072
|
0 |
0 |
if ($CORBA::IDLtree::struct2vt and $type == 26) |
|
3092
|
0 |
5 |
if (shift @arg ne 'switch') |
|
3096
|
0 |
5 |
if (shift @arg ne '(') |
|
3102
|
0 |
5 |
if (not $switchtype) { } |
|
|
1 |
4 |
elsif (isnode($switchtype)) { } |
|
|
0 |
4 |
elsif ($switchtype < 1 or $switchtype > 10) { } |
|
3107
|
0 |
1 |
if ($typ < 1 or $typ > 9 and $typ != 23 and $typ != 24) |
|
3116
|
0 |
5 |
if shift @arg ne ')' |
|
3117
|
0 |
5 |
if shift @arg ne '{' |
|
3118
|
0 |
5 |
if @arg |
|
3125
|
16 |
1 |
if ($kw eq 'case') { } |
|
3128
|
0 |
16 |
if (shift @arg ne ':') |
|
3132
|
4 |
12 |
unless @arg |
|
3133
|
12 |
0 |
unless $arg[0] eq 'case' |
|
3136
|
4 |
12 |
unless (@arg) |
|
3141
|
2 |
2 |
unless ($kw eq 'case') |
|
3147
|
2 |
0 |
if ($arg[$#arg] eq ';') |
|
3152
|
0 |
2 |
if (shift @arg ne ':') |
|
3156
|
0 |
2 |
unless @arg |
|
3157
|
2 |
0 |
unless $arg[0] eq 'case' |
|
3160
|
2 |
0 |
if @arg |
|
3165
|
0 |
1 |
if (shift @arg ne ':') |
|
3173
|
15 |
2 |
if (@arg) |
|
3174
|
0 |
15 |
if (parse_members($symbols, \@arg, \@struct) == 1) |
|
3176
|
0 |
0 |
if ($#typestack < 0) |
|
3184
|
0 |
0 |
if ($initial_cmnt) |
|
3185
|
0 |
0 |
if ($cmnt and $cmnt != $initial_cmnt) |
|
3190
|
0 |
0 |
if ($type != 27) |
|
3204
|
0 |
3 |
if (shift @arg ne '{') |
|
3210
|
1 |
2 |
unless @arg |
|
3213
|
0 |
12 |
if (&in_annotation_def()) { } |
|
3214
|
0 |
0 |
unless ($lit =~ /^\w+$/) |
|
3220
|
0 |
12 |
if ($CORBA::IDLtree::enable_comments and @remark) |
|
3225
|
0 |
12 |
if ($lit eq '@') { } |
|
3230
|
0 |
12 |
unless ($lit =~ /^\w+$/) |
|
3236
|
12 |
0 |
if (@arg) |
|
3238
|
3 |
9 |
if $nxt eq '}' |
|
3239
|
0 |
9 |
unless ($nxt eq ',') |
|
3245
|
4 |
5 |
unless @arg |
|
3247
|
0 |
3 |
if (&in_annotation_def()) { } |
|
3256
|
0 |
97 |
unless (require_end_of_stmt(\@arg, $in)) |
|
3261
|
0 |
97 |
if ($kw eq 'native') { } |
|
|
12 |
85 |
elsif ($kw eq 'const') { } |
|
|
13 |
72 |
elsif ($kw eq 'typedef') { } |
|
|
3 |
69 |
elsif ($kw eq 'readonly' or $kw eq 'attribute') { } |
|
|
54 |
15 |
elsif (grep /\(/, @arg) { } |
|
3269
|
0 |
12 |
if (shift @arg ne '=') |
|
3274
|
0 |
12 |
unless ($typething) |
|
3280
|
0 |
5 |
if /^\d/ or /^\.\d/ or /^-\d/ |
|
3281
|
2 |
3 |
if /^'.*'$/ or /^".*"$/ |
|
3282
|
3 |
0 |
if is_valid_identifier($_) |
|
3290
|
0 |
0 |
if ($arg eq $_) |
|
3295
|
0 |
0 |
if $is_operand |
|
3299
|
2 |
10 |
if (isnode($typething)) |
|
3301
|
0 |
2 |
if ($id < 23 or $id > 24) |
|
3313
|
0 |
13 |
unless ($existing_typenode) |
|
3320
|
0 |
7 |
if (shift @arg ne '[') |
|
3328
|
7 |
7 |
if $token eq ']' |
|
3329
|
0 |
7 |
if ($dim) |
|
3334
|
0 |
7 |
unless ($dim) |
|
3338
|
0 |
7 |
unless ($token eq ']') |
|
3350
|
1 |
2 |
if ($kw eq 'readonly') |
|
3351
|
0 |
1 |
if (shift @arg ne 'attribute') |
|
3359
|
0 |
3 |
unless ($type) |
|
3371
|
5 |
49 |
if ($kw eq 'oneway') { } |
|
|
7 |
42 |
elsif ($kw eq 'void') { } |
|
|
0 |
42 |
elsif ($in_valuetype and $kw eq 'factory') { } |
|
3372
|
0 |
5 |
if (shift @arg ne 'void') |
|
3383
|
0 |
42 |
unless ($rettype) |
|
3390
|
0 |
54 |
if (shift @arg ne '(') { } |
|
|
0 |
54 |
elsif (pop @arg ne ')') { } |
|
3403
|
1 |
77 |
if ($m eq ')') |
|
3404
|
0 |
1 |
if ($typename ne 'raises') { } |
|
|
0 |
1 |
elsif ($pname ne '(') { } |
|
3413
|
21 |
0 |
$m eq 'inout' ? : |
|
|
22 |
21 |
$m eq 'out' ? : |
|
|
34 |
43 |
$m eq 'in' ? : |
|
3416
|
0 |
77 |
unless ($pmode) |
|
3420
|
0 |
77 |
if ($rettype == 41 and $pmode != 1) |
|
3425
|
0 |
77 |
unless ($ptype) |
|
3432
|
46 |
31 |
if (@arg and $arg[0] eq ',') |
|
3437
|
1 |
53 |
if ($expecting_exception_list) |
|
3441
|
0 |
1 |
if (not $exc_type) { } |
|
|
0 |
1 |
elsif (do {
$exc_type
}->[0] != 30) { } |
|
3449
|
0 |
1 |
if (@arg and shift @arg ne ',') |
|
3455
|
0 |
54 |
if ($in_valuetype) { } |
|
3456
|
0 |
0 |
if (@exception_list) |
|
3466
|
0 |
15 |
if ($#typestack < 0) |
|
3470
|
2 |
13 |
if ($typestack[-1] == 27) |
|
3475
|
2 |
0 |
unless $struct[$i][0] == 48 |
|
3478
|
0 |
2 |
if ($i < 0 or $struct[$i][0] != 28 and $struct[$i][0] != 29) |
|
3483
|
0 |
15 |
if (parse_members($symbols, \@arg, \@struct, $cmnt) == 1) |
|
3487
|
0 |
0 |
if ($type == ANNOTATION()) { } |
|
3492
|
0 |
0 |
if ($initial_cmnt) |
|
3493
|
0 |
0 |
if ($cmnt and $cmnt != $initial_cmnt) |
|
3505
|
0 |
3 |
if ($verbose) |
|
3508
|
3 |
0 |
if ($file) |
|
3514
|
0 |
3 |
if ($CORBA::IDLtree::n_errors) |
|
3517
|
2 |
1 |
unless $symb |
|
3531
|
0 |
97 |
if (@_) |
|
3534
|
88 |
9 |
if ($$argref[$#$argref] eq $stmt_terminator) |
|
3540
|
0 |
16 |
unless @new_items = get_items($file) |
|
3543
|
9 |
0 |
if ($$argref[$#$argref] eq $stmt_terminator) |
|
3554
|
295 |
7337 |
unless ref $node_ref |
|
3555
|
155 |
7182 |
unless ref $node_ref eq 'ARRAY' and defined $node_ref->[0] |
|
3556
|
6834 |
348 |
if ($node_ref->[0] >= 1 and $node_ref->[0] < 49) |
|
3558
|
0 |
0 |
if (scalar @$node_ref == 5 and $verbose) |
|
3577
|
0 |
0 |
if (isnode($thing)) |
|
3588
|
13 |
17 |
if (isnode($thing)) { } |
|
3613
|
432 |
0 |
unless ($noderef->[0] == 43) |
|
3626
|
197 |
50 |
unless (grep {$_ eq $element;} @$targetlistref) |
|
3643
|
170 |
309 |
if (isnode($root)) { } |
|
3646
|
64 |
106 |
if ($type == 33) { } |
|
|
0 |
106 |
elsif ($type == 35) { } |
|
|
14 |
92 |
elsif ($type == 34) { } |
|
3653
|
0 |
14 |
unless (isnode($full_interface)) |
|
3658
|
0 |
0 |
if (defined $root->[1] and $root->[1] eq $first) |
|
3678
|
384 |
6354 |
unless isnode($node) |
|
3679
|
0 |
6354 |
if ($type == 35) |
|
3680
|
0 |
0 |
if $node->[0] |
|
3684
|
0 |
6354 |
unless (defined $nt) |
|
3688
|
1010 |
5344 |
if $nt == 48 or $nt == 42 or $nt == 38 |
|
3690
|
1 |
5343 |
if ($nt == 43) { } |
|
|
246 |
5097 |
elsif (defined $node->[1] and $node->[1] eq $first) { } |
|
3693
|
182 |
64 |
if (@parts == 0) { } |
|
3695
|
64 |
118 |
if ($nt == 34) |
|
3698
|
50 |
14 |
if (isnode($full_interface)) |
|
3706
|
247 |
5097 |
if (@r) |
|
3712
|
78 |
401 |
if (defined $anc and @parts == 0) |
|
3716
|
0 |
14 |
if (@r) |
|
3729
|
0 |
200 |
if ("$name" eq '') |
|
3735
|
0 |
200 |
if ($name =~ /^::/) |
|
3739
|
200 |
0 |
if ($name =~ /^CORBA::/ or not $name =~ /::/) |
|
3745
|
94 |
106 |
if ($predef_type_id) |
|
3750
|
0 |
106 |
if (&in_annotation_def()) |
|
3751
|
0 |
0 |
if (exists $annoEnum{$name}) |
|
3761
|
106 |
0 |
unless ($is_abs) |
|
3765
|
26 |
80 |
if defined $res |
|
3767
|
13 |
67 |
if (@r == 1) |
|
3775
|
67 |
0 |
if (@prev_symroots and $prev_symroots[-1] != $current_symtree_ref) |
|
3780
|
134 |
0 |
unless ($is_abs) |
|
3787
|
39 |
159 |
if ($res) |
|
3792
|
67 |
92 |
unless @sc |
|
3796
|
26 |
66 |
if (@r) |
|
3797
|
0 |
26 |
if (scalar @r > 1) |
|
3800
|
0 |
0 |
if (@r > 1) { } |
|
3823
|
0 |
69 |
if defined $res |
|
3825
|
0 |
69 |
if (@r) |
|
3826
|
0 |
0 |
if (scalar @r > 1) |
|
3829
|
0 |
0 |
if (@r > 1) { } |
|
3852
|
1 |
0 |
if ($currfile >= 0 and $currfile < scalar @infilename) { } |
|
3869
|
0 |
0 |
if ($currfile >= 0) |
|
3883
|
189 |
0 |
if (@_) |
|
3887
|
98 |
91 |
if (not ref $type and ($type >= 1 and $type < 49)) { } |
|
|
0 |
91 |
elsif (not isnode($type)) { } |
|
3889
|
98 |
0 |
if ($type <= 18) |
|
3900
|
91 |
0 |
if ($gen_scope) |
|
3904
|
0 |
91 |
if $scope[0] == 43 |
|
3906
|
91 |
0 |
unless ($prefix =~ /\b$new_prefix/) |
|
3911
|
91 |
0 |
if (ref $gen_scope) |
|
3915
|
28 |
63 |
if ($prefix eq "${curr_scope}::") |
|
3921
|
0 |
91 |
if ($node[0] == 19) { } |
|
|
0 |
91 |
elsif ($node[0] == 20 or $node[0] == 21) { } |
|
|
8 |
83 |
elsif ($node[0] == 22) { } |
|
3929
|
0 |
0 |
if ($node[0] == 21) |
|
3937
|
2 |
6 |
if ($bound) |
|
3950
|
0 |
47 |
unless ($type) |
|
3955
|
44 |
3 |
unless (isnode($type)) |
|
3956
|
44 |
0 |
if ($typeid > 0) { } |
|
3964
|
3 |
0 |
if ($typeid > 0) { } |
|
3965
|
3 |
0 |
if $type->[0] == $typeid |
|
3967
|
0 |
0 |
if scoped_name($type) eq $typeid |
|
3969
|
0 |
0 |
unless $type->[0] == 24 |
|
3977
|
0 |
0 |
if $dimref and @{$dimref;} |
|
3987
|
0 |
17 |
if (isnode($type) and $type->[0] == 24) |
|
3989
|
0 |
0 |
unless ($dimref and @{$dimref;}) |
|
4002
|
0 |
0 |
if (isnode($type) and $type->[0] == 24) |
|
4011
|
0 |
0 |
if (isnode($type)) |
|
4028
|
0 |
0 |
if (not $symroot) { } |
|
|
0 |
0 |
elsif (not ref $symroot) { } |
|
|
0 |
0 |
elsif (isnode($symroot)) { } |
|
4042
|
0 |
0 |
if ($type == 43) |
|
4054
|
0 |
0 |
if ($epos < 0) |
|
4057
|
0 |
0 |
if ($epos > 0) { } |
|
4069
|
0 |
0 |
if ($value =~ /^[-+]?(?:0x)?[0-9a-f]*$/i) |
|
4071
|
0 |
0 |
if ($is64bit) { } |
|
4073
|
0 |
0 |
if ($wantfloat) |
|
4081
|
0 |
0 |
if ($value =~ /^[-+]?0[0-7]/) { } |
|
4084
|
0 |
0 |
if ('Math::BigInt'->can('from_oct')) { } |
|
4090
|
0 |
0 |
if ($dg[0] eq '-' or $dg[0] eq '+' or $dg[0] eq '0') |
|
4092
|
0 |
0 |
if $c eq '-' |
|
4097
|
0 |
0 |
if ($c lt '0' or $c gt '7') |
|
4103
|
0 |
0 |
if $sg eq '-' |
|
4105
|
0 |
0 |
if ($v->is_nan) |
|
4110
|
0 |
0 |
if ($v->is_nan) |
|
4113
|
0 |
0 |
if ($wantfloat and not $v =~ /\./) |
|
4120
|
0 |
0 |
if ($value =~ /^[-+]?(?:\d+.?\d*|\.\d+)(?:[eE][+-]?\d+)?$/) |
|
4123
|
0 |
0 |
if ($wantfloat and not $res =~ /\./) |
|
4129
|
0 |
0 |
if (isnode($value)) |
|
4131
|
0 |
0 |
unless $value->[0] == 31 |
|
4140
|
0 |
0 |
if ($token =~ /^[a-z]/i) { } |
|
4143
|
0 |
0 |
if (defined $v) { } |
|
4153
|
0 |
0 |
if ($wantfloat and not $res =~ /\./) |
|
4160
|
0 |
0 |
if (@expr > 1) { } |
|
|
0 |
0 |
elsif ($expr[0] eq 'FALSE') { } |
|
|
0 |
0 |
elsif ($expr[0] eq 'TRUE') { } |
|
4162
|
0 |
0 |
$wantfloat ? : |
|
4174
|
0 |
0 |
if (isnode($node)) |
|
4188
|
0 |
0 |
if (@_) |
|
4191
|
0 |
0 |
unless defined $scoperef->[2] |
|
4196
|
0 |
0 |
if ($scopetype == 33) { } |
|
|
0 |
0 |
elsif ($scopetype == 35) { } |
|
4204
|
0 |
0 |
if ($scopetype == 35) |
|
4205
|
0 |
0 |
if $node->[0] |
|
4208
|
0 |
0 |
if (@$node > 1 and $node->[1] eq $name) |
|
4209
|
0 |
0 |
if ($must_be_scope_node and not is_scope($node)) { } |
|
4227
|
0 |
0 |
unless $currscope |
|
4228
|
0 |
0 |
unless (defined $currscope) |
|
4229
|
0 |
0 |
unless defined $global_symroot |
|
4234
|
0 |
0 |
if ($node->[0] == 43) { } |
|
|
0 |
0 |
elsif (is_scope($node) and $scopes[0] eq $node->[1]) { } |
|
4237
|
0 |
0 |
if $currscope |
|
4241
|
0 |
0 |
if (scalar @scopes > 1) { } |
|
4247
|
0 |
0 |
if ($currscope) |
|
4255
|
0 |
0 |
unless defined $currscope |
|
4258
|
0 |
0 |
if ($scopes[0] eq $currscope->[1]) |
|
4264
|
0 |
0 |
unless $currscope |
|
4271
|
0 |
0 |
if ($scope) |
|
4276
|
0 |
0 |
unless $scope |
|
4289
|
0 |
0 |
if defined $currscope |
|
4294
|
0 |
0 |
unless defined $scoperef |
|
4305
|
2 |
2 |
unless ref $scoperef |
|
4306
|
0 |
2 |
if $scoperef->[0] == 43 |
|
4320
|
0 |
0 |
if ($scopes[$i] eq $scopes[$i - 1]) |
|
4337
|
0 |
0 |
if $components[0] eq '' |
|
4339
|
0 |
0 |
if (scalar @components > 1) { } |
|
|
0 |
0 |
elsif (defined $scoperef and $scoperef != 0) { } |
|
4342
|
0 |
0 |
if (defined $scoperef) |
|
4349
|
0 |
0 |
if $noderef |
|
4352
|
0 |
0 |
if ($recurse and not $noderef) |
|
4355
|
0 |
0 |
if ($nodetype == 35) |
|
4360
|
0 |
0 |
if ($nodetype == 35) |
|
4361
|
0 |
0 |
if $n->[0] |
|
4365
|
0 |
0 |
unless $nt == 43 or $nt == 32 or $nt == 33 or $nt == 35 |
|
4368
|
0 |
0 |
if $noderef |
|
4373
|
0 |
0 |
if $_->[0] == 48 |
|
4374
|
0 |
0 |
if ($_->[1] eq $name) |
|
4375
|
0 |
0 |
if ($_->[0] == 34) |
|
4379
|
0 |
0 |
if defined $full_interface and @{$full_interface;} |
|
4388
|
0 |
0 |
if ($nt == 43 or $nt == 32 or $nt == 33 or $nt == 35) |
|
4391
|
0 |
0 |
if $noderef |
|
4401
|
0 |
0 |
if (@_) |
|
4405
|
0 |
0 |
unless (isnode($node)) |
|
4426
|
0 |
944 |
if (defined $dsoptarg) { } |
|
4427
|
0 |
0 |
if (ref $dsoptarg) { } |
|
4439
|
191 |
91 |
if (@_) |
|
4446
|
46 |
0 |
unless $cmnt_ref |
|
4448
|
0 |
0 |
unless @cmnt |
|
4449
|
0 |
0 |
if (scalar @cmnt == 1) |
|
4470
|
0 |
135 |
unless ($sym_array_ref) |
|
4475
|
2 |
133 |
unless (isnode($sym_array_ref)) |
|
4477
|
0 |
4 |
unless (dump_symbols_internal($_)) |
|
4489
|
2 |
131 |
if ($type == 43 or $type == 44) |
|
4490
|
1 |
1 |
if ($type == 43) { } |
|
4499
|
3 |
128 |
if ($type == 38) { } |
|
|
54 |
74 |
elsif ($type == 42) { } |
|
|
0 |
74 |
elsif ($type == 35) { } |
|
|
18 |
56 |
elsif ($type == 32 or $type == 33) { } |
|
|
13 |
43 |
elsif ($type == 24) { } |
|
|
12 |
31 |
elsif ($type == 31) { } |
|
|
3 |
28 |
elsif ($type == 23) { } |
|
|
14 |
14 |
elsif ($type == 26 or $type == 27 or $type == 30) { } |
|
|
14 |
0 |
elsif ($type == 34) { } |
|
|
0 |
0 |
elsif ($type == 48) { } |
|
4501
|
1 |
2 |
if $arg[0] |
|
4506
|
5 |
49 |
if ($t == 39) { } |
|
|
7 |
42 |
elsif ($t == 40) { } |
|
4514
|
54 |
0 |
if (@arg) |
|
4516
|
0 |
54 |
unless (ref $lastarg eq 'ARRAY') |
|
4521
|
54 |
0 |
if (scalar @last != 3 or ref $last[1]) |
|
4526
|
31 |
23 |
if (@arg) |
|
4527
|
24 |
7 |
unless ($#arg == 0) |
|
4536
|
22 |
21 |
$m == &OUT ? : |
|
|
34 |
43 |
$m == &IN ? : |
|
4537
|
70 |
7 |
unless $#arg == 0 |
|
4539
|
46 |
31 |
if $i < $#arg |
|
4541
|
24 |
7 |
unless ($#arg == 0) |
|
4546
|
1 |
53 |
if (@exc_list) |
|
4552
|
0 |
1 |
if $i < $#exc_list |
|
4559
|
0 |
0 |
if ($arg[0]) |
|
4563
|
0 |
0 |
if ($arg[1]) |
|
4565
|
0 |
0 |
if ($truncatable) |
|
4568
|
0 |
0 |
if (@{$ancestors_ref;}) |
|
4572
|
0 |
0 |
if ($first) { } |
|
4586
|
0 |
0 |
if ($memberkind) { } |
|
4590
|
0 |
0 |
$memberkind == &PUBLIC ? : |
|
4593
|
0 |
0 |
unless (dump_symbols_internal($member)) |
|
4603
|
16 |
2 |
if ($type == 33) |
|
4604
|
0 |
16 |
if ($arg[1] == ABSTRACT()) { } |
|
|
0 |
16 |
elsif ($arg[1] == LOCAL()) { } |
|
4612
|
16 |
2 |
if ($type == 33) |
|
4616
|
5 |
11 |
if (@ancestors) |
|
4621
|
1 |
5 |
if $i < $#ancestors |
|
4628
|
0 |
129 |
unless (dump_symbols_internal($_)) |
|
4639
|
5 |
8 |
if ($dimref and @{$dimref;}) |
|
4650
|
0 |
3 |
if ($#arg > 4) |
|
4655
|
0 |
12 |
if $#arg > 4 |
|
4657
|
9 |
3 |
if ($i < $#arg) |
|
4659
|
0 |
9 |
if $#arg > 4 |
|
4662
|
0 |
3 |
if ($#arg > 4) { } |
|
4671
|
5 |
9 |
if ($type == 27) |
|
4683
|
17 |
29 |
if ($type == 28 or $type == 29) { } |
|
|
0 |
29 |
elsif ($type == 48) { } |
|
4684
|
12 |
5 |
if ($had_case) { } |
|
4689
|
16 |
1 |
if ($type == 28) { } |
|
4715
|
0 |
0 |
if (ref $type) { } |
|
4723
|
131 |
0 |
if ($status) { } |
|
4735
|
0 |
2 |
if (@_) { } |
|
4740
|
0 |
0 |
unless (ref $dsoptarg) |
|
4742
|
0 |
0 |
unless (open DS, ">$output_file_name") |
|
4758
|
0 |
2 |
if ($output_file_name) { } |
|
|
0 |
2 |
elsif ($dsoptarg) { } |
|
4779
|
0 |
0 |
if (not $symroot) { } |
|
|
0 |
0 |
elsif (is_elementary_type($symroot)) { } |
|
|
0 |
0 |
elsif (not isnode($symroot)) { } |
|
4797
|
0 |
0 |
if ($type == &INCFILE) { } |
|
|
0 |
0 |
elsif ($type == 32) { } |
|
|
0 |
0 |
elsif ($type == 33) { } |
|
4798
|
0 |
0 |
if $traverse_includefiles |
|
4822
|
0 |
0 |
if (@_) |
|
4833
|
0 |
0 |
if (defined $comment_directives) { } |
|
4837
|
0 |
0 |
if ($t == 1) { } |
|
|
0 |
0 |
elsif (is_elementary_type($t)) { } |
|
|
0 |
0 |
elsif ($t->[0] == 23) { } |
|
4844
|
0 |
0 |
if ($scoped) |
|
4872
|
0 |
0 |
if ($caseval =~ /::/) |
|
4875
|
0 |
0 |
unless $node->[0] == 27 |
|
4882
|
0 |
0 |
if $memb->[0] == 48 |
|
4883
|
0 |
0 |
if ($memb->[0] == 28) { } |
|
|
0 |
0 |
elsif ($memb->[0] == 29) { } |
|
|
0 |
0 |
elsif ($found) { } |
|
4885
|
0 |
0 |
$int ? : |
|
4886
|
0 |
0 |
if ($cv =~ /::/) |
|
4887
|
0 |
0 |
if ($cv eq $caseval) |
|
4909
|
0 |
0 |
unless $node->[0] == 27 |
|
4918
|
0 |
0 |
if (defined $memb or $CORBA::IDLtree::union_default_null_allowed) |
|
4923
|
0 |
0 |
if (isnode($st) and $st->[0] == 23) |
|
4926
|
0 |
0 |
ref $e ? : |
|
4928
|
0 |
0 |
if (defined $memb) |
|
4929
|
0 |
0 |
unless ($el =~ /::/) |
|
4943
|
0 |
0 |
if $memb->[0] == 48 |
|
4944
|
0 |
0 |
if ($memb->[0] == 28) { } |
|
|
0 |
0 |
elsif ($memb->[0] == 29) { } |
|
|
0 |
0 |
elsif (defined $case) { } |
|
4946
|
0 |
0 |
if is_integer($switcht) |