···11+http://ltp.cvs.sourceforge.net/viewvc/ltp/utils/analysis/lcov/bin/geninfo?view=log
22+33+--- a/bin/geninfo 2013/01/10 09:02:32 1.119
44++++ b/bin/geninfo 2013/02/22 14:09:08 1.120
55+@@ -864,7 +864,6 @@
66+ my $source; # gcov source header information
77+ my $object; # gcov object header information
88+ my @matches; # List of absolute paths matching filename
99+- my @unprocessed; # List of unprocessed source code files
1010+ my $base_dir; # Base directory for current file
1111+ my @tmp_links; # Temporary links to be cleaned up
1212+ my @result;
1313+@@ -1060,7 +1059,6 @@
1414+1515+ # Traverse the list of generated .gcov files and combine them into a
1616+ # single .info file
1717+- @unprocessed = keys(%{$instr});
1818+ foreach $gcov_file (sort(@gcov_list))
1919+ {
2020+ my $i;
2121+@@ -1143,16 +1141,6 @@
2222+ \@matches, \@gcov_content);
2323+ }
2424+2525+- # Remove processed file from list
2626+- for ($index = scalar(@unprocessed) - 1; $index >= 0; $index--)
2727+- {
2828+- if ($unprocessed[$index] eq $source_filename)
2929+- {
3030+- splice(@unprocessed, $index, 1);
3131+- last;
3232+- }
3333+- }
3434+-
3535+ # Skip external files if requested
3636+ if (!$opt_external) {
3737+ if (is_external($source_filename)) {
3838+@@ -1297,16 +1285,6 @@
3939+ unlink($gcov_file);
4040+ }
4141+4242+- # Check for files which show up in the graph file but were never
4343+- # processed
4444+- if (@unprocessed && @gcov_list)
4545+- {
4646+- foreach (@unprocessed)
4747+- {
4848+- warn("WARNING: no data found for $_\n");
4949+- }
5050+- }
5151+-
5252+ if (!($output_filename && ($output_filename eq "-")))
5353+ {
5454+ close(INFO_HANDLE);