Lines Matching refs:GCOV_PERL
32 GCOV_PERL= if (/^File '(?:.*\/)?(\S+)'/) {
33 GCOV_PERL+= $$file = $$1; $$func = "";
34 GCOV_PERL+= } elsif (/^Function '(\S+)'/) {
35 GCOV_PERL+= $$func = $$1;
36 GCOV_PERL+= } elsif (/^Lines executed:(\d+\.\d+)% of (\d+)/ && defined($$file)) {
37 GCOV_PERL+= my ($$percent, $$lines) = ($$1, $$2);
38 GCOV_PERL+= my $$uncovered =
39 GCOV_PERL+= $$percent eq '100.00' ? '0'
40 GCOV_PERL+= : $$file =~ /\.h$$/ ? '?'
41 GCOV_PERL+= : `grep -c '\#\#\#\#\#:' < \$$(basename $$file.gcov)`;
42 GCOV_PERL+= chomp($$uncovered);
43 GCOV_PERL+= printf("%7.2f %4s/%4d %s%s\n",
44 GCOV_PERL+= $$percent, $$uncovered, $$lines, $$file, $$func);
45 GCOV_PERL+= $$file = undef;
46 GCOV_PERL+= }
145 | perl -ne ${GCOV_PERL:Q} \