Skip to content
Snippets Groups Projects
Commit 397069c6 authored by Friedemann Kleint's avatar Friedemann Kleint
Browse files

test2task.pl: Report FAIL and FATAL on stderr.


Change-Id: Iaa6e31f8d76537ccf0e79bf2395b75e22932c304
Reviewed-by: default avatarFriedemann Kleint <Friedemann.Kleint@nokia.com>
parent fb678428
No related branches found
No related tags found
No related merge requests found
...@@ -36,6 +36,8 @@ find({ wanted => \& handleFile}, '.'); ...@@ -36,6 +36,8 @@ find({ wanted => \& handleFile}, '.');
# from the above lines as task entry. # from the above lines as task entry.
my $lastLine = ''; my $lastLine = '';
my ($failCount, $fatalCount) = (0, 0);
while (my $line = <STDIN> ) { while (my $line = <STDIN> ) {
chomp($line); chomp($line);
# --- Continuation line? # --- Continuation line?
...@@ -59,6 +61,14 @@ while (my $line = <STDIN> ) { ...@@ -59,6 +61,14 @@ while (my $line = <STDIN> ) {
} }
my $type = index($lastLine, 'FAIL') == 0 ? 'err' : 'unknown'; my $type = index($lastLine, 'FAIL') == 0 ? 'err' : 'unknown';
print $fullFileName, "\t", $line, "\t", $type, "\t", $lastLine,"\n"; print $fullFileName, "\t", $line, "\t", $type, "\t", $lastLine,"\n";
$failCount++;
} else {
if (index($line, 'QFATAL') == 0 || index($line, 'Received a fatal error.') >= 0) {
print STDERR $line,"\n";
$fatalCount++;
}
} }
$lastLine = $line; $lastLine = $line;
} }
print STDERR 'Done, FAIL: ',$failCount, ', FATAL: ',$fatalCount, "\n";
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment