use
strict;
my
@scripts
;
my
$logfile
= $0;
$logfile
=~ s/t$/
log
/;
ok ( -e
"./$logfile"
,
"Verifying existance of $logfile"
)
or diag(
"No log file found for '$0'"
);
my
$parser
= new Test::Parser::KernelBuild;
$parser
->parse(
$logfile
);
ok (
$parser
->num_errors() == 0,
"Error count"
);
ok (
$parser
->num_warnings() == 19,
"Warnings count"
);