mirror of
https://github.com/DBD-SQLite/DBD-SQLite
synced 2025-06-08 14:48:32 -04:00
made valgrind a little happier
This commit is contained in:
parent
404246a9f9
commit
5561ee7ee3
1 changed files with 1 additions and 2 deletions
|
@ -8,7 +8,6 @@ BEGIN {
|
||||||
|
|
||||||
use Test::More;
|
use Test::More;
|
||||||
use t::lib::Test;
|
use t::lib::Test;
|
||||||
use Fatal qw(open);
|
|
||||||
|
|
||||||
my @c_files = (<*.c>, <*.h>, <*.xs>);
|
my @c_files = (<*.c>, <*.h>, <*.xs>);
|
||||||
plan tests => scalar(@c_files);
|
plan tests => scalar(@c_files);
|
||||||
|
@ -20,7 +19,7 @@ foreach my $file (@c_files) {
|
||||||
next;
|
next;
|
||||||
}
|
}
|
||||||
|
|
||||||
open my $fh, '<', $file;
|
open my $fh, '<', $file or die "$file: $!";
|
||||||
my $line = 0;
|
my $line = 0;
|
||||||
while (<$fh>) {
|
while (<$fh>) {
|
||||||
$line++;
|
$line++;
|
||||||
|
|
Loading…
Add table
Reference in a new issue