mirror of
https://github.com/DBD-SQLite/DBD-SQLite
synced 2025-06-07 22:28:47 -04:00
skip count was wrong, and SKIP label should be needed; (http://www.cpantesters.org/cpan/report/b764d8a6-ac8f-11e0-a4ca-75a0d72a4e93)
This commit is contained in:
parent
e40b755564
commit
ba6a22c375
1 changed files with 5 additions and 2 deletions
|
@ -75,8 +75,11 @@ foreach my $call_func (@CALL_FUNCS) {
|
||||||
my $pid = fork;
|
my $pid = fork;
|
||||||
if (!defined($pid)) {
|
if (!defined($pid)) {
|
||||||
# fork failed
|
# fork failed
|
||||||
skip("No fork here", 1);
|
SKIP: {
|
||||||
skip("No fork here", 1);
|
skip("No fork here", 3);
|
||||||
|
}
|
||||||
|
$dbh->disconnect;
|
||||||
|
unlink $dbfile;
|
||||||
} elsif (!$pid) {
|
} elsif (!$pid) {
|
||||||
# child
|
# child
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue