Fix t_psl_basic_cover test for new SystemPerl package

This commit is contained in:
Wilson Snyder 2008-09-19 08:00:02 -04:00
parent d90071637d
commit dd487d4184

View File

@ -16,7 +16,7 @@ execute (
check_finished=>1,
);
file_grep ($Last_Self->{coverage_filename}, qr/t=>'psl_cover',o=>'cover',c=>2\);/);
file_grep ($Last_Self->{coverage_filename}, qr/,o=>'cover'.*,c=>2\);/);
file_grep ($Last_Self->{coverage_filename}, qr/DefaultClock.*,c=>1\);/);
file_grep ($Last_Self->{coverage_filename}, qr/ToggleLogIf.*,c=>9\);/);