unlink target and retry to avoid intermittent Win32 failures

This commit is contained in:
Dr. Stephen Henson 2012-01-03 14:22:45 +00:00
parent c567812fa6
commit 421de62232

View file

@ -57,6 +57,15 @@ print "$fips_cc -DHMAC_SHA1_SIG=\\\"$fips_hash\\\" $fips_cc_args $fips_libdir/fi
system "$fips_cc -DHMAC_SHA1_SIG=\\\"$fips_hash\\\" $fips_cc_args $fips_libdir/fips_premain.c";
die "Second stage Compile failure" if $? != 0;
my $delcnt = 0;
# On windows the previous file doesn't always close straight away
# so retry an unlink operation a few times if it fails.
while (!unlink($target))
{
sleep 2;
die "Can't delete $target" if ($delcnt++ > 10);
}
print "$fips_link @ARGV\n";
system "$fips_link @ARGV";