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;
# 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/;