X-Git-Url: https://ruderich.org/simon/gitweb/?a=blobdiff_plain;f=bin%2Fblhc;h=880d24df4d2599f6cae394595bb1eafd6fce4665;hb=50b731db501c79ad33cb40845c16638703a4ea15;hp=f5fbfb8f3250d3843b4e61d714dfd475c57c7f4d;hpb=c5394f86cae6babdd822c503b56ff53804bf83f0;p=blhc%2Fblhc.git diff --git a/bin/blhc b/bin/blhc index f5fbfb8..880d24d 100755 --- a/bin/blhc +++ b/bin/blhc @@ -117,7 +117,7 @@ sub is_non_verbose_build { if (not ($line =~ /^checking if you want to see long compiling messages\.\.\. no/ or $line =~ /^\s*(?:CC|CCLD)\s+(.+?)$/ - or $line =~ /^\s*(?:C|c)ompiling\s+(.+?)$/ + or $line =~ /^\s*(?:C|c)ompiling\s+(.+?)(?:\.\.\.)?$/ or $line =~ /^\s*(?:B|b)uilding (?:program|shared library)\s+(.+?)$/ or $line =~ /^\s*\[[\d ]+%\] Building (?:C|CXX) object (.+?)$/)) { return 0; @@ -250,8 +250,14 @@ my $exit = 0; # Input lines, contain only the lines with compiler commands. my @input = (); +my $start = 0; my $continuation = 0; while (my $line = <>) { + # We skip over unimportant lines at the beginning to prevent false + # positives. + $start = 1 if $line =~ /^dpkg-buildpackage:/; + next if not $start; + # Ignore compiler warnings for now. next if $line =~ /$warning_regex/;