avoid trying to gcov unincluded files
authorTony Cook <tony@develop-help.com>
Thu, 25 Oct 2012 03:42:59 +0000 (14:42 +1100)
committerTony Cook <tony@develop-help.com>
Sat, 24 Nov 2012 04:05:55 +0000 (15:05 +1100)
some C files included with Imager are not included in every build
avoid the noise of trying to gcov them when they aren't

imcover.perl

index f55c98d..253122a 100644 (file)
@@ -41,6 +41,8 @@ my $mani = maniread();
 my %paths;
 for my $filename (keys %$mani) {
   next unless $filename =~ /\.(xs|c|im)$/;
+  (my $gcda = $filename) =~ s/\.\w+$/.gcda/;
+  next unless -f $gcda;
   if ($filename =~ m!^(\w+)/(\w+\.\w+)$!) {
     push @{$paths{$1}}, $2;
   }